vb文本框输入6个字符且显示为****

vb文本框输入6个字符且显示为****

Private Sub Text1_Change()
Combo1.Clear
Combo1.AddItem Text1.Text
End Sub
温馨提示:答案为网友推荐,仅供参考