Global holding,bkpr,skpr
Dim lot,stp,lime, m
holding = 0
bkpr = 0
skpr = 0
lot = 0
stp = 0
lime = 0
m = 0
Event Form1.load
set dm = createobject("dm.dmsoft")
base_path = dm.GetBasePath()
dm_ret = dm.SetPath(base_path)
dm_ret = dm.SetDict(0,"dm_soft.txt")
s = dm.Ocr(1193,219,1229,233,"00ffff-007F7F-008080|ff5039-7F2828-802828",1.0)
Form1.InputBox5.Text = s
lot = Cint(Form1.InputBox1.Text)
stp = Cint(Form1.InputBox3.Text)
lime = Cint(Form1.InputBox2.Text)
m = Cint(Form1.InputBox4.Text)
bkpr = s - stp
TracePrint bkpr
End Event
为什么会报类型不匹配