如何將組合框和列表框添加/獲取(將顯示成員的值和名稱與.NET相同)?如何在excel中添加/獲取組合框中的項目VBA
基本上,我想顯示名稱給用戶,並從下拉框選擇姓名後,我想基於名稱選擇進一步使用得到說明。
使用下面的代碼我加入名稱到組合框,但不知道怎麼加DESC爲itmeindexColumn(這是從DB DESC列)。 (同樣喜歡valuemember,Displaymember在.NET組合框)
Dim rs As New ADODB.Recordset
Dim sqltextexec As String
Set rs = New ADODB.Recordset
sqltextexec = " SELECT Name , Name + '-' + Code 'Desc' from Employee "
rs.Open sqltextexec, cn
rs.MoveFirst
With Sheets("Sheet1").ComboBox1
.Clear
Do
.ComboBox1.AddItem rs![Name]
rs.MoveNext
Loop Until rs.EOF
End With
http://stackoverflow.com/help/someone-answers –