首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1的窗体上画一个名称为Text1的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。请编写适当的事件过程,在运行时当用鼠标右键单击窗体时,弹出此菜单,
(1)在名称为Form1的窗体上画一个名称为Text1的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。请编写适当的事件过程,在运行时当用鼠标右键单击窗体时,弹出此菜单,
admin
2018-10-29
46
问题
(1)在名称为Form1的窗体上画一个名称为Text1的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。请编写适当的事件过程,在运行时当用鼠标右键单击窗体时,弹出此菜单,选中一个菜单项后,则按所选菜单标题设置文本框中文本的格式,如图3-149所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt3.vbo,窗体文件名为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 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 S1ab 步骤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/B3Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要求如果x被7除余2,则输出x的值,下列语句中不能实现此功能的语句是( )。
窗体上已有1个名称为Picture1的图片框,要求实现下面2个功能之一:(1)在窗体上移动鼠标时,立即将Picture1显示在鼠标位置(2)在窗体上单击鼠标时,立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件过程是
在窗体上添加"控件"的正确的操作方式是( )。
求1!+2!+……+10!的程序如下:PrivateFunctions(xAsInteger) f=1 Fori=1Toxf=f*i Next s=fEndFunctionPrivateSubCommand1
某人编写了下面的程序,希望能把Text1文本框中的内容写到out.txt文件中:PrivateSubCommand1_Click() Open"out.txt"ForOutputAs#2 Print"Text1" Close
可以产生30~50(含30和50)之间的随机整数的表达式是( )。
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
命令按钮Command1的事件过程如下:PrivateSubCommand1_Click() Dimarr(5,5)AsInteger DimiAsInteger,jAsInteger Fori=1To4
工程中有Form1、Form2两个窗体(Forml中有文本框Text1,Form2中有Text1文本框和command1命令按钮)。Form1是启动窗体。在这些模块中编写下面的程序代码:Form1中的代码如下:PrivateS
随机试题
甲、乙、丙是某公司的股东,乙所持股份的实际出资人为丁,甲、丙对此知情,未提出异议。后乙将所持股份全部转让给甲,并办理了转让登记。下列说法哪一项是正确的?
我国刑事审判模式正处于由职权主义走向控辩式的改革过程之中,2012年《刑事诉讼法》修改内容中,下列哪一选项体现了这一趋势?()
溩湖相和三角洲相是海陆过渡相中与()关系最密切的沉积相。
下列各项中,对白细胞减少症有诊断意义的是()
胎头衔接是指
下列哪些是属于国家电压标准等级的()
阅读下面这首诗,写一篇500字左右的鉴赏评论文章。约客南宋.赵师秀黄梅时节家家雨,青草池塘处处蛙。有约不来过夜半,闲敲棋子落灯花。
如果一台微机的显示存储器VRAM的容量为256KB,它能存放80列×25行字符的屏幕数为( )。
Inthe1950s,thepioneersofartificialintelligence(AI)predictedthat,bytheendofthiscentury,computerswouldbeconvers
IhavebeenteachingforlongerthanIcaretosay,andalwaysofferacourseforenteringfreshmen.AndI’vediscoveredsomet
最新回复
(
0
)