Foxtable(狐表)用户栏目专家坐堂 → 关于窗口中关于组合框


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

主题:关于窗口中关于组合框

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


加好友 发短信
等级:小狐 帖子:334 积分:2722 威望:0 精华:0 注册:2010/5/20 13:07:00
关于窗口中关于组合框  发帖心情 Post By:2010/6/11 21:38:00 [只看该作者]

窗口中有一组合框,选择其不同的列表项目时,自动调用其它表中数据,怎样实现?

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


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


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33945 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2010/6/12 1:29:00 [只看该作者]

'业务种类的SelectedIndexChanged事件
Dim r As Row = Tables("表A").Current
if e.Sender.Value <> Nothing Then
    Dim dr As DataRow = DataTables("表B").Find("业务种类 = '" & e.Sender.Value & "'")
    If dr IsNot Nothing Then
        r("大型数量") = dr("大型数量")
        r("大型单价") = dr("大型单价")
        r("小型数量") = dr("小型数量")
        r("小型单价") = dr("小型单价")
    Else
        r("大型数量") = Nothing
        r("大型单价") = Nothing
        r("小型数量") = Nothing
        r("小型单价") = Nothing
    End If
End If
[此贴子已经被作者于2010-6-12 1:31:02编辑过]

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


加好友 发短信
等级:小狐 帖子:334 积分:2722 威望:0 精华:0 注册:2010/5/20 13:07:00
  发帖心情 Post By:2010/6/12 7:50:00 [只看该作者]

ok,多谢!


 回到顶部