vb机考,考什么内容

2015年计算机二级考试《VB》全真机考操作试题(2)
来源:  17:28:51 【】 
考试吧整理“2015年计算机二级考试《VB》全真机考操作试题(2)”供考生参考,更多计算机等级考试相关信息请关注网。
  一、基本操作题
  请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)
  1在名称为Forml的窗体上建立一个名称为“menul”、标题为“文件”的弹出式菜单,其含有三个菜单项,它们的标题分别为:“打开”、“关闭”、“保存”,名称分别为“ml”、“m2”、“m3”。再添加一个命令按钮,名称为“Commandl”、标题为“弹出菜单”。要求:编写命令按钮的Click事件过程,使程序运行时,单击“弹出菜单”按钮可弹出“文件”菜单(如图所示)。
  注意:程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。
  参考解析:
  【考点分析】本题考点有:命令按钮的Name和Cap-tion属性,菜单编辑器的使用(标题、名称、内缩符号),菜单项的Visible属性以及PopupMenu方法。
  【解题思路】要创建弹出式菜单需要先用菜单编辑器来建立菜单,并将其主菜单项的可见(Visible)属性值设置为不可见,然后通过对象的Commandl_Click事件,执行对象的PopupMenu方法来显示菜单。
  【操作步骤】
  步骤1:建立界面,添加一个命令按钮,设置其Name属性为Commandl,Caption属性为“弹出菜单”。然后建立一个菜单,菜单的属性见表3.420
  步骤2:打开代码编辑窗l3,在指定位置编写如下代码。
  参考答案:
  步骤3:调试并运行程序,关闭程序后按题目要求存盘。
  2在名称为Form1的窗休上添加一个名称为Label1的标签,字号大小为四号,标题为“等级考试”,如图1所示。通过设置属性使标签初始为不显示。请编写适当的程序,使得运行程序时,窗体的标题立即变为“标签”,单击窗体时,显示标签,如图2所示。
  注意:存盘时,将文件保存至考生文件夹下,且窗体文件名保存为sjt2.frm,工程文件名保存为sit2.vbp。要求程序中不得使用变量,每个事件过程中只能写一条语句。
  参考解析:
  【考点分析】本题考点有:标签的Name、Caption、Visi.ble和FontSize属性以及窗体的Caption属性。
  【解题思路】通过标签的Name、Caption和FontSize属性设置标签的名称、标题和字体大小,通过设置标签的Visible属性为False,使标签初始为不可见。编写适当的程序,在Form_Load事件过程中,窗体的Caption属性值立即变为“标签”,在Form_Click事件过程中单击窗体时,设置标签的Visible属性为True显示标签。
  【操作步骤】
  步骤1:新建一个窗体,按照题目要求建立控件并设置其属性,如表3.37所示。
  步骤2:编写程序代码。
  参考答案:
  步骤3:调试并运行程序,关闭程序后按题目要求存盘。
1&&&&   相关推荐:
文章责编:wangmeng& 看了本文的网友还看了
?&&( 17:10:25)?&&( 17:04:06)?&&( 17:00:30)?&&( 16:46:40)?&&( 17:30:55)?&&( 17:27:47)
? ?   ? ?   ? ?   ? ?   ? ?
? ?   ? ?   ?
?   ? ?    ? ?   ? ?   ? ?   ? ?
? ?   ? ?
实用工具 |
| 大全 | 大全
     |
版权声明:如果网所转载内容不慎侵犯了您的权益,请与我们联系,我们将会及时处理。如转载本内容,请注明出处。
Copyright & 2004- 网 All Rights Reserved 中国科学院研究生院权威支持(北京) 电 话:010- 传 真:010-vb考试难么,考什么_百度知道
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。
vb考试难么,考什么
您的回答被采纳后将获得:
系统奖励15(财富值+成长值)+难题奖励30(财富值+成长值)
我有更好的答案
b都是一些基础知识,会者不难。要想考试过关,上机和笔试都比较简单的。当然,难着不会,你可以找一下历届笔试题看看
去群里找人帮你
为您推荐:
其他类似问题
换一换
回答问题,赢新手礼包VB机考题&题库&考试重点
VB机考题试卷编号:8652所属语言:Visual Basic试卷方案:ch_vb1-3试卷总分:60分共有题型:2种&━━━━━━━━━━━━━━━━━一、单项选择&& 共30题 (共计30分)━━━━━━━━━━━━━━━━━&第1题 (1.0分)& 题号:797要改变控件的宽度,应修改该控件的(& )属性.A:TopB:WidthC:LeftD:Height&答案:B&第2题 (1.0分)& 题号:805要使得标签能自动扩充以满足字体大小则可对其( &)属性进行设置.A:alignmentB:usemnemonicC:autosizeD:tag&答案:C&第3题 (1.0分)& 题号:3402从功能上讲,Visual Basic 6.0有3种版本,下列不属于这3种版本的是( &).A:学习版B:标准版C:专业版D:企业版&答案:B&第4题 (1.0分)& 题号:3187数学表达式x&y&z的正确VB逻辑表达式是______.A:x&y And &zB:x&y&zC:x&y And &zD:x&y And y&z&答案:D&第5题 (1.0分)& 题号:2224若要使命令按钮不可操作,要对( &)属性进行设置.A:EnabledB:VisibleC:BackColorD:Caption&答案:A&第6题 (1.0分)& 题号:3215文本框中选定的内容,由下列(& )属性反映.A:TextB:CaptionC:SeltextD:sellenght&答案:C&第7题 (1.0分)& 题号:3413下面4项中不属于面向对象系统三要素的是(& &).A:变量B:事件C:属性D:方法&答案:A&第8题 (1.0分)& 题号:4301在Visual Basic 6.0集成环境中,窗体和控件尺寸的默认计量单位是(& ).A:英寸B:厘米C:像素D:twip&答案:D&第9题 (1.0分)& 题号:4312如果将逻辑常量False赋值给一个整型变量,则整型变量的值为(& ).A:0B:-1C:TureD:False&答案:A&第10题 (1.0分)& 题号:3443下面4项中合法的变量名是(& ).A:X_yzB:123abcC:integerD:X-Y&答案:A&第11题 (1.0分)& 题号:813要使一个文本框具有水平和垂直滚动条,则应先将其MultiLine属性设置为True,然后再将ScrollBar属性设置为(& ).A:0B:1C:2D:3&答案:D&第12题 (1.0分)& 题号:2352窗体设计器是用来设计(& ).A:应用程序的代码段B:应用程序的界面C:对象的属性D:对象的事件&答案:B&第13题 (1.0分)& 题号:3249以下能在窗体MainForm的标题栏中显示"南京森林公安高等专科学校"的语句是(& ).A:MainForm.Name="南京森林公安高等专科学校"B:MainForm.Title="南京森林公安高等专科学校"C:MainForm.Caption="南京森林公安高等专科学校"D:MainForm.Text="南京森林公安高等专科学校"&答案:C&第14题 (1.0分)& 题号:2341若要使标签控件显示时,不覆盖其背景内容,应设置标签控件的(& )属性.A:BACKCOLORB:BORDERSTYLEC:FORECOLORD:BACKSTYLE&答案:D&第15题 (1.0分)& 题号:2503以下关于vb 语言的说法中,正确的是(& ).A:vb 是一种面向过程的语言B:vb 是一种面向对象语言C:vb是一种低级语言D:vb 是一种机器语言&答案:B&第16题 (1.0分)& 题号:2500控件内的对齐方式(& )属性决定.A:AlignmentB:WordWrap
分享这篇日志的人也喜欢
敬我余生不悲欢
精致的猪猪女孩
女人该有的大度,
没有新鲜感了?
热门日志推荐
人人最热标签
北京千橡网景科技发展有限公司:
文网文[号··京公网安备号·甲测资字
文化部监督电子邮箱:wlwh@··
文明办网文明上网举报电话: 举报邮箱:&&&&&&&&&&&&
请输入手机号,完成注册
请输入验证码
密码必须由6-20个字符组成
下载人人客户端
品评校花校草,体验校园广场vb期末考试是怎么考的_百度知道
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。
vb期末考试是怎么考的
我有更好的答案
Text = Text1.Text
Format(a(i;
&列&quot, j) Thenbig = a(i;vb&quot, 1)col = 1For j = 1 To nIf big & a(i;)Next jText1.Text = Text1, &, col) Thenflag = 0Exit ForEnd IfNext kIf flag = 1 Thenfind = 1Text2!@@@@&请输入行数&))n = Val(InputBox(&quot, j), j)col = jEnd IfNext jflag = 1For k = 1 To mIf big & a(k;
&行&&请输入列数&))ReDim a(m, n)RandomizeText1.Text = &&gt, n As Integerm = Val(InputBox(&Dim a()Private Sub Form_Click()Dim m As Integer.Text = &鞍点在&End IfNext iIf find = 0 Then MsgBox &quot, j) = Int(Rnd * 100 + 1)Text1;For i = 1 To mFor j = 1 To na(i请问你需要什么帮助?我对vb比较熟悉&pre t=&code& l=&quot.Text
vbCrLfNext ifind = 0For i = 1 To mbig = a(i
采纳率:89%
为您推荐:
其他类似问题
换一换
回答问题,赢新手礼包

我要回帖

更多关于 vb 获取网页内容 的文章

 

随机推荐