datacombo的几个问题～～～谢谢！！

Question

如何设置 datacombo文本框为不可编辑的？？？
datacombo下拉框的长度如何设置？

Answer 1

设置 datacombo文本框为不可编辑的
--------------------------------
把它的Style属性设置为2

Answer 2

呵呵，真是谢谢，好简单的问题啊，
为什么我每次运行的时候，datacombo 首行是空白啊？
请问怎么处理，
数据是从数据库连接上的
请教，谢谢先～～

Answer 3

使用DataCombo1的例子：'需要引用ADO
Dim oRS As New ADODB.Recordset
Dim oConn As New ADODB.ConnectionPrivate Sub Form_Load()    
    oConn.CursorLocation = adUseClient
    '连接字符串的路径自己改过来
    oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.mdb;Persist Security Info=False" 
    
    oRS.Open "select * from table1", oConn, adOpenDynamic, adLockOptimistic    Set DataCombo1.RowSource = oRS
    DataCombo1.ListField = "某个列名"
    DataCombo1.Text = oRS("某个列名")  
End Sub

Answer 4

Public Function GetFastSearchitem(sqlcode As String)
    g_connsearchitem.CursorLocation = adUseClient
    g_connsearchitem.ConnectionString = strConnectdata1 & dbaddress & strConnectdata2
    g_connsearchitem.Open
    g_rssearchitem.Open sqlcode, g_connsearchitem, adOpenStatic, adLockReadOnly
    
    With frmFastSearching.dtcmbXiangmu
        Set .RowSource = g_rssearchitem
        .ListField = FAST_SEARCH_FIELD
        .Text = g_rssearchitem(FAST_SEARCH_FIELD_VALUE）
    End With End Function
那个第一行依然不显示文字啊～～～～
郁闷

Answer 5

.ListField = FAST_SEARCH_FIELD
.Text = g_rssearchitem(FAST_SEARCH_FIELD_VALUE）
------------------------------------
    DataCombo1.ListField = "某个列名"
    DataCombo1.Text = oRS("某个列名")  
--------------------------------------
这两个“某个列名”要一样哦，你的不一样，改过来

Answer 6

datacombo下拉框的长度如何设置？

Answer 7

我也不知道，你看看这个，看对你有没有帮助
http://community.csdn.net/Expert/topic/4502/4502906.xml?temp=1.461428E-02