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

admin2020-02-27  24

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

    (2)在名称为Form1的窗体上画一个名称为P1的图片框,并利用属性窗口把考生目录中的图标文件Open.ico放到图片框中;再画一个通用对话框控件,名称为CD1,利用属性窗口设置相应属性,即打开对话框时:标题为“打开文件”,文件类型为“Word文档”,初始目录为C盘根目录。再编写适当的事件过程,使得在运行时,单击P1图片框,可以打开上述对话框。运行后的窗体如图3.86所示。

    注意:存盘时必须存放在考生文件夹下,工程文件名为sjt4.vbp,窗体文件名为sjt4.frm。程序中不得使用任何变量。

选项

答案(1)步骤1:新建一个“标准EXE”工程,如表4.53在窗体中画出控件并设置其相关属性。 [*] 步骤2:在代码编辑窗口,分别编写三个按钮的单击事件过程。参考代码: Private Sub C1_Click() Text1.PasSWordChar="" End Sub Private Sub C2_Click() Text1.PassWordChar="?" End Sub Private Sub C3_Click() C3.Parent.Text2.Text=Text1.Text End Sub Private Sub Form Load() Text1.PassWordChar="*" End Sub 步骤3:按要求将文件保存至考生文件夹中。 (2)步骤1:新建一个“标准EXE”工程,如表4.54在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写如下事件过程。 参考代码: Private Sub P1_Click() CD1.ShowOpen End Sub 步骤3:按要求将文件保存至考生文件夹中。 注意:打开“打开文件”对话框还可使用语句: cdlOpen.Action=1。

解析 (1)PasswordChar属性用于设置屏蔽文本框中内容的字符,要去掉对文本框中输入内容的屏蔽,需将其PasswordChar属性值清空。该属性既可以在属性窗口设置,也可以在代码中进行设置。
    (2)本题需按要求在图片框的单击事件过程中,通过调用通用对话框的ShowOpen方法实现。
转载请注明原文地址:https://kaotiyun.com/show/93Tp777K
0

最新回复(0)