Question

vb中设置一段关于输入一段密码，按回车显示内容的代码，回车怎么表示？

Answer 1

'''窗体需要一个textbox
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then MsgBox Text1.Text '文本框是没value这个属性的,回车的ascii码为13
'这里也可以用If KeyAscii = vbKeyReturn Then 来判断
End Sub

Answer 2

Private Sub txtPWD_KeyDown(KeyCode As Integer, Shift As Integer)'KeyDown为键盘按下事件
If KeyCode = 13 Then'13为回车键
MsgBox txtPWS.Value
End If
End Sub

Answer 3

Private sub Form_load()
text1.passwordchar="*"
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then text1.passwordchar=""
End Sub

Answer 4

CHR(13)