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


  共有2146人关注过本帖平板打印复制链接

主题:代码

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


加好友 发短信
等级:一尾狐 帖子:470 积分:3641 威望:0 精华:0 注册:2017/11/5 14:47:00
代码  发帖心情 Post By:2018/10/4 22:37:00 [只看该作者]

这段代码,我想实现 遍历所有控件,
For Each c As Winform.Control In e.Form.Controls
当选择的是ComboBox“客户名称”控件时,执行
Dim gys As String = Forms("西建集团对账付款").Controls("客户名称").Text
        e.DataRow("客户类型")= "西建集团"
        e.DataRow("客户名称")= gys
当选择 ("DateTimePicker1")控件时执行
Dim  riqi As String = Forms("西建集团对账付款").Controls("DateTimePicker1").Text
        e.DataRow("客户类型")= "西建集团"
next

 

老师,红色部分代码怎么写,我写了总是通过不了编译


 回到顶部