小弟對論壇不熟 不知道怎么貼程式碼 就復制粘貼了 不好意思 望版主見諒
比較急 煩請各位高人賜教
以前好使 幾年不用了 打開就報錯了
下面是報錯部分的程式 報錯時有段字體還變色了
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")
'初始化板卡基地址
m = Card1.Initial(&H280&, -1)
m = Card1.Do(&H0&) '送0xff到數字量輸出口，置0
Label10.Caption = Time 'dupengyugai
End Sub
uj5u.com熱心網友回復：
Card1是個什么東東？類模塊還是其它物件？uj5u.com熱心網友回復：
報錯資訊是什么啊？至少截個圖上來吧uj5u.com熱心網友回復：
要是以前可以用，現在不能用，而且你沒有瞎改過“程式碼”，那么估計是丟失檔案或者控制元件/dll沒有注冊好。轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/112450.html
標籤：控件