Private
Sub Timer1_Timer()
ToyOcx1.UltReqPos (ultrasonic_no)
-
Process of drawing
plants
-
End
Sub
注:値をタイマールーチンの中で要求します。
Private Sub
ToyOcx1_UsonicDistance(ByVal idx As Integer,
ByVal val As Long)
-
Process of storing the
returned value in a variable
-
End
Sub
注:イベントを通じて値が戻されます。
|