首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Forml的窗体上画一个名称为Text1的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。请编写适当的事件过程,在运行时当用鼠标右键单击窗体时,弹出此菜单,
(1)在名称为Forml的窗体上画一个名称为Text1的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。请编写适当的事件过程,在运行时当用鼠标右键单击窗体时,弹出此菜单,
admin
2018-09-19
63
问题
(1)在名称为Forml的窗体上画一个名称为Text1的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。请编写适当的事件过程,在运行时当用鼠标右键单击窗体时,弹出此菜单,选中一个菜单项后,则按所选菜单标题设置文本框中文本的格式,如图3.145所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sit3.vbp,窗体文件名为sjt3.frm。
(2)在考生文件夹下有一个工程文件sit4.vbp,含有Forml和.Form2两个窗体,Forml为启动窗体,窗体上的控件如图3一146(a)所示。程序运行后,在Forml窗体的文本框中输入有关信息(“密码”框中显示“*”字符),然后单击“提交”按钮则弹出“确认”对话框(即Form2窗体),并在Form2中显示输入的信息,如图3—146(b)所示。单击“确认”按钮则程序结束,单击“重输”按钮,则Form2消失,回到Forml窗体。在给出的窗体文件中已经给出了程序,但不完整。
要求:
①把Forml的标题改为“注册”,把Form2的标题改为“确认”;
②设置适当的属性,使Form2标题栏上的所有按钮消失(如图3一146(b)所示);
③去掉程序巾的注释符,把程序中的?改为正确的内容。
注意:不能修改程序中的其他部分,标题等属性的修改只能在属性窗口中进行。最后把修改后的文件按原文件名存盘。
选项
答案
第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,选择【工具】→【菜单编辑器】命令,打开菜单设计器,按要求设置建立菜单项。 步骤2:在窗体中画一个文本框,取名为Text1。 步骤3:打开代码编辑窗口,分别编写“加粗”、“斜体”和“下划线”菜单项的事件过程。 参考代码: Private Sub Form MouseDown(Button As Integer r Shift As Integer, X As Single t Y As Single) If Button=2 Then PopupMenu format End If End Sub Private Sub ml Click() Text1.Font.Bold=True End Sub Private Sub m3 Click() Textl.Font.Underline=True End Sub Private Sub m2 C1ick() Textl.Font.Italic=True End Sub 步骤4:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件夹下的工程文件sjt4.vbp。 步骤2:按要求设置两个窗体的相关属性。 步骤3:打开Forml的代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: Form2.Show Form2.Print Forml.Framel.Caption;“:”; If Forml.Opl(k).Value Then Text2.PasswordChar=”*” 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/UhFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列与队列结构有关联的是
有如下程序:PrivateSubForm_Click() DimiAsInteger,nAsInteger Fori=1To20 i=i+4 n=n+i Ifi>10ThenExitFor
编写如下程序:PrivateSubCommand1_Click()DimnumAsIntegerDimkAsInteger,nAsIntegernum=InputBox("请输入一个正整数:")k
以下数列:1,1,2,3,5,8,13,21,…的规律是从第3个数开始,每个数是它前面两个数之和。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图所示。请编写适当的事件过程实现以下功能:在Text1中输入整数40,单击“
假定有以下函数过程:FunctionFun(SAsString)AsString Dims1AsString Fori=1ToLen(S) s1=LCase(Mid(S,i,1))+s1 Next
下面关于标准模块的叙述中错误的是( )。
一个栈的初始状态为空。现将元素1、2、3、4、5、A、B、C、D、E依次入栈,然后再依次出栈,则元素出栈的顺序是( )。
为把变量a、b、c中的最大值赋值给变量x,下面语句中正确的是
一个栈的初始状态为空。现将元素A,B,C,D,E依次入栈,然后依次退栈三次,并将退栈的三个元素依次入队(原队列为空),最后将队列中的元素全部退出。则元素退队的顺序为
以下表达式与Int(3.5)的值相同的是()。
随机试题
在商业银行办理汽车消费贷款时,若借款人以所购汽车作为抵押,则存入银行的首期款不得少于购车款的_______。
复发性疱疹性口炎一般复发感染的部位是
通用名为二羟丙茶碱的药物俗称
在突发公共卫生事件应急处理工作中,有关单位和个人不配合有关技术人员调查、采样、技术分析和检验的,对有关责任人给予
依据《安全生产许可证条例》的规定,除民用爆破器材生产企业外,其他企业安全生产许可证的发证机关实行()级分工负责的体制。
“进行合同变更,签订附加协议,采取索赔手段”属于承包商根据合同实施偏差分析的结果应该采取的( )。
某严寒地区一星级酒店,地下3层,地上35层,建筑高度158m,总建筑面积105000m2,按照国家标准设置了相应的消防设施。位于建筑首层外墙附近,设置有消防水泵接合器。建筑屋顶设置高位消防水箱和稳压泵等稳压装置。室外消防用水由市政给水管
核定定员人数的方法中,()适用于在连续设备和装置开动的时间内,必须由单人看管或者或者多岗位多人看管的场合。
如果把文本框的Enabled属性设置为False并运行程序,则以下叙述中正确的是
They’relookingforan(experience)______managertofurtherimprovetheoverseasbusiness.
最新回复
(
0
)