[已解决] 关于Excel传参问题 [复制链接]

您所在的用户组无法下载或查看附件

您所在的用户组无法下载或查看附件

代码如下 读取行号 = 2


Call Plugin.Office.OpenXls("C:\工时记录表.xls")
While True
读取行号展示 = 读取行号 - 1
TracePrint "读取行号展示" & 读取行号展示
时间 = Plugin.Office.ReadXls(1, 读取行号, 2)
Form1.查询事件.SetItemText 读取行号展示, 1, 时间
TracePrint 时间
If 时间 = "" Then
Form1.提示.Caption = "已读取完"
Goto 退出循环



End If
Form1.查询事件.RowCount = 读取行号
序号 = Plugin.Office.ReadXls(1, 读取行号, 1)
Form1.查询事件.SetItemText 读取行号展示, 0, 序号
TracePrint "序号:" & 序号
人员 = Plugin.Office.ReadXls(1, 读取行号, 3)
Form1.查询事件.SetItemText 读取行号展示, 2, 人员
TracePrint 人员
事宜 = Plugin.Office.ReadXls(1, 读取行号, 4)
Form1.查询事件.SetItemText 读取行号展示, 3, 事宜
TracePrint 事宜
是否解决 = Plugin.Office.ReadXls(1, 读取行号, 5)
Form1.查询事件.SetItemText 读取行号展示, 4, 是否解决
TracePrint 是否解决
解决时间 = Plugin.Office.ReadXls(1, 读取行号, 6)
Form1.查询事件.SetItemText 读取行号展示, 5, 解决时间
TracePrint 解决时间
TracePrint "当前行数" & 读取行号
TracePrint "当前表格行总数" & Form1.查询事件.RowCount
读取行号 = 读取行号 + 1
Wend
Rem 退出循环
Call Plugin.Office.CloseXls()
Form1.记录行号.Caption = 读取行号


做了空值判断 不论使用 时间、序号、人名、事宜等去做判断 做判断的参数 都不会赋值到控件上面 TracePrint输出正常