更明白点……
Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = 90
Text1 = String(2, "*")
Text1.SelStart = 1
End Sub

快上课了……
更明白点……
Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = 90
Text1 = String(2, "*")
Text1.SelStart = 1
End Sub
更明白点……