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

admin2016-03-22  37

问题 (1)在名称为Forml的窗体上画一个名称为Ll的标签,标题为“口令”;画两个文本框,名称分别为Text1、Text2,都没有初始内容;再画三个命令按钮,名称分别为C1、C2、C3,标题分别为“显示口令”、“隐藏口令”、“复制口令”,在开始运行时,向Textl中输入的所有字符,都显示“*”,单击“显示口令”按钮后,在Textl中显示所有字符,再单击“隐藏口令”后,Text1中的字符不变,但显示的都是“?”,单击“复制口令”后,把Text1中的实际内容复制到Text2中,如图3.13所示。

要求:
①在属性窗口中,把窗体的标题改为“口令窗口”。
②建立适当的事件过程,完成上述功能。每个过程中只允许写一条语句,且不能使用变量。
存盘时,工程文件名为sit3.vbp,窗体文件名为sit3.frm。
(2)在名称为Forml的窗体上画一个名称为P1的图片框,并利用属性窗口把考生目录中的图标文件Open.ico放到图片框中;再画一个通用对话框控件,名称为CDl1,利用属性窗口设置相应属性,即打开对话框时:标题为“打开文件”,文件类型为“Word文档”,初始目录为C盘根目录。再编写适当的事件过程,使得在运行时,单击P1图片框,可以打开上述对话框。运行后的窗体如图3.14所示。

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

选项

答案第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,如表4.7在窗体中画出控件并设置其相关属性。 [*] 步骤2:在代码编辑窗口,分别编写三个按钮的单击事件过程。 参考代码: Private Sub C1 C1ick() Textl.PaSswordChar=“” End Sub Private Sub C2 Click() Textl.PaSswordChar=“?” End Sub Private Sub C3 Click() C3.Parent.Text2.Text=Textl.Text End Sub Private Sub Form Load() Text1.PaSSWOrdChar=“*” End Sub 步骤3:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,如表4.8在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写如下事件过程。 参考代码: Private Sub P1 C1ick() CD1.ShowOpen End Sub 步骤3:按要求将文件保存至考生文件夹中。

解析
转载请注明原文地址:https://jikaoti.com/ti/F1J0FFFM
0

最新回复(0)