按键精灵,QUI下拉框选中时间后,点击按键输出读取位置变量值。求解大神指点12.。谢谢
//下拉框索引=Array(2,243,483,1233)//设置按键码按键码=索引(Form1.ComboBox1.ListIndex)//得到按键码EventForm...
//下拉框
索引 = Array(2,243,483,1233) //设置按键码
按键码 = 索引(Form1.ComboBox1.ListIndex) //得到按键码
Event Form1.Load //界面初始值设置
Form1.ComboBox1.List = "6:00|12:00|18:00|24:00"
Form1.ComboBox1.ListIndex = 0
End Event
//读取数据
Event Form1.Button1.Click
Call 打开excel()
Form1.Label1.Caption = Plugin.Office.ReadXls(1, 按键码, 1)//日期
Form1.Label2.Caption = Plugin.Office.ReadXls(1, 按键码, 12)//时间
Form1.Label3.Caption = Plugin.Office.ReadXls(1, 按键码, 20)//数量
Delay 100
Call 关闭excel()
End Event 展开
索引 = Array(2,243,483,1233) //设置按键码
按键码 = 索引(Form1.ComboBox1.ListIndex) //得到按键码
Event Form1.Load //界面初始值设置
Form1.ComboBox1.List = "6:00|12:00|18:00|24:00"
Form1.ComboBox1.ListIndex = 0
End Event
//读取数据
Event Form1.Button1.Click
Call 打开excel()
Form1.Label1.Caption = Plugin.Office.ReadXls(1, 按键码, 1)//日期
Form1.Label2.Caption = Plugin.Office.ReadXls(1, 按键码, 12)//时间
Form1.Label3.Caption = Plugin.Office.ReadXls(1, 按键码, 20)//数量
Delay 100
Call 关闭excel()
End Event 展开
展开全部
Event Form1.Button1.Click
MessageBox Split(Form1.ComboBox1.List, "|")(Form1.ComboBox1.ListIndex)
//Call 打开excel()
Form1.Label1.Caption = Plugin.Office.ReadXls(1, 按键码, 1)//日期
Form1.Label2.Caption = Plugin.Office.ReadXls(1, 按键码, 12)//时间
Form1.Label3.Caption = Plugin.Office.ReadXls(1, 按键码, 20)//数量
Delay 100
//Call 关闭excel()
End Event
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询