|
Dim lst As WinForm.Table = e.Form.Controls("Table1")
Forms("窗口1").Controls("TextBox1").value=lst.Table.Current("第一列")
Forms("窗口1").Controls("lable-TextBox1").text=lst.Table.Current("第一列")
Forms("窗口1").Controls("ComboBox1").value=lst.Table.Current("第二列")
Forms("窗口1").Controls("lable-ComboBox1").text=lst.Table.Current("第二列")
Forms("窗口1").Controls("CheckedComboBox1").value=lst.Table.Current("第三列")
Forms("窗口1").Controls("lable-CheckedComboBox1").text=lst.Table.Current("第三列")
Forms("窗口2").close
| 
加好友 
发短信
Post By：2017/7/23 12:28:00 [显示全部帖子]
