以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  怎样让combolist的第一个值直接显示在combobox?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=178415)

--  作者:hitzfeld
--  发布时间:2022/7/3 17:32:00
--  怎样让combolist的第一个值直接显示在combobox?
比如
cmb = e.Form.Controls("ComboBox1")
cmb.ComboList= dt.GetComboListString(
"客户"
)
那么,我们能得到一个数组,比如这样的:客户A|客户B|客户C|客户D
但是我需要把第一个值客户A直接显示在combobox1的框里面,而不是点下拉选择。要怎么赋值?怎么写都写不好。请老师指点下。谢谢!


--  作者:有点蓝
--  发布时间:2022/7/3 21:20:00
--  

cmb = e.Form.Controls(
"ComboBox1")
cmb.ComboList= dt.GetComboListString(
"客户"
)
cmb.SelectedIndex = 0

--  作者:hitzfeld
--  发布时间:2022/7/3 21:39:00
--  
谢谢蓝老师,我对狐表函数的掌握得不够透彻。。。一直在集合取值里面搞,结果代码一直报错。。。。
现在碰到个问题,当cmb.SelectedIndex为空值(不存在符合条件的值)的时候会报错,我把代码改为

If cmb.SelectedIndex IsNot Nothing Then
cmb.SelectedIndex = 0
End If

也不行,直接就无法编译了。要怎么才能跳过空值?再请老师指点下。谢谢!

--  作者:有点蓝
--  发布时间:2022/7/3 22:20:00
--  
cmb = e.Form.Controls("ComboBox1")
cmb.ComboList= dt.GetComboListString(
"客户"
)
if cmb.ComboList  > "" then
cmb.SelectedIndex = 0
end if

--  作者:hitzfeld
--  发布时间:2022/7/4 22:11:00
--  
谢谢蓝老师!搞定了,其实还就是怎么判断空值的问题。
写了这么久的狐表代码,感觉对“空值”的理解还是不够透彻,有的是nothing,有的是null,有的是“” 。。。。。感觉自己的思路都有点乱。