21-02-16, 07:32 PM
أوجد ناتج تنفيذ الإجراءات التالية، بالترتيب التي تنفذ فيه مع التوضيح:
Private Sub Form_Activate()
Debug.Print "Activate"
End Sub
Private Sub Form_Paint()
Debug.Print "Paint"
End Sub
Private Sub Form_GotFocus()
Debug.Print "GotFocus"
End Sub
Private Sub Form_Resize()
Debug.Print "Resize"
End Sub
Private Sub Form_Initialize()
Debug.Print "Initialize"
End Sub
Private Sub Form_Load()
Debug.Print "Load"
End Sub
Private Sub Form_Activate()
Debug.Print "Activate"
End Sub
Private Sub Form_Paint()
Debug.Print "Paint"
End Sub
Private Sub Form_GotFocus()
Debug.Print "GotFocus"
End Sub
Private Sub Form_Resize()
Debug.Print "Resize"
End Sub
Private Sub Form_Initialize()
Debug.Print "Initialize"
End Sub
Private Sub Form_Load()
Debug.Print "Load"
End Sub