VB编程,帮帮忙,急要~~

来源:百度知道 编辑:UC知道 时间:2024/05/31 18:03:40
在名称为FORM1的窗体画一个名称为L1的标签,标题为“口令”;画两个文本框,名称分别为Text1,Text2,都没有初始内容;再画3个命令按钮,名称分别为C1,C2,C3,标题分别为“显示口令”,“隐藏口令”,“复制口令”,在开始运行时,向TEXT1中输入的所有字符,都显示“*”,单击显示口令后,在TEXT1中显示所有字符,再单击“隐藏口令”后,TEXT1的字符内容不变,但显示的都是“?”,单击复制口令后,把TEXT1中的实际内容复制到TEXT2中。
要求:每个过程只允许写一条语句,且不能使用变量

Private Sub C1_Click()
Text1.PasswordChar = ""
End Sub

Private Sub C2_Click()
Text1.PasswordChar = "?"
End Sub

Private Sub C3_Click()
Text2.Text = Text1.Text
End Sub

Private Sub Form_Load()
Text1.PasswordChar = "*"
End Sub

============
要求每个过程都一条语句 以下代码在属性栏里设置

L1.Caption = "口令"
Text1.Text = ""
Text2.Text = ""
C1.Caption = "显示口令"
C2.Caption = "隐藏口令"
C3.Caption = "复制口令"

Private Sub C1_Click() '显示口令
Text1.PasswordChar = ""
End Sub

Private Sub C2_Click() '隐藏口令
Text1.PasswordChar = "?"
End Sub

Private Sub C3_Click() '复制口令
Text2.Text = Text1.Text
End Sub

Private Sub Form_Load() '运行后显示*
Text1.PasswordChar = "*"
End Sub

在属性窗口中将Text1的 属性 Pass