Component Object Model (Events)?

Computer: Software & Programmierung Visual Basic
#1

Hallo,
ich versuche ein Tool durch die von ihm zur Verfügung gestellen COM-Schnittstelle fernzusteuern.
Die Objecte der COM-Schnittstelle haben Eigenschaften,Methoden und Events,mein Problem ist die events zu empfangen …
ich hab dieses Cod geschrieben…

Dim WithEvents gCan As Tool.Application
Dim capl_Function As Tool.CAPLFunction
Dim WithEvents gCanMeasurement As Tool.Measurement

Sub callTool()
Set gCan = New Application
gCan.Open („D:\Programme\Demo_CAN_CL\myconfig.cfg“)
Set gCanMeasurement = gCan.Measurement
gCanMeasurement.Start
capl_Function.Call (99)
gCan.Quit
End Sub

Sub gCanMeasurement_OnInit()
Set capl_Function = gCan.CAPL.GetFunction(„myfunction“) ’

#2

Deine Funktionen werden nicht ausgeführt, weil Du sie nicht aufrufst.
Damit ein Event ausgelöst wird, musst Du den Befehl Raisevent verwenden.

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]