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

admin2016-12-29  32

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

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

选项

答案第1小题 【操作步骤】 步骤1:新建一个“标准EXE”上程,选择【工具】→【菜单编辑器】命令,打开菜单设计器,如表3.77中的设置建立菜单项。 [*] 步骤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 ml—C1iCk() Textl.Font.Bold=True End Sub Private Sub m3一C1ick() Textl.Font.Underiine=True End Sub Private Sub m2一C1ick() Textl.Font.ItaliC=True End Sub 步骤4:按要求将文件保存至考生文件夹中。 【特别提示】文奉框不具有PopupMenu方法。 第2小题 【操作步骤】 步骤1:打开考生文件夹下的本题工程文件sjr4.Vbp。 步骤2:设置两个窗体的相关属性,其属性及值如表3.78所示。 [*] 步骤3:打开Forml的代码编辑窗门,去掉程序中的注释符“*”,将问号“?”改为正确的内容。 参考代码: Form2.Show Fore2.Print Forml.Framel.Caprion”:”; If Forml.Opl(k).Value Then Text2.PasswordChar=”★” 步骤4:按要求将文件保存至考生文件夹中。

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

最新回复(0)