实现的方法和详细的操作步骤如下：
1、第一步，设置程序界面，包括标签，文本框和命令按钮，如下图所示，然后进入下一步。
2、其次，完成上述步骤后，根据标题的要求设置对象的属性，如下图所示，然后进入下一步。
3、接着，完成上述步骤后，编写程序代码。
首先要定义变量，如下图所示，然后进入下一步。
4、然后，完成上述步骤后，使用“For-Next”循环结构语句进行代码的编写，如下图所示，然后进入下一步。
5、随后，完成上述步骤后，在“For-Next”循环结构语句中，必须嵌套“If”语句，如下图所示，然后进入下一步。
6、最后，完成上述步骤后，开始运行程序，输入一个正数以验证结果，如下图所示。这样，问题就解决了。
1、设置程序界面，包括标签，文本框，命令按钮。
2、再按照题目要求，设置对象的属性。
3、编写程序的代码。先定义变量。
4、使用For-Next循环结构语句，编写的代码。
5、在For-Next循环结构语句中，还要再嵌套一个If语句。
6、运行程序，输入某个正数，验证结果。
1、修改文本框的PasswordChar属性可以做到。
2、vb6示例：（在窗体上添加text1文本框）
Private Sub Form_Load()Text1.PasswordChar = "*"
End Sub本回答被网友采纳
设置成“*”向文本框输入时便显示为*
vb中在文本框text1中输入的英文字母一律用大写显示的程序怎么写!!!
Private Sub Text1_Change()Dim i As Long i = Text1.SelStart Text1.Text = UCase$(Text1.Text)Text1.SelStart = i End Sub
VB程序设计中如何让文本框中的字符变成星号?
在文本框的passwordchar属性里改为*就可以了 本回答由网友推荐 举报| 答案纠错 | 评论 13 0 其他回答 在文本框的passwordchar属性里改为*就可以了。 例如:Private Sub Command1_Click()If Text1 = "" Then MsgBox "请输入关键字"WebBrowser1.SetFocus '先得到焦点SendKeys Text1 '发送SendKeys "{enter}"...
VB怎样让TEXT文字显示为“*”字符号
text1.passwordchar="*"或者可以在属性窗口中更改passwordchar属性为
vb程序让输入在text中的文字显示的代码?
在该子程序中，我们首先定义了一个字符串`s`，其内容为"123hello@?"。然后，通过调用`Text1.Text = ""`清空文本框的内容，并将字符串`s`与空格`Space(32 - Len(s))`连接起来，确保文本框不会超过其显示限制。最后，通过设置`Timer1.Enabled = True`和`Timer1.Interval = 500`，我们能够以...
vb中如何使text1中输入内容立即显示在text2中
输入如下代码：PrivateSubForm_Load()Text1.Text=""。Text2.Text=""。EndSub。PrivateSubText1_Change()。Text2.Text=Text1.Text。EndSub。操作要点：1、设置程序界面，包括标签，文本框，命令按钮。2、再按照题目要求，设置对象的属性。3、编写程序的代码。先定义变量。4、使用For-Next循环结构语句...
用VB怎样把输入的密码变成星号(*)显示出来?
在一般性的编程中，主要涉及到三类：属性、方法和事件。其中属性PasswordChar 获取或设置字符，该字符用于屏蔽单行。把文本框的passwordchar属性设置为"*"，可以在属性窗口直接设置，也可以在程序中使用代码设置。例如：Private Sub Form_Load()Text1.PasswordChar = "*"End Sub ...
VB中如何在文本框内输入文字的同时,在标签上显示文本框中的文字
代码如下：1、方法一：text1.passwordchar = "*"sub command1_click()label1.caption =text1.text end sub 2、方法二：sub command1_click()label1.caption = string("*",len(text1.text))end sub
VB6.0中如何实现在Textbox中输入任何字母或数字显示出来都是星号“*...
你点击那个text1，然后找他的属性框，就是修改name或者字体之类的那个框，找到passwordchar,输入*就OK了
vba输入的密码怎么显示为星号,求修改!
建议你使用自定义用户窗体，添加一个 TextBox，修改它的属性：PasswordChar ="*" ，然后就可以轻松实现你的要求了！
VB 要求在文本框中输入的口令都以“*”显示。程序运行后,单击“校验...
运行如下图 代码如下 Private Sub Command1_Click() If Text1.Text = "ABC" Then MsgBox "正确" Else MsgBox "错误" End IfEnd SubPrivate Sub Form_Load() Label1.Caption = "请输入口令：" Text1.PasswordChar = "*" Text1 = "" Command1.Caption = "校验...
