以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请问如何指定combolist 的预设值?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=115005)
--  作者：tennis
--  发布时间：2018/2/27 16:51:00
--  请问如何指定combolist 的预设值?
如题
--  作者：有点甜
--  发布时间：2018/2/27 17:04:00
--  

表格还是控件？

 

http://www.foxtable.com/webhelp/scr/0578.htm

 

http://www.foxtable.com/webhelp/scr/0925.htm

 
--  作者：tennis
--  发布时间：2018/2/27 17:26:00
--  
3Q!! 指定combolist控件的预设值,不要预设空白
--  作者：有点甜
--  发布时间：2018/2/27 17:31:00
--  
以下是引用tennis在2018/2/27 17:26:00的发言：
3Q!! 指定combolist控件的预设值,不要预设空白

 

这个没办法的，每个控件的预设值都是空白的，你需要重新赋值进去。
--  作者：chnfo
--  发布时间：2018/2/27 18:23:00
--  

窗口的afterload事件中：


Dim cmb As WinForm.ComboBox =  e.Form.Controls("ComboBox1")

Dim a As String  = DataTables("客户").GetComboListString("公司名称")

If a > "" Then

    cmb.SelectedIndex = 0

End If


一般情况下，默认赋值就是第一个。上例就是默认打开窗口的时候，下拉框就有一个值了


或者用这个，指定打开的时候，默认值就是某一个

Dim cmb As WinForm.ComboBox ＝ e.Form.Controls("ComboBox1")
For i As Integer = 0 To cmb.Items.Count - 1
    If cmb.Items(i) = "上海" Then
        cmb.SelectedIndex = i
    End If
Next

[此贴子已经被作者于2018/2/27 18:23:39编辑过]
--  作者：tennis
--  发布时间：2018/2/27 21:04:00
--  
3Q!! 有点甜;chnfo ;解决了!! cmb.SelectedIndex