首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp,含有Forml和Form2两个窗体,其中Forml为启动窗体,窗体上的控件如图l所示。程序运行后,在Forml窗体的文本框中输入有关信息(如“密码”文本框中显示“*”字符),然后单击“提交”按钮,弹出“确认”对
在考生文件夹下有一个工程文件sjt4.vbp,含有Forml和Form2两个窗体,其中Forml为启动窗体,窗体上的控件如图l所示。程序运行后,在Forml窗体的文本框中输入有关信息(如“密码”文本框中显示“*”字符),然后单击“提交”按钮,弹出“确认”对
admin
2020-04-08
66
问题
在考生文件夹下有一个工程文件sjt4.vbp,含有Forml和Form2两个窗体,其中Forml为启动窗体,窗体上的控件如图l所示。程序运行后,在Forml窗体的文本框中输入有关信息(如“密码”文本框中显示“*”字符),然后单击“提交”按钮,弹出“确认”对话框(Form2窗体),并在Form2中显示Forml中输入的信息,如图2所示。单击“确认”按钮,程序结束,单击“重输”按钮,Form2消失,回到.Forml窗体。在给出的窗体文件中已经给出了程序,但不完整。
要求:
①将:Forml的标题改为“注册”,将Form2的标题改为“确认”:
②设置适当的属性,使Form2标题栏右上角的所有按钮消失(如图2所示);
③去掉程序中的注释符,把其中的?改为正确的内容。
注意:不能修改程序中的其他部分,标题等属性的修改只能在属性窗口中进行。最后将修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件,按照题目要求设置属性,如图4.26所示。 [*] 步骤2:打开代码编辑窗口,去掉程序中的注释符,将问号改为正确的内容,并在指定位置编写代码。 参考答案(阴影部分是需考生填入的内容) Private Sub C1_Click() Dim k As Integer Form2.
Show
当单击”提交”按钮时。则显示 Form2 Form2.Print Forml.L1.Caption; Forml.Textl Form2.Print Forml.L2.Caption; Forml.Text2 Form2.Print Forml.L3.Caption; Forml.Text3 Form2.Print Forml.Framel.
Caption
;":"; ′取框架Framel的标题名称"性别" For k=0 To 1 If Forml.Opl(
k
).Value Then ′通过下一条语句确定K Form2.Print Forml.Opl (k).Caption End If Next k End Sub Private Sub Form Load() ′将Password Char属性设为+则密码输入后显示 * Text2.
PasswordChar
="*" End Sub ′需考生编写的Form2中的代码 Private Sub C1_Click() End End Sub Private Sub C2 C1iCk() Unload Form2 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
修改窗体标题是通过设置其Caption属性来实现的,ControlBox属性用于设置控制菜单栏是否在窗体标题栏中显示,为在窗体标题栏中只显示标题信息,需将该属性值设置为False。文本框的PasswordChar属性可设置用于屏蔽在文本框中输入内容的字符,例如“*”。
转载请注明原文地址:https://kaotiyun.com/show/7ATp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有下面的程序段:x=InputBox("请输入一个整数")ReDima(x)Fork=xTo0Step-1a(k)=kNextk一般,在这段程序之前应先进行数组a的定义
设有如下Commandl的单击事件过程及fun过程:PrivateSubCommandl_Click()DimXAsIntegerX=Val(InputBox(“请输入一个整数”))
下列程序的执行结果是()。PrivateSubFormActivate()Dimscore(3)AsInteger,totalAsIntegerDimaascoreAsVariantscore(1)=50:score(2
对于图片框和图像控件,下列说法错误的是
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是( )。
下列关于类、对象、属性和方法的叙述中,错误的是()。
下列叙述中正确的是
以下不合法的VB变量名是
设“A="87654321"”,则表达式Val(Left(A,4)+Mid(A,4,2))的值为()。
如果在窗体模块中所有程序代码的前面有语句:Dimx,则x是()。
随机试题
低钾血症的病因中,以下哪项不正确
外感风邪,内有蕴热,表里俱实,恶寒壮热,头痛,大便秘结,小便黄赤宜选中成药为
破伤风紧急特异预防用
既属于监理工程师应遵守的职业道德,又属于监理工程师义务的是( )。
增强权能理论的基本假设有()
孤雁(唐)杜甫孤雁不饮啄,飞鸣声念群。谁怜一片影,相失万重云?望尽似犹见,哀多如更闻。野鸦无意绪,鸣噪自纷纷。全涛通过孤雁这一形象表达了诗人怎样的思想感情?
与经营租赁相比,融资租赁的特点是()。
现代企业制度建立后,国家和国有企业的关系是()①国家不能干预企业的经营活动②国家按投入企业的资本享有所有者权益,对企业债务承担有限责任③企业依法自主经营、自负盈亏④国家是企业的决策主体,企业是经营主体
在娱乐化的炒作中。隐私与个人的尊严成为收视效果的牺牲品,道德底线让位于经济利益。更为严重的是过度娱乐让人们仅仅满足于娱乐需求.而对社会人群缺乏关注,漠视他们的存在.忽视他们的需求。这段文字意在说明,电视节目的过度娱乐化()。
[A]Saveupbeforequitting[B]Mapouttheworst-casescenario[C]Keepyourretirementaccountwell-funded[D]Redefi
最新回复
(
0
)