在名称为Form1的窗体上画一个名称为L1的标签,标题为“口令”;画两个文本框,名称分别为Text1、Text2,都没有初始内容;再画三个命令按钮,名称分别为C1、C2、C3,标题分别为“显示口令”、“隐藏口令”、“复制口令”,在开始运行时,向Text1中

admin2016-01-31  34

问题 在名称为Form1的窗体上画一个名称为L1的标签,标题为“口令”;画两个文本框,名称分别为Text1、Text2,都没有初始内容;再画三个命令按钮,名称分别为C1、C2、C3,标题分别为“显示口令”、“隐藏口令”、“复制口令”,在开始运行时,向Text1中输入的所有字符,都显示“*”,单击“显示口令”按钮后,在Text1中显示所有字符,再单击“隐藏口令”后,Text1中的字符不变,但显示的都是“?”,单击“复制口令”后,把Text1中的实际内容复制到TeXt2中,如图3-13所示。
   
    要求:
    ①在属性窗口中,把窗体的标题改为“口令窗口”。
    ②建立适当的事件过程,完成上述功能。每个过程中只允许写一条语句,且不能使用变量。
    存盘时,工程文件名为sjt3.vbp,窗体文件名为sjt3.frm。

选项

答案审题分析 PasswordChar属性用于设置屏蔽文本框中内容的字符,要去掉对文本框中输入内容的屏蔽,需将其PasswordChar属性值清空。该属性既可以在属性窗口设置,也可以在代码中进行设置。 操作步骤 步骤1:新建一个“标准EXE”工程,如表4-7在窗体中画出控件并设置其相关属性。 [*] 步骤2:在代码编辑窗口,分别编写三个按钮的单击事件过程。 参考代码: Private Sub C1_C1ick() Text1.PasSWOrdChar=" " End Sub Private Sub C2_C1ick() Text1.PaSSWOrdChar="?" End Sub Private Sub C3_C1ick() C3.Parent.Text2.Text=Text1.Text End Sub Private Sub Form_Load() Text1.PaSswordChar="*" End Sub 步骤3:按要求将文件保存至考生文件夹中。 考点链接 文本控件。

解析
转载请注明原文地址:https://kaotiyun.com/show/VuLp777K
0

最新回复(0)