Implementieren Sie eine Veranstaltung in vb6?

Ich habe eine Schaltfläche und ein event am auslösen des Ereignisses in button klicken, also meine Frage ist, wie implementieren Sie das Ereignis,

Public Event ClickEvent()

Private Sub Command1_Click()
    RaiseEvent ClickEvent
End Sub
  • Ich denke, diese Frage ist auch Basis für diese Website. Es gibt einige ausgezeichnete VB6-tutorials rund um, versuchen Sie diese zuerst! Mehr über die Veranstaltungen unter: visualbasic.freetutes.com/learn-vb6-advanced/lesson12/p13.html
  • Die VB6-Handbuch enthält eine ausgezeichnete tutorial über benutzerdefinierte Ereignisse. Verfügbar hier
InformationsquelleAutor superuser | 2012-06-27
  1. 9

    Vorausgesetzt, dass Ihr code wie gepostet wird, ist in einem Formular namens Form1.

    Erstellen Sie ein neues Formular (Form2). Fügen Sie diesen code in Form2:

    'declare an object and tell vb you want to subscribe to the objects events
Private WithEvents Foo As Form1

Private Sub Form_Load()
    'initialise the object
    Set Foo = New Form1
    'show the Form1 object which has the button on so we have something to click
    Foo.Show
End Sub

'when the button is clicked this event is raised
Private Sub Foo_ClickEvent()
    MsgBox "Click Event"
End Sub
    InformationsquelleAutor Matt Wilko
Schreibe einen Kommentar