13-11-22, 09:06 AM
السلام عليكم ورحمة الله وبركاته
كل عام وانتم بالف خير
عندى سؤال لو تكرمتم
ارجو المساعدة فى فهم هذا الكود ( ما معناه وما دلالته وماذا افعل حتى يتم تنفيذ هذا الكود للمستخدم بمعنى ( كيف اصل الى نتيجة main.Picture6.Visible = True ) عن طريق الكيبور لكى يتم تنفيذ الكود واظهار الصورة
=========
Private Sub Text7_KeyDown(KeyCode As Integer, Shift As Integer)
If ((KeyCode <> 81) Or (Shift <> 4)) = 0 Then
main.Picture6.Visible = True
main.Text10.SetFocus
End If
GoTo con
Exit Sub
End Sub