VB COMBO立即响应问题

[fooltutu]

谁能帮忙帮我解决一个问题。在一个ＶＢ程序中，要立即响应combo选择框的改变（即选择框一改变选项，就立刻将结果传递进去）！

[fooltutu]

传递到数据库中．而且最好不要用textbox.我想在combox的下拉列表中选择后就可以直接传到数据中

[东方之珠]

Option Explicit


Private Sub Combo1_Click()
        Text1.Text = Combo1.List(Combo1.ListIndex)
End Sub

Private Sub Form_Load()
        Dim i As Integer
        
        For i = 0 To 10
            Combo1.AddItem "abcd" & i
        Next
        
        Combo1.ListIndex = 0
        Text1.Text = ""
End Sub

[东方之珠]

是不是理解错了，增加里面没有的选项？

[东方之珠]

Option Explicit

Private Sub Combo1_KeyPress(KeyAscii As Integer)
        Dim i As Integer
        If KeyAscii = 13 Then '按回车键
           For i = 0 To Combo1.ListCount - 1
               If StrComp(Combo1.Text, Combo1.List(Combo1.ListIndex)) <> 0 Then
                  Combo1.AddItem Combo1.Text
                  Exit Sub
               End If
           Next
        End If
End Sub

Private Sub Form_Load()
        Dim i As Integer
        
        For i = 0 To 10
            Combo1.AddItem "abcd" & i
        Next
        
        Combo1.ListIndex = 0
        Text1.Text = ""
End Sub

[fooltutu]

下拉列表中的选项是固定的．鼠标选择后就可以立即响应

[东方之珠]

[Quote=引用 4 楼 fooltutu 的回复:]
下拉列表中的选项是固定的．鼠标选择后就可以立即响应
[/Quote]

将结果传递进去是什么意思?