Foxtable(狐表)用户栏目专家坐堂 → [求助]代码


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

主题:[求助]代码

帅哥哟,离线,有人找我吗?
大红袍
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/27 21:49:00 [显示全部帖子]

下拉组合框 的TextChanged事件写代码

 

Dim fdr As DataRow = DataTables("表A").Find("品号 = '" & e.Sender.Text & "'")

If fdr IsNo Nothing Then

    e.form.controls("textbox1").text = fdr("品名")

End If


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/27 22:09:00 [显示全部帖子]

Dim fdr As DataRow = DataTables("表A").Find("品号 = '" & e.Sender.Text & "'")

If fdr IsNot Nothing Then

    e.form.controls("textbox1").text = fdr("品名")

End If


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/27 22:29:00 [显示全部帖子]

 打开窗口之前,用一个变量记录是哪个表打开的。

 

 vars("表名") = "表A"


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/27 22:47:00 [显示全部帖子]

 上传你的例子。

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/27 22:51:00 [显示全部帖子]

 开窗口之前写

 

vars("表名") = "表A"

 

----------

 

vars("表名") = "表B"

 

 确认按钮根据变量名赋值啊


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/27 23:00:00 [显示全部帖子]

 
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.table


 回到顶部