combobox控件怎么改变为中文（combobox控件）

大家好,乐天来为大家解答以下的问题，关于combobox控件怎么改变为中文，combobox控件这个很多人还不知道,现在让我们一起来看看吧！

1、VB combo 随输入内容 调整下拉框 Option Explicit Dim namestr() Private Sub Form_Load() ReDim namestr(1 To 5) namestr(1) = "陈好" namestr(2) = "陈很好" namestr(3) = "陈特好" namestr(4) = "陈贼好" namestr(5) = "陈好不好" End Sub Private Sub Combo1_Change() Static a As Boolean If a Then Exit Sub Dim i As Integer Dim p As Integer Dim s As String a = True If Combo1.Text = "" Then Exit Sub p = Combo1.SelStart s = Combo1.Text Combo1.Clear For i = 1 To 5 If InStr(1, namestr(i), s) = 1 Then Combo1.AddItem namestr(i) Next i Combo1.Text = s Combo1.SelStart = p a = False End Sub。

本文分享完毕，希望对大家有所帮助。

标签：

免责声明：本文由用户上传，如有侵权请联系删除！