大学VB期末考试试题6.pdf

《大学VB期末考试试题6.pdf》由会员分享，可在线阅读，更多相关《大学VB期末考试试题6.pdf（24页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、 第 1 题以卜.合法的V isua l B a sic标识符是A)F orL oop B)C on st C)9 a bc D)a#x 答案A 第 2 题在设计阶段，当双击窗体上的某个控件时，所打开的窗口是()A)工程资源管理器窗口B)工具箱窗口0代码窗口D)属性窗口 答案C 第 3 题在窗体上画一个名称为C omma n dl的命令按钮，然后编写如下事件过程：P riv a te Sub C omma n dl_ C lick()D im a A s I n teger,s A s I n tegera =8s=1D os=s+aa 二 a 1L oop W hile a 6P rin t

2、 n um;n um=n um+2.4L oopE n d Sub程序运行后，单击命令按钮，则窗体上显示的内容是A)1 3.4 5.8B)1 3 50 1 4 7D)无数据输出 答案B 第 6 题设有以下循环结构D o循环体L oop W hile 条件则以下叙述中错误的是A)若条件”是一个为0的常数，则一次也不执行循环体B)条件可以是关系表达式、逻辑表达式或常数C)循环体中可以使用E x it D o语句D)如果条件总是为True,则不停地执行循环体 答案A 第 7 题设窗体上有个文本框，名称为tex tl,程序运行后，要求该文本框不能接受键盘输入，但能输出信息，以下属性设置正确的是：A)t

3、ex tl.ma x len gth=O B)tex tl.en a bled=fa lseC)tex tl.v isible=fa lse D)tex tl.w idth=O 答案B 第 8题以下能在窗体F orml的标题栏中显示 V isua lB a sic窗体的语句是A)F orml.N a me=V isua lB a sic 窗体”B)F orml.Title=*V isua lB a sic 窗体”C)F orml.C a ption=V isua lB a sic 窗体”D)F orml.Tex t=V isua lB a sic 窗体”答案C 第 9题在窗体上画一个名称为C

4、omma n dl的命令按钮，然后编写如下事件过程：P riv a te Sub C omma n d1 _ C lick()x=I n putB ox(I n put)Select C a se xC a se 1,3P rin t 分支 1 C a se I s 4P rin t”分支 2 C a se E lseP rin t E lse 分支E n d SelectE n d Sub程序运行后，如果在输入对话框中输入2,则窗体上显示的是A)分支1 B)分支2 C)E lse分支 D)程序出错 答案C 第10题以下关于MsgBox的叙述中，错误的是A)MsgBox函数返回一个整数B)通过

5、MsgBox函数可以设置信息框中图标和按钮的类型0 MsgBox语句没有返回值D)MsgBox函数的第一个参数是一个整数，该参数只能确定对话框中显示的按钮数量 答案D 第11题在窗体上画一个名称为Tim erl的计时器控件，要求每隔0.5秒发生一次计时器事件，则以卜一正确的属性设置语句是A)Timerl.InterVal=0.5 B)Timerl.Interval=5C)Timerl.Interval=50 D)Timerl.Interval=500 答案D 第12题在Visual B asic中通过()属性来设置字体的颜色。A)FontColorB)ClipControlC)BackColo

6、rD)ShowColor 答案A 第13题以 卜.叙述中错误的是A)事件过程是响应特定事件的一段程序B)不同的对象可以具有相同名称的方法C)对象的方法是执行指定操作的过程D)对象事件的名称可以由编程者指定 答案D 第14题设有如F程序:Private Sub Command1 Cli ck()Dim c As Integer,d As Integerc=4d=InputBoxC请输入一个整数”)Do While d 0If d c Thenc=c+1End Ifd=lnputBox(请输入个整数”)LoopPrint c+dEnd Sub程序运行后，单击命令按钮如果在输入对话框中依次输入1、2

7、、3、4、5、6、7、8、9、0,则输出结果是：A)12B)llC)10D)9 答案D 第15题当一个复选框被选中时，它的Value属性的值是A)3 B)2 C)1 D)0 答案C 第16题表达式5 Mod 3+35*2的值是A)0 B)2 0 4 D)6 答案B 第17题 标题设x=4,y=8,z=7,以下表达式的值是xz)Or z 其中标签 Label 4 Labe 1 6 分别显示 A、B、A*B等文字信息，标签Labelh Label2分别显示其右侧的滚动条的数值，Label3显示A*B的计算结果。如图所示。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮 计算”时，对标签

8、Label 1、Label2中显示的两个值求积，并将结果显示在Label3中。以卜不能实现上述功能的事件过程是A)Pr iv ate Sub Command1 _C1 ick()Label3.Cap tionStr(Vai(Labell.Cap tion)*Val(Label2.Cap tion)End SubB)Pr iv ate Sub Command 1 _C1 ick()Label3.Cap tion=HScr olll.Value*HScr oll2.ValueEnd SubC)Pr iv ate Sub Command 1 ClickOLabel3.Cap tion 二 HScr

9、oll1 *HScr oll2End SubD)Pr iv ate Sub Command1 _Click0Label3.Cap tion=HScr ol1 1.T ex t*HScr ol1 2.T ex tEnd Sub 答案D 第3 1题在窗体(名称为For ml)上画一个名称为T ex tl的文本框和个名称为Command 1的命令按钮，然后编写个事件过程。程序运行以后，如果在文本框中输入一个字符，则把命令按钮的标题设置为计算机等级考试。以下能实现1.述操作的事件过程是：A)Pr iv ate Sub T ex tl ChangeOCommand 1.Cap tion二 计算机等级考试

10、”End SubB)Pr iv ate Sub Command1 _Click()Cap tion二计算机等级考试End SubC)Pr iv ate Sub For ml_Click()T ex tl.Cap tion=”计算机等级考试End SubD)Pr iv ate Sub Command1 _Click()T ex tl.T ex t二计算机等级考试”End Sub 答案A 第3 2题设a=5,b=4,c=3,d=2,下列表达式的值是3 2*b Ora=c And bOc Or cdA)1 B)T r ue C)Fals e D)2 答案B 第3 3题设aMicr os oftVis

11、 ualBas ic*,则以下使变量b的值 为i s ua 1 Bas i c 的语句是A)b=Left(a,1 0)B)b=Mid(a,1 0)C)b=Right(a,1 0)D)b=Mid(a,1 1,1 0)答案B 考点 第3 4题 标题假定有如下的窗体事件过程：Pr iv ate Sub For m_Click()a$=Micr os oft Vis ual Bas ic”b$=Right(a$,5)c=Mid(a$,1,9)Ms gBox a$,3 4,b$,c$,5End Sub程序运行后单击窗体，则在弹出的信息框中的标题栏中显示的信息是：A)Micr os oft Vis ual

12、 B)Micr os oft C)Bas icD)5 答案B 考点 第3 5题 标题设 a=a,b=b，c=c，d=d,执行语句 x=Iif(ad),A，B)后，x的值为：A)a B)b C)B D)A 答案D 考点 第3 6题 标题为了使命令按钮(名称为Commandl)右移2 0 0,应使用的语句是A)Command1.Mov e-2 0 0 B)Command1.Mov e 2 0 0C)Command1.Left=Command1.Left+2 0 0 D)Command1.Left=Command1.Left-2 0 0 答案C 考点 第 3 7 题 标题)在窗体上画一个文本框，然后

13、编写如卜.事件过程：Pr iv ate Sub For m ClickOx二Inp ulBox(请输入一个整数“)Pr int x +T ex tl.T ex tEnd Sub程序运行时，在文本框中输入4 5 6,然后单击窗体,在输入对话框中输入1 2 3,单击确定按钮后，在窗体上显示的内容是：A)1 2 3 B)4 5 6 C)5 7 9 D)1 2 3 4 5 6 答案D 考点 第 3 8 题 标题在窗体上画个名称为Command 1 的命令按钮，然后编写如下代码：Op tion Bas e 1Pr iv ate Sub Command1 _Click()d=0c=1 0 x =Ar r

14、ay (1 0,1 2,2 1,3 2,2 4)For i=1 T o 5If x (i)c T hend=d+x(i)c=x(i)Els ed=d-cEnd IfNex t iPr int dEnd Sub程序运行后，如果单击命令按钮，则在窗体上输出的内容为A)8 9 B)9 9 C)2 3 D)7 7 答案C 考点 第 3 9 题 标题设有如下通用过程：Public Sub fun(a()As Integer,x As Integer)For i=1 T o 5x =x +a(i)Nex tEnd Sub在窗体上画一个名称为T ex tl的文本框和一个名称为 Command 1 的命令按钮

15、,然后编写如下事件过程：Pr iv ate Sub Commandl_Click()Dim ar r(5)As Integer,n As IntegerFor i=1 T o 5ar r(i)=i+iNex tfun ar r,nT ex tl.T ex t=Str(n)End Sub程序运行后，单击命令按钮,则在文木框中显示的内容是A)3 0B)2 5C)2 0D)1 5 答案A 考点 第 4 0 题 标题设有如下通用过程：Public Function f(x As Integer)Dim y As Integerx =2 0y =2f=x *yEnd Function在窗体上画一个名称为

16、Command 1的命令按钮，然后编写如下事件过程：Pr iv ate Sub Command1 Click0Static x As Integerx =1 0y 二5y =f(x)Pr int x;yEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是A)1 0 5 B)2 0 5C)2 0 4 0 D)1 0 4 0 答案C 考点 第4 1题 标题在窗体上画一个名称为Command 1的命令按钮和一个名称为T ex tl的文本框,在文本框中输入以下字符串：Micr os oft Vis ual Bas ic Pr ogr amming然后编写如下事件过程：Pr iv ate

17、Sub Command 1 Click()Op en d:temp outf.tx t For Outp ut As tt lFor i=1 T o Len(T ex tl.T ex t)c=Mid(T ex tl.T ex t,i,1)If c=A And c =Z T henPr int#1,L C a s e(c)E nd I fN e x t iC l o s eE nd S u b程序运行后，单击命令按犯，文 件o u t f.t x t中的内容是：A)MV B PB)m v b pC)MVBPD)mvbP 答案D 考点 第42题 标题假定在图片框P i c t u r e】中装入了

18、 个图形，为了清除该图形(不删除图片框)，应采用的正确方法是：A)选择图片框，然 后 按D e l键 B)执行语句P i c t u r e l.P i c t u r e=L o a dP i c t u r e(”)C)执行语句P i c t u r e l.P i c t u r e=D)选择图片框，在属性窗口中选择P i c t u r e属性，然后按回车键 答案B 考点 第43题 标题在窗体上画个L i s t l的列表框，个名称为L a b e l 1的标签，列表框中显示若干个项目，当单击列表框中的某个项目时，在标签中显示被选中的项目的名称，下列能正确实现上述操作的程序是A)P r

19、 i v a t e S u b L i s t l _ C l i c k()L a b e l 1.C a p t i o n=L i s t l.L i s t i nde x E nd S u bB)P r i v a t e S u b L i s t l _ C l i c k()L a b e l 1.N a m e =L i s t l.L i s t i nde x E nd S u bC)P r i v a t e S u b L i s t l C l i c k()L a b e l 1.N a m e =L i s t l.T e x t E nd S u bD)P

20、r i v a t e S u b L i s t l _ C l i c k()L a b e l 1.C a p t i o n=L i s t l.T e x t E nd S u b 答案D 考点 第44题 标题在窗体上画一个命令按钮，名称为C o m m a ndl,然后编写如下事件过程：P r i v a t e S u b C o m m a nd 1 C l i c k OD i m i A s I nt e ge r,x A s I nt e ge rFor i=1 To 6If i=1 Then x 二 iIf i 0 And a 10 And a 20 And a c T

21、hend=d+x(i)c=x(i)Elsed 二 d-cEnd IfNext iPrint dEnd Sub程序运行后,如果单击命令按钮,则在窗体上输入的内容为A)10B)16C)12D)20 答案C 考点 第52题 标题在窗体上画个名称为Command 1的命令按钮，然后编写如下程序：Option Base 1Private Sub Commandl C lick0Dim a As Varianta=Array(1,2,3,4,5)Sum=0For i=l To 5Sum=sum+a(i)Next ix=Sum/5For i=1 To 5If a(i)x Then Print a(i);Ne

22、xt iEnd Sub程序运行后，单击命令按钮，在窗体上显示的内容是A)1 2 B)1 2 3 0 3 4 5 D)4 5 答案D 考点 第53题 标题设有如下通用过程：Public Sub Fun(a(),ByVai x As Integer)For i=1 To 5x=x+a(i)NextEnd Sub在窗体上画“个名称为T extl的文本框和,个名称为Commandl的命令按钮，然后编写如下的事件过程：Private Sub Command 1 _C 1 ick()Dim arr(5)As VariantFor i=1 To 5arr(i)=iNextn=10Ca 11 Fun(arr(

23、),n)Textl.Text=nEnd Sub程序运行后，单击命令按钮，则在文本框中显示的内容是A)10 B)15 C)25 D)24 答案A 考点 第54题 标题如果要改变窗体的标题，则需要设置的属性是A)Caption B)Name C)BackColor D)BorderStyle 答案A 考点 第55题 标题()是由Visual B asic提供的一种专门的子程序，由对象本身所具有，反映该对象功能的内部函数或过程。A)文件B)属性C)方法D)窗体 答案C 考点 第56题 标题x$=S t r i ng(k,*)P r i nt m;x$M=m+1下列程序P r i v a t e S

24、u b F o r m c l i c k()F o r x=l t o 2N e x t ka=0F o r y=l t o x+1a=a+lE nd S u b运行后输出是(A 1*)oB 1*C 3*D 1*N e x t y2*2*2*2*P r i nt a;3*3*1*3*N e x t xE nd S u b运行时输出的结果是()oA 1 1 B O 0 C 1 2 D 2 3 答案D 考点 第5 7题 标题在窗体上画一个名称为C o m m a nd 1的命令按钮，然后编写如下事件过程：O p t i o n B a s e 1P r i v a t e S u b C o m

25、 m a nd1 C l i c k()D i m aa=A r r a y (1,2,3,4,5)F o r i=l T o U B o u nd(a)a(i)=a(i)+i-lN e x t 答案D 考点 第5 9题 标题下列程序P r i v a t e S u b F o r m _S u m=0F o r j=l t o 10I f j=10 T h e nE l s eS u m=S u m+jE nd I fN e x t jP r i nt s u mE nd S u b运行时输出结果是(A 45c l i c k()oB 55c显示错误信息DP r i nt a (3)E n

26、d S u b程序运行后，单击命令按钮，则在窗体上显示的内容是A)4 B)5 0 6 D)7 答案B 考点 第5 8题 标题下列程序P r i v a t e S u b F o r m c l i c k()m=l36 答案A 考点 第6 0题 标题F列程序P r i v a t e S u b F o r m _ c l i c k()s 二0D os=(s+l)*(s+2)N u m b e r=N u m b e r+1F o r k=3 t o 1 S t e p -1L o o p U nt i l s=30P r i nt N u m b e r;sE nd S u b运行输出的

27、结果是（）oA 0 1 B 30 30 C 4 30 D3 18 2 答案D 考点运行时输入9,8,7,6,5,4,3,2,1,0,输出的结果是（）。A 5 B 6 C 7 D 8 答案C 考点 第61题 标题下列程序P r i v a t e S u b F o r m c l i c k（）a=7 0F o r j=l t o 4x=V a l （I np u t B o x （请输入一个数）I f x Mo d 5=0 T h e nb=b+x:a=xE l s eb =b+aE nd I fN e x t jP r i nt bE nd S u b运行时输入7 5,55,42,8 0,

28、输出的结果是（）。A 252 B 265 C 28 0 D 28 5 答案B 考点 第63题 标题下列程序P r i v a t e S u b F o r m _ c l i c k（）c=4x=V a l （I np u t B o x （请输入一个数）W h i l e x-9 9 9I f x c T h e n c=xX=V a l （I np u t B o x（请输入个数）W e ndP r i nt c;:P r i nt A b s（x）E nd S u b运行时输入5,9,8,2,-9 9 9,输出的结果是（）。A 9 8 B 9 2 C 9 9 9 9 D 2 9 9 9

29、 答案C 考点 第62题 标题下列程序P r i v a t e S u b F o r m _ c l i c k（）c=4d=V a l （I np u t B o x （请输入一个数）D o W h i l e d0I f dc T h e n c=c+ld=V a i （I np u t B o x（请输入个数”）L o o pP r i nt c+dE nd S u b 第64题 标题在窗体上画一个名称为C o m m a nd 1的命令按钮和两个名称分别为T e x t l、T e x t 2的文本框，然后编写如下事件过程：P r i v a t e S u b C o m m a

30、 ndl _ C l i c k（）n=T e x t l.T e x tS e l e c t C a s e nC a s e 1 T o 20 x =10C a s e 2,4,6x 二 20C a s e I s b T h e n x=a-bP r i nt xE nd S u b运行时从键盘输入3和4,输出的x的值是()。A 3 B 5 C 7 D 9 答案C 考点 第6 7题 标题以下能判断是否到达文件尾的函数是A)B O F B)L O C C)L O F D)E O F 答案D 第6 9题 标题设a=1 0,b=5,c=l,执行语句P r i n t a b c后，窗体上显示

31、的是A)T r u e B)F a l s e C)1 D)出错信息 答案B 考点 第70题 标题设窗体上有一个列表框控件L i s t l,且其中含有若干列表项。则以卜.能表示当前被选中的列表项内容的是A)L i s t l.L i s t B)L i s t!.L i s t i n d e x C)L i s t l.I n d e x D)L i s t l.T e x t 答案D 考点 第71题 标题 答案C以卜叙述中错误的是A）打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件B）保存V i s u a l B a s i c程序时，应分别保存窗体文件及工程文 考点

32、件 第75题 标题C）V i s u a l B a s i c应用程序只能以解释方式执行D）事件可以由用户引发，也可以由系统引发设=V i s u a l B a s i c,下面使 b=B a s i c 的 语 句 是()A)b=L e f t (a,8,1 2)答案c 考点B)b=M i d(a,8,5)C)b=Ri g h t(a,5,5)D)b=L e f t(a,8,5)答案B 第72题 标题 考点以下不属于V i s u a l B a s i c系统的文件类型是A).f r m B).b a t C).v b g D).v b p 第76题 标题 答案B 考点）从键盘上输入两

33、个字符串，分别保存在变量s t r l、s t r 2中。确定第二个字符串在第一个字符串中起始位置的函数是（）A）L e f tB）M i d 第73题 标题C)S t r i n gD)I n s t r以下叙述中错误的是A）双击鼠标可以触发D b l C l i c k事件B）窗体或控件的事件的名称可以由编程人员确定C）移动鼠标时，会触发M o u s e M o v e事件D）控件的名称可以由编程人员设定 答案D 考点 答案B 考点 第77题 标题设有语句x=I n p u t B o x（输入数值，0 ,示例）程序运行后，如果从键盘上输入数值1 0并接回车键，则下列叙述中正确的是（）第

34、74题 标题A）变量X的值是数值1 0B）在I n p u t B o x对话框标题栏中显示的是示例以下叙述中错误的是A）V i s u a l B a s i c是事件驱动型可视化编程工具B）V i s u a l B a s i c应用程序不具有明显的开始和结束语句C）V i s u a l B a s i c工具箱中的所有控件都具有宽度（W i d t h）和高 度（H e i g h t）属性D）V i s u a l B a s i c中控件的某些属性只能在运行时设置0 0是默认值D）变量X的值是字符串1 0 答案D 考点 第78题 标题在窗体上画一个名称为C o n u n a n

35、 d l的命令按钮，然后编写如下程序：P r i v a t e S u b C o m m a n d 1 _ C l i c k ()S t a t i c X A s I n t e g e rS t a t i c Y A s I n t e g e rC i sY=1Y=Y+5X=5+XP r i n t X,YE n d S u b程序运行时，三次单击命令按钮C o n u n a n d l后，窗体上显示的结果为()A)1 5 1 6B)1 5 60 1 5 1 5D)5 6D）对象的N a m e属性值可以为空 答案A 考点 第81题 标题设组合框C o m b o 1中有3个

36、项目，则以下能删除最后一项的语句是A)C o m b o 1.Re m o v e I t e m T e x tB)C o m b o 1.Re m o v e I t e m 2C)C o m b o 1.Re m o v e I t e m 3D)C o m b o 1.Re m o v e I t e m C o m b o 1.L i s t c o u n t 答案B 考点 答案B 考点 第79题 标题）刚建立一个新的标准E X E工程后，不在工具箱中出现的控件是（）A）单选按钮B）图片框0通用对话框D）文本框 答案C 考点 第8 0题 标题）以下叙述中正确的是A）窗体的N ame

37、属性指定窗体的名称，用来标识一个窗体（）B）窗体的N ame属性的值是显示在窗体标题栏中的文本0可以在运行期间改变对象的N ame属性的值 第8 2题 标题下列程序段的执行结果为。A=H E L L()G O O D M O R N I N G”B=W A N G C H A N G L I”C=L eft(A,5)+D=R ight(A,7)E=M id(A,6,4)F=M id(B,L en(B)-6,5)+G=E+D+!H=C+FP rint H+GA)H E L L O!C H A N G!G O O D M O R N I N G!B)H E L L O!W A N G!G O O

38、D M O R N I N G!C)H E L L O!L I!G O O D M O R N I N G!D)H E L L O!C H A N G!G O O D!M O R N I N G!答案A 考点 第8 3题 标题在 V isual B asic环境下，当写一个新的V isual B asic程序时，所做的第一件事是（）A）编写代码B）新建一个工程C）打开属性窗口D）进入 V isual B asic 环境 答案A 考点 第8 7 题 标题 答案B 考点用标准工具栏中的工具按钮不能执行的操作是（）。A）添加工程B）打印源程序C）运行程序D）打开程序 第8 4 题 标题 答案B下列不

39、属于V isual B asic6 特点的是（）。A）对象的链接与嵌入B）结构化程序设计C）编写跨平台应用程序D）事件驱动程序编程机制 考点 第 8 8 题 标题 答案C 考点V isual B asic6.0集成环境的主窗口中不包括（）。A）标题栏B）菜单栏C）状态栏D）工具栏 第8 5 题 标题 答案c下面关于V isual B asic6.0 工具栏的说法不正确的是（人A）工具栏的位置可以任意改变B）工具栏一定在菜单栏的下方C）工具栏可以显示或隐藏D）V isual B asic有多个工具栏 考点 第 8 9 题 标题 答案B 考点下列程序P rivate S ub F orm_clic

40、k()s=V al(I nputB ox(，zinput value of s:)S elect C ase sC ase I s6 第8 6 题 标题f=s+1C ase I s5可以使X 为数值型数据的语句是()oA)X=val(I nputB ox(请输入数据)B)X=I nputB ox$(”请输入数据”)C)X=Textl.TextD)X=L istl.list(3)f=s+2C ase I s1.7 An d W =6 2.5 答案D 考点B)T=6 2.5C)T 1.7 An d W 1.7 Or W 6 2.5 答案c 第104题 标题 第108题 标题下列符号 是V i su

41、al Basi c中的合法变量名。A)x 23B)8x yC)E NDD)X8 B求100以内素数的代码：F or m =2 T o 100F or i =2 T o m -1I f(_)=0 T h en G oT o NotNex tMNex t iP r i n t m 答案A 考点NotNex tM:Nex t m(答案中若有字母，按小写字母输入)答案m m od i 第105题 标题 第109题 标题有如下程序：a$=F l yi n g :b$=I S :c$=*fun n y!P r i n t a$+Lease?(b$)+U case$(c$)E n d运行后输出的结果是。阅读

42、下面的程序P r i vate S ub F or m Cl i ck OD i m Ch eck As Bool ean,Coun ter As I n teg erCh eck =T r ueCoun ter =5DoDo While Counter 20Counter=Counter+1If Counter=10 ThenCheck=FalseExit DoEnd IfLoopLoop Until Check=FalsePrint CounterEnd Sub程序运行后,单击窗体,输出结果是【】答案10 第110题 标题执行下面的程序段后，i的 值 为【】，S的值为5。s 二 2For

43、i=3.2 To 4.9 Step 0.8s=s+1Next i 答案5.6 第111题 标题输入任意长度的字符串，要求将字母顺序倒置dim a$,c$,d$,n%,1%a=inputbox(输入字符串”)n二for I=1 to nc=mid(a,I,1)d=c+dnext Ia=dprint a(答案中若有字母，按小写字母输入)答案len(a)第112题 标题在窗体上打印一个数列0,0,1,2,4,7,13,24每个数都是前3个数值之和，直到30个数或最后一个超过1000为止。Private Sub Command1_C1ick()a=0:b=lc=l:d=a+b+cPring a;b;c

44、;1=5While I=30 and d Max Then Max 二 xNext iPrintPrint 最 大 值MaxEnd Sub 答案101 第115题我国有13亿人口，按人口年增长0.8%计算，多少年后我国人口超过26亿。程序如下：Private Sub Command1_Click（）x=13n=0Do Whilex=x*1.008n=n+1LoopPrint n,xEnd Sub（答案中若有字母，按小写字母输入）答案x 0.00001i=i+1n=n*it=1 /nLoopPrint 计算了 ；i;项的和是；e（答案中若有字母，按小写字母输入）答案e+t 第117题3 10的乘

45、积t=1For i=3 To 10Next iPrint t（答案中若有字母，按小写字母输入）答案t*i 第118题用辗转相除法求两自然数m,n的最大公约数。If m n Then t=m:m =n:n=tr=m mod nDo While（）m=nn=rr=m mod nLoopPrint”最大公约数二，n（答案中若有字母，按小写字母输入）答案r0 第119题有 根长度为321米的钢材料,要将它截取成两种规格a、b的长度分别为17米和27米的短料，每种至少1段，问分隔成a,b各多少段后，剩余的残料r最少？Private Sub Commandl_Click（）Dim a%,b%,r!,ia%

46、ib%r=321For b=1 To 321 27For a=1 To 321 17-bt=321-b*2 7-a*17If t 0 And t 160 Or（B*C200 And Not d60）的值是。（答案中若有字母，按小写字母输入）答案true 第126题表达式6 Mod 2*62/62的值为【】答案0 第1 2 7题表达式Len(Str(1.3)的值为 】答案4 考点 第1 2 8题以下语句的输出结果是：【】Print Int(1 2 3 4 5.6 7 8 9*1 0 0+0.5)/1 0 0 答案1 2 3 4 5.6 8 第1 2 9题设有如下程序段:a$=B e ij ing

47、Shanghaib$=Mid(a$,InStr(a$,z，g，z)+l)执行上面的程序段后，变量b$的值为【】答案Shanghai 第1 3 0题在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：Private Su b F orm_ C lick()Text 1.Text=VB 程序设计E nd Su bPrivate Su b Textl C hange0Pictu rel.Print z，VB Programming*E nd Su b程序运行后,单击窗体,在文本框中显示的内容是VB程序设计,而在图片框中显示的内容是【】答案VB Programming 第1 3 1题在窗体上

48、画一个名称为Textl的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Optionl,程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，如图所示，请填空。(请用小写)Private Su b Optionl_ C lick(Index A s Integer)Select C ase indexC ase 0a=宋 体 C ase 1a=黑 体 C ase 2a=楷体_ G B 2 3 1 2 E nd Selectt e x t l.=aE nd Su b(答案中若有字母，按小写字母输入)答案font name 第1 3 2题下 列 程 序

49、 运 行 的 输 出 结 果 是。Private Su b F orm_ C lick()i=1 0:j=0D oj=j+li=i-lLoop W hile i 2Print j;E nd Su b 答案8 第1 3 3题设有以下函数过程：F u nction fu n(m A s Integer)A s IntegerD im k A s Integer,su m A s Integersu m=0F or k =m To 1 Step-2su m=su m+kNext kfu n=su mE nd F u nction若在程序中用语句s=fu n(1 0)调用此函数，则s的值为 答案3 0

50、 第1 3 4题设有如下程序：Private Su b F orm_ C lick()D im n A s Integer,s A s Integern=8s=0D os=s+nn=n-1Loop W hile n 0Print sE nd Su b程序运行后，单击窗体，输 出 结 果 为 O 答案3 6 第1 3 5题表达式5 Mod2*6 2/6 2的值为 答案5 第1 3 6题达式Len(Str(1.3)mld2的值为 答案0 第1 3 7题F ormat 0.0 0%/)的返回值为 答案5 0 0.0 0%第1 3 8题F ormal(1 0,0.0 0犷)的返回值为【】答案1 0 0