版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、1.假定当前日期为2002年7月12日,星期六,则执行语句Print day(now)后,输出结果是_(提示:不能出现符号#)。122.语句a%=3.14156:Print a%的输出结果是_。33.以下循环的执行次数是_11_。 K=0 Do While k=7 Print A=;AA=116.表达式3/6*5的值是_。2.57.下列程序的作用是将三个数按从大到小进行排序,请补充完该程序。 If ab Then d=a:a=b:b=d EndIf If ac Then d=a:a=c:c=d EndIf If_Then d=b:b=c:c=d EndIf Print a,b,cbc8.在Se
2、lect case 结构中应至少包含一个_子句。CASE9.窗体的属性可在属性窗口中设置,也可在程序中用_语句动态设置。赋值10.有如下Sub过程: Sub ind(a As Integer) Static x As Integer x = x+a Print x; End Sub以下是调用它的事件过程,程序运行后,单击命令按钮Command1,输出结果为_。 Private Sub Command1_Click() Ind(2) End Sub211.逻辑常量值为TRUE或_。FALSE12.货币类型的数据小数点的位置是固定的,精确到小数点后_位。413.表达式(2+8*3)/2的值是_。1
3、314.以下程序用来判断一个整数X是否为偶数,并将其中的偶数在窗体上显示,请补充完该程序。 If X_2=_ Then Print XMOD#015.当对窗体中的对象进行_操作时,Visual Basic 就会显示该对象的代码窗口。双击16.下列程序的执行结果是_。 T = O : m = 1 : Sum = 0 Do t = t + m : Sum = Sum + t : m = m + 2 Loop While m = 9 Print Sum5517.一组具有相同名称,不同下标的下标变量称为_。数组18.给定年份,下列程序用来判断该年是否闰年,请补充完该程序。提示:闰年的条件是年号可以被4
4、整除但不能被100整除,或者能被400整除。Private Sub Command6_Click()Dim y As Integer y=InputBox(请输入年号)If(y Mod 4=0_y Mod 1000) or (y Mod 400=0) Then Print 是闰年Else Print 是普通年份End IfEnd SubAND19.设a=2,b=3,c=4,d=5下列ab and cd or c=a表达式的值是_。FALSE20.表达式:1 & 2 = 12的值是_。TRUE21.为了能自动放大或缩小图象框中的图形以与图象框的大小相适应,必须把该图象框的Stretch属性设置为
5、_。TRUE22.根据变量的定义位置和所使用的变量定义语句的不同,VB中的变量可以分为3类,即_、模块变量和全局变量。局部变量23.表达式34 and 7=5的值是_。FALSE24.以下的程序用来输出100到2000间不能被3整除的数字,请补充完该程序。 Private Sub Commmand1_Click() Dim x As Integer x = 100 Do Until x _ If x Mod 3 0 Then Print x End If x = x + 1 Loop End Sub200025.下列程序段的执行时,共循环_次。 For a=0 To 1 For b=1 To
6、2 For c=1 To 3 I=I+1 Next c Next b next a1226.以下程序计算2到50间所有偶数的和,请补充完该程序 Sub mult() Dim Sum As Integer Sum=0 Dim I as integer For_to 50 If I MOD 2=_Then_ Next I Print sum End SubI=2#0#SUM=SUM+I27.A=7,B=3,C=4,则表达式 A MOD 3+B3/C5的值为_。228.下列循环语句,要求和数达到10既停止累加,退出循环,请补充完程序。 For j=1 to 10 s=s+j If s=10 then
7、 Exit _。 Next jFOR29.下列程序段的运行结果是: Sub Form1_Click() Dim n as Integer I=21:n=3 Do While In I=I-n Loop Print I End Sub打印结果_。330.Visual Basic中的常量分为两种,一种是直接常量,一种是_常量。符号31.Visual Basic 提供了列表框控件, 当列表框中的项目较多、超过了列表框的长度时, 系统会自动在列表框边上加一个_。滚动条32.一个程序最多可以有_窗体。25533.将一般窗体转换为MDI窗体的子窗体时要把MDIChild属性的值设置为_。TRUE34.要选
8、择多个不相邻的控件,按住_或SHIFT键不放,再单击要选择的控件。CTRL35.表达式:1+2=3的值是_。FALSE36._属性用来设置窗体的标题。它确定和改变显示在窗体的标题栏中的文本。CAPTION37.假定有一个文本框,其名称为Textl,为了使该文本框具有焦点,应执行的语句是_。TEXT1.SETFOCUS38.执行下面的程序段后,s的值为_。 S=5 For I=2.6 To 4.9 Step 2 s=s+1 Next I739.表达式“12345”“12345”&“ABC”的值是_。TRUE40.下列程序用来计算1+2+3+10的值,请补充完程序。 Dim t,k as sing
9、le K=0 DO While k10 K=k+1:_ loop print tT=T+K41.下列程序段的执行后输出的结果为_。 K = 1 For I = 1 To 3 A = I I K Next I Print A2742.下列程序是用来计算12310的程序段,请补充完该程序。 Dim I, s, k As Integer s = 0: k = 0 For_To -1 k = k+1:s = s+k Next I Print sI=-1043.执行inputbox函数后,会产生一个对话框,对话框上通常有两个按纽,它们是_按纽和取消按钮。确定44.下列程序的执行结果是_。 M1 = 1:
10、m2 = 1 Do While m26 m1 = m1*m2 : m2 = m2+1 Loop Print m112045.下列程序的执行结果是_。 Private Function P(N As Integer) For I = 1 To N SUM = SUM + 1 Next I P = SUM End Function Private Sub Command1_Click() S = P(1) + P(2) + P(3) + P(4) Print S; End Sub1046.货币型数据的类型标识符为_。47.以下程序用来输出1到100所有奇数的和,请补充完该程序。 Private S
11、ub Command3_Click() Dim s As Long Dim x As Integer s = 0 For x=1 to 100 step_ s = s + x Next x Print s End Sub248.假设有一复选框控件,名为Check1,在程序中,我们用“check1.value=1”语句设置Value属性的值,则该程序执行后,复选框处于_状态。选中49.激活属性窗口的快捷键是_。F450.下列程序的执行结果是_。 A = 75 If a60 Then I = 1 ElseIf a70 Then I = 2 ElseIf a80 Then I = 3 ElseIf
12、a90 Then I = 4 End If Print I151.下列程序段的运行后t的值为_。 Dim t,k as single k=5 : t=1 do While k=-1 t=t*k : K=K-1 loop052.执行语句“a=6=5”后,变量a的值为_。FALSE53.下面程序段的输出结果是_。 P=0:s=0 Do p = p+2 s = s+p Loop While py then x=x-y else x=x+y5063.表达式32/23-3*22+42的值是_。864.下列程序用来将变量X,Y的值互换,请补充完程序(提示:该题答案中不要出现空格)。 T=Y:_:X=TY=
13、X65.有如下程序,该程序的运行结果是_。 A=20 : b=10 print abTRUE66.表达式15+3*3/9*55 mod 10 的值是_。1667.有如下程序,该程序的运行后输出的结果是_。 Private sub Command1_Click() I=AAAAAA S=Mid(I,4,3) & BBB Print S End SubAAABBB68.有一数组定义语句:dim M(-2 to 1) as string,该语句定义的数组M中包含_个元素。469.设有数组声明语句:Option base 1 dim A(3,-2 to 1),则数组A中有_个元素。1270.有数组定义
14、语句:dim I(99,99) as Integer,则数组I中共包含有_个元素。1000071.下面程序段执行后的结果是_。 X=10 For I=6.3 to 4.9 Step -0.3 x=x-1 Next Print x572.表达式:52*3的值是_。073.表达式:Mid(SHANGHAI,6,3)的值是_。HAI74.表达式Int(Rnd(0)+1)+Int(Rnd(1)-1)的值是_。075.VB程序设计中三种基本结构分是:_结构、选择结构和_结构。顺序#循环76._是构成文件的最基本的单位。字符77.顺序文件与随机文件相比较,占用内存资源较小的文件是_文件。随机78.随机文件
15、是以_为单位读写,二进制文件以_为单位读写。记录#字节79.随机函数Rnd(X),当X=_时返回最近一次调用Rnd函数生成的随机数。080.语句x=inputbox(请输入数据),输入12345,则x的值为_类型的数据(提示:例如整型,Int;字符型,String)。STRING81.x,y中至少有一个变量小于变量z的VB表达式为xz _ yz。OR82.以下程序段的输出结果是_。 Num=0 While num=699.VB中算术表达式 2310 的值为 2100.对于Commandbutton控件,Picture属性用于给按钮加一个图形,只有当_属性的属性值设置为1时,该属性才有效。STY
16、LE101. 在VB中根据不同的情况做出不同的选择,执行不同的操作,这种程序设计结构称为 结构 选择102.若要求从文本框中输入密码时在文本框中只显示*号,则应当在此文本框的属性窗口中设置_属性。PASSWORDCHAR103.设置计时器事件之间的间隔要通过计时器的_属性INTERVAL104.下列程序段的执行结果是_。 K=0 For j=1 to 2 For I=1 to 3 k=I+1 Next I For I=1 To 7 k=k+1 Next I Next j Print k11105.Private Sub Command1_Click() x=0Do Until x=-1a=In
17、putBox(请输入第一个数字a的值)a=Val(A)b=InputBox(请输入第二个数字b的值)b=Val(b)x=InputBox(请输入第三个数字x的值)x=Val(x) a=a + b + xLoopPrint aEnd Sub输入5,4,8,5,8,-1,在窗体上显示12106.程序运行时,单击水平滚动条右边的箭头,滚动条的Value属性值增加一个_量。SMALLCHANGE107.如果希望使用变量x来存放数据687543123456,应将该变量x声明为_类型的变量。double108.有如下程序段,该程序段执行完毕后,共循环了_次。 For I =1 to 2 For J =1
18、to I For k =1 to J Printa Next K Next J Next I4109.表达式233 And 510的值是 false110.在窗体上添加一个命令按钮,名为Command1,事件过程如下: Private Sub Command1_Click() a=InputBox(请输入a的值) a=Val(a) b=InputBox(请输入b的值) b=Val(b) a=a+b Print a End Sub程序运行后,单击命令按钮,依次在输入对话框中输入1,1后,输出的结果是_。2111.表达式5*2+3/422的值是 _ 10112.如果命令按钮的名称为Cmdopen,程序要求单击该命令按钮时,打开一个窗口frml,请对以下事件过程填空。 Private Sub Cmdopen _End Subfrml.show113.要改变窗体的标题,应当在属性窗口中改变的属性是CAPTION114._属性为列表框中的每个列表项设置一个对应的数值,它是一个整数数组,
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- EPC设计成本控制措施
- 工程停止检查点培训试题
- “互联网+”背景下的小学数学个性化学习研究
- 2017年青海省监理工程师合同管理:违约责任的概念考试试卷
- 2021年高考英语读后续写技巧与训练读后续写背诵素材:好词好句100句(下)(新高考地区专用)
- 河南省郑州市高新区2023-2024学年九年级上学期期末语文试题(含答案)
- 温泉旅游相关项目投资计划书范本
- 值机国际业务试题及答案
- 终极押题09:“-不会忘记”-备战2024年中考语文作文考前抢分模板与素材范文
- 2024年中考化学考前知识点回归(含易错解释)
- 家乡二部合唱谱钢琴伴奏谱
- 预防医疗骗保的常识
- 人员大规模流失应急预案
- 2024年教师资格证考试-中学教师资格证物理(统考)笔试历年真题荟萃含答案
- 舞龙课程教学大纲
- 工业自动化中的智能制造与自动化流水线
- 不粘锅表面涂层工艺有哪些
- 2024年二级建造师之二建市政工程实务题库(各地真题)
- 脑供血不足的健康宣教
- 中国电信客户服务
- 2024年武汉车都建设投资有限公司招聘笔试参考题库含答案解析
评论
0/150
提交评论