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

admin2010-09-02  36

问题 (1)在名称为Forml的窗体上画一个名称为Textl的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。请编写适当的事件过程,在运行时当用鼠标右键单击窗体时,弹出此菜单,选中一个菜单项后,则按所选菜单标题设置文本框中文本的格式,如图1-88所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt3.vbp,窗体文件名为sjt3.frm。

(2)在考生文件夹下有一个工程文件sjt4.vbp,含有Forml和Form2两个窗体,Forml为启动窗体,窗体上的控件如图1-89(a)所示。程序运行后,在Forml窗体的文本框中输入有关信息(“密码”框中显示“*”字符),然后单击“提交”按钮则弹出“确认”对话框(即Form2窗体),并在Form2中显示输入的信息,如图1-89(b)所示。单击“确认”按钮则程序结束,单击“重输”按钮,则Form2消失,回到Forml窗体。在给出的窗体文件中已经给出了程序,但不完整。
要求:
①把Form1的标题改为“注册”,把Form2的标题改为“确认”;
②设置适当的属性,使Form2标题栏上的所有按钮消失(如图1-89(b)所示);
③去掉程序中的注释符,把程序中的?改为正确的内容
注意:不能修改程序中的其他部分,标题等属性的修改只能在属性窗口中进行。最后把修改后的文件按原文件名存盘。

选项

答案 第l小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,选择【工具】→【菜单编辑器】命令,打开菜单设计器,如表2-46中的设置建立菜单项。 [*] 步骤2:在窗体中画一个文本框,取名为Textl。 步骤3:打开代码编辑窗口,分别编写“加粗”、“斜体”和“下划线”菜单项的事件过程。 参考代码: PriVate Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) If Button=2 Then PopupMenu format End If End Sub PriVate Sub m1_Cl ick() Textl.Font.Bold=True End Sub PriVate Sub m3_Click() Textl.Font.Underline=True End Sub PriVate Sub m2_Click() Textl.Font.Italic=True End Sub 步骤4:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件夹下的本题工程文件sjl4.vbp。 步骤2:设置两个窗体的相关属性,其属性及值如表2-47所示。 [*] 步骤3:打开Forml的代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: Form2.Show Form2.Print Forml.Frame1..Caption; ":"; If Forml.Opl(k).Value then Text2.PasswordChar="*" 步骤4:按要求将文件保存至考生文件夹中。

解析  第l小题
    ①鼠标事件分点击事件和状态事件。点击事件有单击事件(Click)和双击事件(DblClick),不区分左、右键;状态事件有按下事件(mousedown)、移动事件(mousemove)和弹起事件(mouseup)。  状态事件涉及Button、Shift两个参数:Button参数是一个整数,值可能为l(左键)、2(右键)或4(中间键);Shift参数也是一个整数,用来代表用户是否按下键(值为1)、键(值为2)、键(值为4)或这些键的组合。
    ②弹出式菜单是显示于窗体之上,独立于菜单栏的浮动式菜单。PopupMvnu方法可在对象上的当前鼠标位置或指定的坐标位置显示弹出式菜单。
    要创建本题的弹出式菜单需先用菜单编辑器来建立菜单,并将其主菜单项的可见(即Visible)属性值设置为False,然后在窗体的MouseDown(或MouseUp)事件过程中,判断该事件的Button参数值是否为2,若是则执行窗体的PopupMenu方法来显示菜单。
    在相应菜单项的Click事件过程中,通过设置文本框的FontBold属性值、Fontlmlic属性值、FontStrikethru属性值和FontUnderline属性值为True,可分别将文本框中文本样式显示为加粗、斜体、删除线和下划线。
第2小题
    ①在实际应用中,较为复杂的应用程序通常由多个窗体组成,且可设置其中一个为启动窗体,只有启动窗体才能在运行程序时自动加载并显示出来。②在多个窗体组成的程序中,可以在一个窗体中读取另一个窗体中控件的属性值,其语法格式为:窗体名称.控件名称.属性名称。③标准模块(文件扩展名为.BAS)是应用程序内其他模块可访问的过程和声明的容器。它们可以包含变量、常数、类型、外部过程和全局过程的全局(在整个应用程序范围内有效的)声明或模块级声明。
    在Forml的单击事件中,首先显示出Form2,然后按照要求在Form2上先后显示出Forml中的信息,其中单选按钮组需要使用If语句判断是哪个按钮被选中。文本框的PasswordChar属性可以设置文本框中显示的密码形式。
转载请注明原文地址:https://kaotiyun.com/show/ETmp777K
0

最新回复(0)