项目事件Initialize加入代码:
For Each dt As DataTable In DataTables
dt.GlobalHandler.DoubleClick = True
Next
项目属性 ,全局表事件DoubleClick 加入代码
MessageBox.Show(e.Table.Name)
Se1ect Case e.Table.Name
Case "表A"
'针对表A的代码
Case "表B"
'针对表B的代码
Case "表C"
'针对表C的代码
Case Else
If forms("report_flow").opened
forms("report_flow").controls("TextBox2").text = "qwewqewqeWQE"
End If
End Se1ect
动态表 生成代码
tbl = e.Form.CreateSQLQuery("Table2", "Se1ect * From {样本信息表}","flowcm")
tbl.SetBounds(10, 10, 600, 400)
tbl.Width= e.Form.BaseForm.Width -e.Form.controls("WebBrowser1").Width -40
tbl.Height=328
tbl.Top=3
tbl.Left=e.Form.controls("WebBrowser1").Width +10
e.Form.AddControl(tbl)
运行后希望双击动态表获取改行某列值
请问代码有什么问题,应该怎么改?