Foxtable(狐表)用户栏目专家坐堂 → 代码还是有问题


  共有1349人关注过本帖树形打印复制链接

主题:代码还是有问题

帅哥哟,离线,有人找我吗?
天蝉一下
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:74 积分:605 威望:0 精华:0 注册:2016/6/13 18:16:00
代码还是有问题  发帖心情 Post By:2017/7/23 11:43:00 [只看该作者]

双击表的某行,窗口1应该显示出数据来,怎么没显示。非得鼠标点一下控件才能显示刚才双击的数据!
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:文本框控件处理.foxdb


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/7/23 12:28:00 [只看该作者]

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

 回到顶部