VB试卷50

单项选择==================================================VisualBasic是一种面向_____的程序设计语言。A、过程B、用户C、工程D、对象执行VB工程时第一次出现的窗体称启动窗体，关于该窗体的叙述不正确的是_____。A、若不对启动窗体进行设置，工程中的第一个窗体默认为启动窗体B、启动窗体和其他窗体一样可以隐藏和关闭C、启动窗体一般作为用户工作的界面，不可更改D、启动窗体可进行设置，设置方法是执行“工程”菜单中的“属性”所谓_____就是使某个对象进入活动状态（又称激活）的一种操作或动作。A、对象B、属性C、方法D、事件VisualBasic程序设计时常用的Print、Cls属于_____。A、方法B、事件C、打印字库D、属性VisualBasic集成的主窗口中包括_____。A、标题栏B、工具栏C、菜单栏D、以上三者均有某过程有语句Frm1.Caption=Hello,在界面设计时，该窗体的标题属性取缺省值，则执行该语句前后，标题、属性值分别为_____。A、Form,HelloB、Form1,HelloC、Frm1,HelloD、Form1,Frm1对于一个含有计时器控件的窗体，每经过一段由_____属性指定的时间间隔，就会产生一个Timer事件。A、IntervalB、EnabledC、NameD、Caption窗体Form1的名称属性为frm，它的Load事件过程名为_____。A、Me_LoadB、Frm_LoadC、Form_LoadD、Form1_Load在多窗体的应用程序中，当前窗体模块的Form_Click事件过程中包含如下语句，单击该窗体，其中_____一定可以将Hello显示在当前窗体上。A、Form2.PrintHelloB、Me.PrintHelloC、Form1.PrintHelloD、Debug.PrintHello以下使用方法的语句中，正确的是_____。A、Form1.ClearB、List1.ClearC、Combo1.ClsD、Picture1.Clear如果在窗体上有命令按钮OK，在代码编辑窗口有与之对应的CmdOK_Click（）事件，则命令按钮控件的名称属性和Caption属性分别为_____。A、OK,CmdOKB、CmdOK,OKC、Cmd,OKD、OK,Cmd在设计阶段，当双击窗体上的某一个文本框控件时，系统将在代码窗口中显示该文本框控件的_____事件过程模板。A、DblclickB、ChangeC、GotfocusD、Click使用_____方法，可取得列表框中的项数。A、RemoveItemB、ListCountC、AddItemD、Clear下列控件中，可以接收焦点的是_____。A、图像框B、文本框C、形状D、框架当对象失去焦点时，将会发生_____事件。A、LostFocusB、FocusC、SetFocusD、GetFocus语句Print4+5\6*7/8Mod9的值是____________。A、5B、4C、6D、7下面程序段的功能是A=10.5B=INT(A+0.5)Debug.PrintBA、求平均值B、舍去一实数的小数部分C、将一实数四舍五入取整数D、求绝对值在代码编辑器中，如果一条语句太长，无法在一行内写下（不包括注释），要折行书写，可以在行末使用续行字符________________，表示下一行是当前行的继续。A、直接回车B、一个空格加一个下划字符(_)C、一个下划字符(_)D、一个空格加一个连字符(-)Int(198.555*100+0.5)/100的值____________。A、199.6B、198.56C、200D、198下面语句的输出结果是____________。x=10:y=3Print(x*y)\8A、5B、6C、3D、4下列不正确的变量名是________。A、Arry@B、TextC、CommandD、Form设整型变量a、b的当前取值分别为200与20，以下赋值语句中不能正确执行的是________。A、Text1=“200”*a/bB、Text1=a/b*aC、Text1=a&b&aD、Text1=a*a/b函数Cint(-3.5)，Int(-3.5)，Fix(-3.5)的值分别是________。A、-3，-4，-3B、-4，-4，-3C、-3，-4，-4D、-4，-3，-3为了给x,y,z三个变量赋初值1，下面正确的赋值语句是____________。A、x=1：y=1：z=lB、x=y=z=1C、x=1，y=1，z=1D、xyz=1下面____________是不合法的整常数。A、100B、&O100C、&H100D、%100下面____________是不合法的单精度常数。A、100.0D+2B、100!C、100.0D、1E+2MsgBox函数返回值的类型为____________。A、长整型B、数值或字符串C、字符串D、变体数学关系3=x10表示成正确的VB表达式为____________。A、x=3ORx10B、3=xAND10C、3=xANDx10D、3=x0表达式（-1）*sgn(-100+int(rnd*100))的值是__________.A、0B、1C、随机数D、-1以下说法不正确的是____________。A、Val()函数用来把自变量字符串转换为数值B、Log()函数产生一个0-1之间的单精度浮点数C、Chr＄()函数的作用是把自变量表达式的值转换为相应的ASCII码D、Rnd()函数产生一个0-1之间的单精度浮点数有如下程序代码：PrivateSubCommand1_Click()s=Sin(3.1415926/2)MsgBoxsEndSub程序运行后，消息对话框显示_____。A、1B、1.5708C、0D、2哪个程序段不能分别正确显示1、2、6、24的值_____。A、Fori=1To4n=1Forj=1ToiN=n*jNextjPrintnNextiB、n=1Forj=1To4N=n*jPrintnNextjC、n=1j=1DoWhilej=4n=n*jPrintnj=j+1LoopD、Fori=1To4Forj=1Toin=1n=n*jNextjPrintnNexti下列程序的输出结果是_____。DimyAsIntegery=10DoWhiley0y=y-1LoopPrinty=;yA、y=-1B、y=0C、y=随机值D、y=1有如下程序：PrivateSubCommand1_Click()score=65selectCasescoreCaseIs60a$=FCase60To69a$=DCase70To79a$=CCase80To89a$=BCaseelsea$=AEndSelectMsgBoxa$EndSub程序运行后，消息对话框中显示的内容为_____。A、DB、BC、AD、C在窗体上有一个文本框Text1，以下程序段的运行结果是_____。Text1=Fori=1To10Sum=Sum+iNextiText1=SumA、出错B、在文本框中Text1中输出55C、在文本框中Text1中输出不定值D、在文本框中Text1中输出0设有如下语句：strl=InputBox(输入,,练习)从键盘上输入字符串示例后，strl的值是_____。A、“练习”B、“示例”C、“输入”D、“”给出下面的程序PrivateSubCommand1_Click()DimCheck,CounterCheck=True:Counter=0DoCounter=Counter+1IfCounter=10ThenCheck=False:ExitDoLoopUntilCheck=FalseMsgBoxCounterEndSub程序最后弹出的消息对话框的内容是_____。A、FalseB、TrueC、20D、10用Msgbox（Hello,vbokonly,你好）显示的消息对话框窗口的标题是_____。A、OKB、HelloC、vbokonlyD、你好以下程序的输出结果是_____。DimiAsInteger,aAsIntegerDoWhilei20DoWhileTrueIfiMod10=0ThenExitDoElsei=i-1EndIfLoopi=i+11:a=a+iLoopPrintaA、21B、33C、32D、11下面语句错误的是_____。A、Ifa=1Thenc=2ElseIfa=2Thenc=3EndIfB、Ifa=1Andb=2Thenc=3EndIfC、Ifa=1Thenc=2ElseIfa=2Thenc=3EndIfD、If(a=1,2,3)Thenc=2在窗体上添加一个命令按钮，名为Command1，一文本框，名为Text1,则执行如下事件过程后，文本框中的输出为_____。PrivateSubCommand1_Click()Fori=1To4x=3Forj=1To3Fork=1To3x=x+3NextkNextjNextiText1.Text=Str(x)EndSubA、18B、30C、12D、6当Form1_Click事件发生时，程序的输出结果是_____。PrivateSubForm_Click()DimMAsInteger,kAsInteger,tAsIntegerM=5:k=7SelectCaseMcase1To10t=M:M=k:k=tCaseElseM=kMod3EndSelectPrintM,k,tEndSubA、755B、757C、575D、557下列循环能正常结束循环的是_____。A、i=5Doi=i+1LoopUntili0B、i=6Doi=i-2LoopUntili=1C、i=1Doi=i+2LoopUntili=10D、i=10Doi=i+1LoopUntili0下列是一个计算1到100的奇数的和的程序，为补充完该程序，填空应为____。PrivateSubCommand1_Click()DimsAsLong,xAsIntegers=0Forx=_____Step-2s=s+xNextxPrintsEndSubA、1To100B、100To1C、99To1D、1To99运行程序产生死循环时，按_____键可以终止程序的运行。A、Ctrl+ZB、Ctrl+BreakC、单击停止运行按钮D、Ctrl+C以下程序段的输出结果是____________。DimB(2,2)AsIntegerDimi,j,tAsIntegerFori=1To2Forj=0To2B(i,j)=jNextjNextit=1Fori=0To2Forj=0To2t=t+B(i,B(j,j))NextjNextIPrinttA、7B、1C、3D、4下列程序段的执行结果是________。DimA(3,3)ForM=1TO3ForN=1TO3IfN=MOrN=3-M+1ThenA(M,N)=1ElseA(M,N)=0EndIfNextNNextMForM=1TO3ForN=1TO3PrintA(M,N);NextNPrintNextMA、000000000B、111111111C、100010001D、101010101阅读下列程序，其输出的结果是________。PrivateSubCommand1_Click()Dima(1To3)AsIntegerFori=1To3a(i)=ibr/NextiCallsub1(a)Fori=2To3Printa(i)NextiEndSubPublicSubsub1(a()AsInteger)Fori=1To3a(i)=i*INextIEndA、12B、14C、23D、49对窗体编写如下代码：OptionBase1PrivateSubCommand1_Click()a=Array(237,126,87,48,498)m1=a(1)m2=1Fori=2To5I