Foxtable(狐表)用户栏目专家坐堂 → 窗口中有多个控件,多控件间的值怎么引用


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

主题:窗口中有多个控件,多控件间的值怎么引用

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


加好友 发短信
等级:小狐 帖子:398 积分:2369 威望:0 精华:0 注册:2017/3/19 15:30:00
窗口中有多个控件,多控件间的值怎么引用  发帖心情 Post By:2018/7/1 10:45:00 [只看该作者]

如上图的代码 怎么写
图片点击可在新窗口打开查看此主题相关图片如下:代码.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/7/1 17:16:00 [只看该作者]

比如

 

Dim s1 = e.form.controls("combobox1").text

Dim s2 = e.form.controls("combobox2").text

If e.form.controls("checkbox1").checked then

   msgbox(s1 & "   " & s2)

End If


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


加好友 发短信
等级:小狐 帖子:398 积分:2369 威望:0 精华:0 注册:2017/3/19 15:30:00
  发帖心情 Post By:2018/7/2 9:11:00 [只看该作者]

Dim s1 = e.form.controls("combobox1").text

Dim s2 = e.form.controls("combobox2").text

If e.form.controls("checkbox1").checked then

   msgbox(s1 & "   " & s2)

End If

 请问下为什么 dim s1后面不接as这 是什么用法

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/7/2 9:13:00 [只看该作者]

不用as默认就是object类型,你可以改成 as string


 回到顶部