I don't know my way around BBS don't know how to post code just copy and paste the embarrassed at webmaster forgive me
A hurry please supervise your playgrounds provide-reduced
So that a few years no open is an error before
The following is an error when part of the program error long font color also
Private Sub Text3_Change ()
K1=Val (Int (Text3. Text))
End Sub

Private Sub Text3_DblClick ()
For K4=0 To 63
For K5=0 To 12
In_ad (K5, K4)=0
Next K5
Next K4
K1=0
End Sub

Private Sub Timer1_Timer ()
M=Card1 CardNameIS (" KH9250 ")
'initialize the board base address
M=Card1. Initial (& amp; H280 & amp; , 1)
m=Card1. Do (& amp; H0 & amp;) '0 XFF to digital quantity output, s
Label10. Caption dupengyugai=Time '
End Sub

CodePudding user response:

Card1 is what east east? Class module or other objects?

CodePudding user response:

What is error message? O come at least cut a figure

CodePudding user response:

If can use before, can't use now, and you don't have a blind to turn "code" and then estimate is missing file or control/DLL not registered,