
Dim db = HySq-l.DataBaseFactory.CreateDatabase("YF123")
Dim Sq-l2 = "selec-t * from Users"
Dim dt2 As system.data.DataTable = db.ExecuteDataSet(Sq-l2).Tables(0)
dt2.TableName = "Users"
Dim t2 As Table = e.Form.Controls("Table2").Table
t2.datasource = dt2
t2.AllowEdit = True
'Msgbox(1)
Dim dr2 As DataRow '定义变量,定义dr2为表列的变量
dr2 = DataTables("入库查询窗口_Table2").Find("[Group] = '" & _UserGroup & "'")'定义dr2
Msgbox(2)
Dim s As String'定义变量为S
s = dr2("ID2")'定义变量为S
'Msgbox(3)
Dim Sq-l = "selec-t * from 入库明细 where (制单人= '" & _Username & "' or ID in ('" & s.Replace(",", "','") & "')) "
msgbox(Sq-l)
Dim dt As system.data.DataTable = db.ExecuteDataSet(Sq-l).Tables(0)
Dim t As Table = e.Form.Controls("Table1").Table
'msgbox(t)
t.datasource = dt.Copy
t.AllowEdit = False 'sqltab
执行后,报错:.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2022.8.18.1
错误所在事件:窗口,入库查询窗口,Button1,Click
详细错误信息:
至少一个参数没有被指定值。
如何解决?