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

admin2019-06-11  20

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

    要求:①在属性窗口中,把窗体的标题改为“口令窗口”。②建立适当的事件过程,完成上述功能。每个过程中只允许写一条语句,且不能使用变量。
    存盘时,工程文件名为sjt3.vbp,窗体文件名为sij3.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。

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

随机试题
最新回复(0)