Foxtable(狐表)用户栏目专家坐堂 → 录入明细有内容后,如何把下拉菜单锁死?


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

主题:录入明细有内容后,如何把下拉菜单锁死?

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


加好友 发短信
等级:幼狐 帖子:168 积分:1956 威望:0 精华:0 注册:2015/5/8 1:17:00
录入明细有内容后,如何把下拉菜单锁死?  发帖心情 Post By:2016/8/15 16:05:00 [只看该作者]

明细有内容后,如何把下拉菜单锁死?

在CurrentChanged,写代码,会不停的出错


图片点击可在新窗口打开查看此主题相关图片如下:123.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:02.gif
图片点击可在新窗口打开查看


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

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/15 16:54:00 [只看该作者]

DataColChanged事件

 

If Forms("材料录入").opened Then
    Dim flag As Boolean = True
    For Each dr As DataRow In e.DataTable.DataRows
        For Each dc As DataCol In e.DataTable.DataCols
            If dr.IsNull(dc.Name) = False Then
                flag = False
                Exit For
            End If
        Next
    Next
    Forms("材料录入").Controls("ComboBox1").Enabled = flag
    Forms("材料录入").Controls("ComboBox2").Enabled = flag
End If


 回到顶部