首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1的窗体上添加一个名称为Text1的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。请编写适当的事件过程,在程序运行时,当用鼠标右键单击文本框时,弹
(1)在名称为Form1的窗体上添加一个名称为Text1的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。请编写适当的事件过程,在程序运行时,当用鼠标右键单击文本框时,弹
admin
2015-06-30
32
问题
(1)在名称为Form1的窗体上添加一个名称为Text1的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。请编写适当的事件过程,在程序运行时,当用鼠标右键单击文本框时,弹出菜单,选中一个菜单项后,则按所选菜单标题设置文本框中文本的格式,如图所示。
注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt3.vbp,窗体文件名保存为sjt3.frm。
(2)在考生文件夹下有一个工程文件sjt4.vbp,含有Form1和Form2两个窗体,其中Form1为启动窗体,窗体上的控件如图1所示。程序运行后,在Form1窗体的文本框中输入有关信息(如“密码”文本框中显示“母”字符),然后单击“提交”按钮,弹出“确认”对话框(Form2窗体),并在Form2中显示Form1中输入的信息,如图2所示。单击“确认”按钮,程序结束,单击“重输”按钮,Form2消失,回到Form1窗体。在给出的窗体文件中已经给出了程序,但不完整。
要求:
①将Forml的标题改为“注册”,将Form2的标题改为“确认”;
②设置适当的属性,使Form2标题栏右上角的所有按钮消失(如图2所示);
③去掉程序中的注释符,把其中的?改为正确的内容。
注意:不能修改程序中的其他部分,标题等属性的修改只能在属性窗口中进行。最后将修改后的文件按原文件名存盘。
选项
答案
(1)【操作步骤】 步骤1:新建一个窗体,按照题目要求建立文本框控件及一个弹出式菜单并设置菜单属性。 步骤2:设置子菜单项的相关属性,程序中用到菜单属性见表3.37。 [*] 步骤3:分析并编写程序代码。 参考答案 Private Sub M1_Click() Text1.FontBold = True End Sub Private Sub M2_Click() Text1.FontItalic = True End Sub Private Sub M3_Click() Text1.FontUnderline = True End Sub Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then Me.PopupMenu Format End If End Sub 步骤4:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:打开本题工程文件,按照题目要求设置属性,将Form1的Caption属性设置为"注册",将Form2的Caption属性设置为"确认",然后将Form2的ControlBox属性设置为False。 步骤2:分析并编写程序代码。 程序提供代码 Form1代码 Private Sub C1_Click() Dim k As Integer ’ Form2. ? Form2.Print Form1.L1.Caption; Form1.Text1 Form2.Print Form1.L2.Caption; Form1.Text2 Form2.Print Form1.L3.Caption; Form1.Text3 ’ Form2.Print Form1.Frame1. ? ; ":"; For k = 0 To 1 ’ If Form1.Op1( ? ).Value Then Form2.Print Form1.Op1(k).Caption End If Next k End Sub Private Sub Form Load() ’ Text2. ? = "*" End Sub Form2代码 Private Sub C1_Click() End End Sub Private Sub C2_Click() Unload Form2 End Sub 程序结束 参考答案 第1个?处填入:Show 第2个?处填入:Caption 第3个?处填入:k 第4个?处填入:PasswordChar 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/0cQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
文件的打开和关闭语句分别是【】和【】。
假定有下面的程序段:Fori=1To3Forj=1ToiFork=jTo3Print"i=";i,"j=";j,"k=";kNext
完全不考虑程序的内部结构和内部特征,而只是根据程序功能导出测试用例的测试方法是
结构化程序设计方法的主要原则可以概括为自顶向下、逐步求精【】和限制使用goto语句。
下列程序段的执行结果为DimM(10)Fork=1To10M(k)=11-kNextkx=6PrintM(2+M(x))
测试的目的是暴露错误,评价程序的可靠性;而【】的目的是发现错误的位置并改正错误。
决定控件上文字的字体、字形、大小、效果的属性是______。
为了把一个记录型变量的内容写入文件中指定的位置,所使用的语句的格式为______。
设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框PrivateSubCommand1_Click()CDl.DialogTitle=“打开文件”CDl.InitDir=“C:\”CDl.Filter=“所有文件
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的,在名称为Forml的窗体上有一个Label控件和两个名称分别为Commandl和Command2、标题分别为“开始”和“关闭”的命令按钮。编写函数Minus(A,N),其功能
随机试题
A、ADRB、OTCC、DIDD、TallaridaE、Rx药源性疾病的英文简称()
监控量测必测项目按位移变化速率控制量测频率时,当位移速度≥5mm/d时,监控量测频率宜为()。
有关仲裁的叙述中,正确的是( )。
某项工程项目分解后,根据工作间的逻辑关系绘制的双代号网络计划如下图所示。工程实施到第12天末进行检查时各工作进展如下:A、B、C三项工作已经完成,D与G工作分别已完成5天的工作量,E工作完成了4天的工作量。问题:哪些工作是关键工作?
一般人对战地记者的理解往往肤浅片面,如果说得好听点,就是过于浪漫化了。让大家动心的,是战地记者的“帅”“酷”,是那种从事着_______的工作,行走在死亡边缘,享受英雄般注目的_______。依次填入画横线部分最恰当的一项是()。
IRT的项目特征曲线上的位置与项目特征函数之间的关系说法正确的是
在黄炎培看来,“职业教育机关唯一的生命”是
A、 B、 C、 D、 C
--It’srathercold,isn’tit?--Yes,Ithinkso.You’dbetter______yourcoat.
A、ThereisnoofficiallawsandregulationsinSomalia.B、ThebirthdocumentsinSomaliaarekeptconfidential.C、Somaliahasno
最新回复
(
0
)