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

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

admin2019-06-11  65
问题 在名称为Form1的窗体上画一个名称为Text1的文本框，再建立一个名称为Format的弹出式菜单，含三个菜单项，标题分别为“加粗”、“斜体”、“下划线”，名称分别为M1、M2、M3。请编写适当的事件过程，在运行时当用鼠标右键单击窗体时，弹出此菜单，选中一个菜单项后，则按所选菜单标题设置文本框中文本的格式，如图3-145所示。
   
    注意：存盘时必须存放在考生文件夹下，工程文件名为sjt3．vbp，窗体文件名为sjt3．frm。
选项
答案审题分析 要创建本题的弹出式菜单需先用菜单编辑器来建立菜单，并将其主菜单项的可见(即Visible)属性值设置为False，然后在窗体的MouseDown(或MouseIJp)事件过程中，判断该事件的Button参数值是否为2，若是则执行窗体的PopupMenu方法来显示菜单。 在相应菜单项的Click事件过程中，通过设置文本框的FontBold属性值、Fontltalic属性值和Font[Jnderline属性值为True，可分别将文本框中文本样式显示为加粗、斜体和下划线。 操作步骤 步骤1：新建一个“标准EXE”工程，选择【工具】→【菜单编辑器】命令，打开菜单设计器，按要求设置建立菜单项。 步骤2：在窗体中画一个文本框，取名为Text1。 步骤3：打开代码编辑窗口，分别编写“加粗”、“斜体”和“下划线”菜单项的事件过程。 参考代码： Private Sub Form MouseDown(Button As Integer，Shift As Integer，X As Single，Y AsSingle) If Button=2 Then PopupMenu format 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：按要求将文件保存至考生文件夹中。 考点链接 键盘和鼠标事件、菜单。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/KAUp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)