大学VB期末考试试题6.pdf
第 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 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)tex 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 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)通过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)BackColorD)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、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的计算结果。如图所示。当移动滚动框时,在相应的标签中显示滚动条的值。当单击命令按钮 计算”时,对标签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 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二 计算机等级考试”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 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 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 题 标题)在窗体上画一个文本框,然后编写如卜.事件过程: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 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 的命令按钮,然后编写如下事件过程: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在窗体上画一个名称为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 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】中装入了 个图形,为了清除该图形(不删除图片框),应采用的正确方法是: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 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 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 Thend=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);Next 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(),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 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 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 nd 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运行输出的结果是()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,输出的结果是()。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 答案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 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后,窗体上显示的是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程序时,应分别保存窗体文件及工程文 考点件 第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 考点)从键盘上输入两个字符串,分别保存在变量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并接回车键,则下列叙述中正确的是()第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 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个项目,则以下能删除最后一项的语句是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属性指定窗体的名称,用来标识一个窗体()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 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下列不属于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_click()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 sual 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运行后输出的结果是。阅读下面的程序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 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;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的乘积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%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 ingShanghaib$=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题在窗体上 画一个名称为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题下 列 程 序 运 行 的 输 出 结 果 是。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 第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