Foxtable(狐表)用户栏目专家坐堂 → 创建列,既能用目录树下拉选择,又能输入后显示


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

主题:创建列,既能用目录树下拉选择,又能输入后显示

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


加好友 发短信
等级:婴狐 帖子:1 积分:106 威望:0 精华:0 注册:2017/5/17 11:33:00
创建列,既能用目录树下拉选择,又能输入后显示  发帖心情 Post By:2017/5/23 23:29:00 [只看该作者]

如题建立总则目录树,在表第100章中引用总则目录树,要在输入子目号的时候,子目名称和单位也显示,同时能够下拉在目录树中选择怎么办?
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table


 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110746 积分:563656 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/5/24 8:44:00 [只看该作者]

第100章DataColChanged事件

Select Case e.DataCol.Name
    Case "子目号"
        If e.DataRow.IsNull("子目号") Then
            e.DataRow("子目名称") = Nothing
            e.DataRow("单位") = Nothing
        Else
            Dim dr As DataRow = DataTables("总则目录树表").Find("子目号='" & e.NewValue & "'")
            If dr IsNot Nothing Then
                e.DataRow("子目名称") = dr("子目名称")
                e.DataRow("单位") = dr("单位")
            End If
        End If
End Select

 回到顶部