vb猜密码小程序中怎么把输入的密码显示为“*”

不 在text属性中 有一个passwordchar 把他调成 " * " 这个是专门为密码所设置的属性
窗体没有这个属性

语法

object.PasswordChar [= value]

PasswordChar 属性的语法包含下面部分：

部分 描述
Object 对象表达式，其值是“应用于”列表中的一个对象。
Value 一个指定占位符的字符串表达式。

说明

为了在对话框中创建一个密码域应使用此属性。虽然能够使用任何字符，但是大多数基于 Windows 的应用程序使用星号 (*) (Chr(42))。

此属性不影响 Text 属性；Text 准确地包括所键入或代码中所设置的内容。将 PasswordChar 设置为长度为 0 的字符串 ("") （缺省值），将显示实际的文本。

能够将任意字符串赋予此属性，但只有第一个字符是有效的，所有其它的字符将被忽略。

注意 如果 MultiLine 属性被设为 True，那么设置 PasswordChar 属性将不起效果。

Private Sub Form_Click() '单击窗体时发生
Open "c:\1.txt" For Input As #1'打开文到指定文件号为1
For i = 1 To 5 '循环5次
Line Input #1, x '用读出的每一行数据画线
Print x '输出X
Next i '结束循环
Close #1 '关闭文件
End Sub '事件结束

只要在窗体的PasswordChar 的属性里 填 * 即可。