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