(1)在名称为Form1的窗体上画一个名称为Text1的文本框，再建立一个名称为Format的弹出式菜单，含三个菜单项，标题分别为“加粗”、“斜体”、“下划线”，名称分别为M1、M2、M3。请编写适当的事件过程，在运行时当用鼠标右键单击窗体时，弹出此菜单，

admin2017-10-27 51

问题 (1)在名称为Form1的窗体上画一个名称为Text1的文本框，再建立一个名称为Format的弹出式菜单，含三个菜单项，标题分别为“加粗”、“斜体”、“下划线”，名称分别为M1、M2、M3。请编写适当的事件过程，在运行时当用鼠标右键单击窗体时，弹出此菜单，选中一个菜单项后，则按所选菜单标题设置文本框中文本的格式，如图3—149所示。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt3．vbp，窗体文件名为sjt3．frm。
(2)在考生文件夹下有一个工程文件sjt4．vbp，含有Form1和Form2两个窗体，Form1为启动窗体，窗体上的控件如图3—150(a)所示。程序运行后，在Form1窗体的文本框中输入有关信息(“密码”框中显示“*”字符)，然后单击“提交”按钮则弹出“确认”对话框(即Form2窗体)，并在Form2中显示输入的信息，如图3—150(b)所示。单击“确认”按钮则程序结束，单击“重输”按钮，则Form2消失，回到Form1窗体。在给出的窗体文件中已经给出了程序，但不完整。要求：
①把Form1的标题改为“注册”，把Form2的标题改为“确认”；②设置适当的属性，使Form2标题栏上的所有按钮消失(如图3—150(b))所示)；③去掉程序中的注释符，把程序中的“?”改为正确的内容。

注意：不能修改程序中的其他部分，标题等属性的修改只能在属性窗口中进行。最后把修改后的文件按原文件名存盘。

选项

答案(1)【操作步骤】【操作步骤】步骤1：新建一个“标准EXE”工程，选择【工具】→【菜单编辑器】命令，打开菜单设计器，按要求设置建立菜单项。步骤2：在窗体中画一个文本框，取名为Text1。步骤3：打开代码编辑窗口，分别编写“加粗”、“斜体”和“下划线”菜单项的事件过程。参考代码： Private Sub Form_MOuseDown(Button AS Integer ,Shift As Integer,X As Single, Y As Single) If Button＝2 Then PopupMenu fo rmat End If End Sub Private Sub m1_Click() Text1．Font．Bold＝True End Sub Private Sub m3_Click() Text1．Font．Underline＝True End Sub Private Sub m2_Click() Text1．Font．Italic＝True End Sub 步骤4：按要求将文件保存至考生文件夹中。 (2)【操作步骤】步骤1：打开考生文件夹下的工程文件sjt4．vbp。步骤2：按要求设置两个窗体的相关属性。步骤3：打开Form1的代码编辑窗口，去掉程序中的注释符“’”，将问号“?”改为正确的内容。参考代码： Form2．Show Form2．Print Form1．Frame1．Caption；"："； If Form1．Op1(k)．Value Then Text2．PaSSWOrdChar＝“*” 步骤4：按要求将文件保存至考生文件夹中。

解析

转载请注明原文地址:https://kaotiyun.com/show/sVGp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

0

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)