Foxtable(狐表)用户栏目专家坐堂 → [求助]如何获得combobox输入框中的值?


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

主题:[求助]如何获得combobox输入框中的值?

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


加好友 发短信
等级:童狐 帖子:225 积分:2015 威望:0 精华:0 注册:2015/12/23 11:59:00
[求助]如何获得combobox输入框中的值?  发帖心情 Post By:2016/10/14 13:53:00 [只看该作者]

在窗口中有两个combobox控件,combobox1绑定到表中的一个列,combobox2未绑定任何列,如何获得这两个框中输入的字符串,并进行下一步的判断?
例如:

if combobox.value="订购" then
tables("表").addnew()
endif



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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/14 14:28:00 [只看该作者]

With Forms("窗口1").Controls("combobox2")
    
If .Value = "订购" Then
        
tables("表").addnew()
    End 
If

End
 With


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


加好友 发短信
等级:童狐 帖子:225 积分:2015 威望:0 精华:0 注册:2015/12/23 11:59:00
回复:(有点蓝)With?Forms("窗口1").Controls(...  发帖心情 Post By:2016/10/14 14:37:00 [只看该作者]

再把这个值赋给表中的某列呢?
代码怎么写?
[此贴子已经被作者于2016/10/14 14:58:00编辑过]

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/14 15:06:00 [只看该作者]

With Forms("窗口1").Controls("combobox2")
    If .Value = "订购" Then
        Dim dr As Row = Tables("表").addnew()
        dr("某列") = .Value
    End If
End With


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


加好友 发短信
等级:童狐 帖子:225 积分:2015 威望:0 精华:0 注册:2015/12/23 11:59:00
回复:(有点蓝)With Forms("窗口1").Controls("comb...  发帖心情 Post By:2016/10/14 16:38:00 [只看该作者]

DataTables("订单").DeleteFor("[汇款方式] =isnull")

如果批量删除订单表中汇款方式为空值的行,条件语句怎么写?

"[汇款方式] =isnull"
"[汇款方式] is nothing"

类似的还有某字符串列的初始值为设为空值

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/14 16:41:00 [只看该作者]

DataTables("订单").DeleteFor("[汇款方式] is null")

 回到顶部