MessageBox.Show(vars("会议主题uuid"))可以得到值 且有数据行
此主题相关图片如下:1.png
会议议题对应内容行为:
此主题相关图片如下:2.png
主题窗体有sqltable1.2.3
主题窗体打开后事件代码如下:
'Tables(e.form.name & "_table1").Filter="uuid='" & ("会议主题uuid") & "'" 取消注释后,会议议题这个区域显示为空了
Dim zs1 As Integer = Tables(e.form.name & "_table1").Count
If zs1 >0 Then
If Tables(e.form.name & "_table1").Current("uuid")<>"" Then
vars("议题uuid")=Tables(e.form.name & "_table1").Current("uuid")
vars("议题标题")=Tables(e.form.name & "_table1").Current("议题标题")
Tables(e.form.name & "_table2").Filter="uuid='" & Tables(e.form.name & "_table1").Current("uuid") &"'and 会议主题='" & Tables(e.form.name & "_table1").Current("议题标题") &"'"
Else
Tables(e.form.name & "_table2").Filter="uuid='XXXXXXX'and 会议主题='" & Tables(e.form.name & "_table1").Current("议题标题") &"'"
vars("议题uuid")=""
vars("议题标题")=""
End If
Else
Tables(e.form.name & "_table2").Filter="uuid='XXXXXXX' and 会议主题='" & Tables(e.form.name & "_table1").Current("议题标题") &"'"
End If
主题窗体打开后会议议题显示了全部的议题 怎么修正为窗体加载后 会议议题显示uuid=会议主题uuid的值数据行呢?
此主题相关图片如下:3.png
[此贴子已经被作者于2022/4/26 14:27:58编辑过]