首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1的窗体上画一个名称为Text1的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。请编写适当的事件过程,在运行时当用鼠标右键单击窗体时,弹出此菜单,
(1)在名称为Form1的窗体上画一个名称为Text1的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。请编写适当的事件过程,在运行时当用鼠标右键单击窗体时,弹出此菜单,
admin
2017-03-27
21
问题
(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小题 步骤l:新建一个“标准EXE”工程,选择[工具]→[菜单编辑器]命令,打开菜单设计器,按要求设置建立菜单项。 步骤2:在窗体中画一个文本框,取名为Text1。 步骤3:打开代码编辑窗口,分别编写“加粗”、“斜体”和“下划线”菜单项的事件过程。 参考代码: Private Sub Form_MouseDown(Button As Integer,Shift AS Integer,X As Single,Y As Single) If Button=2Then 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:按要求将文件保存至考生文件夹中。 第2小题 步骤1:打开考生文件夹下的工程文件sjt4.vbp。 步骤2:按要求设置两个窗体的相关属性。 步骤3:打开Form1的代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: Form2.Show Form2.Print Form1.Frame1.Caption;": "; If Form1.Op1(k).Value Then Text2.PasswordChar="*" 步骤4:按要求将文件保存至考生文件夹中。
解析
第1小题:要创建本题的弹出式菜单需先用菜单编辑器来建立菜单,并将其主菜单项的可见(即Visible)属性值设置为False,然后在窗体的MouseDown(或MouseUp)事件过程中,判断该事件的Button参数值是否为2,若是则执行窗体的PopupMenu方法来显示菜单。
在相应菜单项的Click事件过程中,通过设置文本框的FontBold属性值、Fontltalic属性值和FontUnderline属性值为Truc,可分别将文本框中文本样式显示为加粗、斜体和下划线。
第2小题:在Form1的单击事件中,首先显示出Form2,然后按照要求在Form2上先后显示出Form1中的信息,其中单选按钮组需要使用lf语句判断是哪个按钮被选中。文本框的PasswordChar属性可以设置文本框中显示的密码形式。
转载请注明原文地址:https://jikaoti.com/ti/WOy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上命令按钮Commandl的事件过程如下:PrivateSubCommand1_Click()DimtotalAsIntegertotal=s(1)+s(2)PrinttotalEndSubPrivateFunctions
窗体上有一个命令按钮Command1和一个列表框List1。先选择列表框中的某一个项目,然后单击命令按钮,将该项目从列表框删除。程序如下:PrivateSubCommand1_Click()DimInAsIntegerIn=______L
按照“先进后出”原则组织数据的数据结构是()。
在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和Command1,然后编写如下两个事件过程:PrivateSubCommand1_Click()strText=InputBox("请输入"
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimnumAsIntegernum=1DoUntilnu
设有如下通用过程:PublicSubFun(a()AsInteger,xAsInteger)Fori=1To4x=x*a(i)NextEndSub
下列特征中不是面向对象方法的主要特征的是()。
以下叙述中正确的是()。
要清除已经在图片框Picture1中打印的字符串而不清除图片框中的图像,应使用语句()。
在文本框控件中,将Text的内容全部显示为用户所定义的字符的属性是()。
随机试题
D公司为某企业集团的一个投资中心,X是D公司下设的一个利润中心,相关资料如下:资料一:2018年X利润中心的营业收入为120万元,变动成本为72万元,该利润中心副主任可控固定成本为10万元,不可控但应由该利润中心负担的固定成本为8万元。资料二:D公司2
保持物质原有成分和—切化学性质的最小微粒子是()。
以下对长期平均成本曲线的描述中,正确的是()
不是说做女神,我希望我们都做个“海化”的青年。像涵说的,海是温柔而沉静。杰说的,海是超绝而威严。楫说得更好了,海是神秘而有容,也是虚怀,也是广博……“希望我们都做个‘海化’的青年"一句表达了作者的什么思想?
患者小便量多,混浊如膏,面色黧黑,耳轮焦干,腰膝酸软,形寒肢冷,伴多饮,舌淡白,脉沉细无力,辨病为
关于行政强制的设定,下列哪些说法是错误的?
金融脱媒效应是指非金融部门的融资需求从向股市和债市直接融资转为向银行借贷,进而导致银行贷款占比的上升。()
实行财政授权支付的支出包括()。
在回归分析中,考察回归效果使用的指标是()
设某一时点我国流通中现金为10000亿元,居民活期储蓄存款20000亿元,居民定期储蓄存款40000亿元,农村存款8000亿元,企业活期存款9000亿元,企业定期存款7000亿元,机关团体部队存款6000亿元,其他存款4000亿元。试计算M
最新回复
(
0
)