以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何获得combobox输入框中的值?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=91604)

--  作者:pladic
--  发布时间:2016/10/14 13:53:00
--  [求助]如何获得combobox输入框中的值?
在窗口中有两个combobox控件,combobox1绑定到表中的一个列,combobox2未绑定任何列,如何获得这两个框中输入的字符串,并进行下一步的判断?
例如:

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



--  作者:有点蓝
--  发布时间:2016/10/14 14:28:00
--  
With Forms("窗口1").Controls("combobox2")
    
If .Value = "订购" Then
        
tables("表").addnew()
    End 
If

End
 With


--  作者:pladic
--  发布时间:2016/10/14 14:37:00
--  回复:(有点蓝)With?Forms("窗口1").Controls(...
再把这个值赋给表中的某列呢?
代码怎么写?
[此贴子已经被作者于2016/10/14 14:58:00编辑过]

--  作者:有点蓝
--  发布时间: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
--  发布时间:2016/10/14 16:38:00
--  回复:(有点蓝)With Forms("窗口1").Controls("comb...
DataTables("订单").DeleteFor("[汇款方式] =isnull")

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

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

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

--  作者:有点蓝
--  发布时间:2016/10/14 16:41:00
--  
DataTables("订单").DeleteFor("[汇款方式] is null")