vb模拟试题全套

第一套1．下列关于程序设计的说法正确的是（B）A、程序设计就是指示计算机如何去解决问题或完成一组可执行指令的过程B、程序设计就是寻求解决问题的方法，并将其实现步骤编写成计算机可以执行的程序的过程C、程序设计语言的发展经历了机器语言、汇编语言到高级语言的过程，比较流行的高级语言是pascal、fortran、excel、c++等。D、程序设计语言和计算机语言是同一概念的两个方面2．图形符号“”在算法流程图描述中表示（C）A、算法的开始或结束B、输入输出操作C、处理或运算的功能D、用来判断条件是否满足需求3．Integer类型的变量可存的最大整数为（C）。A、256B、32768C、32767D、655364．代数表达式221gt改成VB表达式后，错误的是（D）A、g*t^2/2B、g*t*t/2C、1/2*g*t^2D、gt^2/25．对于窗体，click（单击）是它的一个（C）A、重要对象B、重要方法C、重要事件D、重要属性6．下列变量名写法错误的是（D）A、abcB、abc123C、abc_123D、123abc7．在VB中，下列（B）函数是求绝对值的。A、int（x）B、abs（x）C、sqr（x）D、gn（x）8．在VB中，设置控件的大小，可改变下列（A）属性A、height与widthB、heigth与topC、left与topD、left与width9．以下是一段vb程序：a=1b=a+1c=a+b它的基本结构属于（A）A、顺序结构B、选择结构C、循环结构D、树型结构10、下列程序段运行后，Value的值为（A）x=20ifx=10thenValue=5*xElseValue=4*xEndifA、100B、80C、90D、7011、下面是判断变量x是不是能被5整除的偶数的程序，横线上的逻辑表达式应为（A、B）PrivateSubCommand1_Click()DimxAsIntegerx=Val(text1.Text)If________________Thenlabel1.Caption=这个数是能被5整除的偶数Elselabel1.Caption=这个数不是能被5整除的偶数EndIfEndSubA、(xMod5)=0And(xMod2)=0B、xMod10=0C、xMod5=0D、xMod2=012、阅读下面程序，单击窗体后，在窗体上输出的是（A）PrivateSubform_Click()DimiAsIntegerDimsAsIntegers=0Fori=1To5s=s+iNextiPrints,iEndSubA、156B、s=15i=6C、65D、s=6i=513、阅读下面程序，单击窗体后，在文本框text1中显示的内容是（A）PrivateSubform_Click()Dimint1AsIntegerDimint2AsIntegerint1=1int2=0DoWhileint120int2=int1+int2int1=int1*(int1+1)LoopText1.Text=int2EndSubA、9B、8C、7D、614、下列程序段中，循环体执行的次数是（B）y=2dowhiley=8y=y+yloopA、2B、3C、4D、515、设计一个程序，打印下面所示的图案程序：PrivateSubForm_click()DimiAsInteger'定义i为整型变量DimjAsInteger'定义j为整型变量Fori=-3To3PrintTab(Abs(i)+5)'确定每行的起始位置Forj=1To(4-Abs(i))-1*********Print*;NextjPrintNextiEndSub16、编写程序，求)0(1)0(122xxxxxy的值。（x的值在程序中调用inputbox函数，在弹出的标准输入对话框中输入）。完成所有操作后，按“ctrl+s”保存PrivateSubForm_click()DimxAsSingle'定义x为单精度型变量，由标准输入对话框输入DimyAsSingle'定义y为单精度型变量，值由窗体显示x=Val(InputBox(请输入变量x))Ifx=0Theny=x*x+1Elsey=x*x-x+1EndIfPrinty=;yEndSub17、编程计算10019914131211s。PrivateSubForm_click()DimsAsSingle'定义s为单精度型数DimiAsInteger'定义循环变量s=0Fori=1To100IfiMod2=1Thens=s+1/iElses=s-1/iEndIfNextiPrints=;sEndSub18、编程求：鸡与兔在一个笼里，共有100条腿，40个头，问鸡有几只？兔有几只？PrivateSubForm_click()DimjiAsIntegerDimtuAsIntegerDimlegAsIntegerDimheadAsIntegerForji=1To50Fortu=1To25leg=ji*2+tu*4head=ji+tuIfleg=100Andhead=40ThenPrintji;tuEndIfNexttuNextjiEndSub第二套1．下列说法错误的是（）A、程序设计就是寻求解决问题的方法，并将其实现步骤编写成计算机可以执行的程序的过程B、程序设计语言的发展经历了机器语言、汇编语言、高级语言的过程C、计算机程序就是指计算机如何去解决问题或完成一组可执行指令的过程D、程序设计语言和计算机语言是同一概念的两个方面2．图形符号“”在算法流程图描述中表示（）A、处理或运算的功能B、输入输出操作C、用来判断条件是否满足需求D、算法的开始或结束3．下面（）不是字符串常量。A、”True”B、#false#C、””D、”你好”4．下面表达式的值是false的有（）A、str(2000)”1997”B、int(4.99)len(“basic”)C、32D、”969””n97”5．使用VB编程，我们把工具箱中的工具称为（）A、工具B、控件C、事件D、窗体6．在声明一个变量时，可能用到的关键字是（）A、EndB、AsC、SubD、Exit7．下列函数中，返回值是字符串的是（）A、ValB、InStrC、LenD、Mid8．在VB中，设置控件的位置，可改变下列（）属性A、left与topB、heigth与topC、left与widthD、height与width9．以下是一段vb程序：ifI=1thenx=x+1elsex=x+2endif它的基本结构属于（）A、循环结构B、树型结构C、选择结构D、顺序结构10、分析下列程序：privatesubform_click()s=11\3+11MOD3printsendsub当单击窗体是s的值为（）A、3B、4C、5D、611、下列程序段运行后，A的值为（）s=10ifA=10thenA=A+1ElseA=A-1EndifA、8B、9C、10D、1112、阅读下面程序，单击窗体后，在文本框text1和text2中显示的内容分别是（）privatesubform_click()dimxasinteger:yasintegerx=1:y=0dowhilex3y=y+xx=x+1looptext1.text=xtext2.text=yendsubA、33B、35C、53D、5513、阅读下面程序，单击窗体后，在文本框显示的内容是（）privatesubform_click()dimarray(10,10)asintegerdimI,jasintegerforI=1to3forj=2to4array1(I,j)=I+jnextjnextItext1.text=array1(2,3)+array(3,4)endsubA、12B、13C、14D、1514、下列程序段中，循环体执行的次数是（）x=0fory=1to10x=x+1nextyA、10B、11C、12D、1315、设计一个程序，打印下面所示的图案程序：PrivateSubForm_click()*************DimiAsInteger'定义i为整型变量DimjAsInteger'定义j为整型变量Fori=-3To3PrintTab(Abs(i)+5);'确定每行的起始位置Forj=1To2*(3-Abs(i))-1Print*;NextjPrintNextiEndSub16、编写程序，求y=6x-5的值。（x的值在程序中调用inputbox函数，在弹出的标准输入对话框中输入）。完成所有操作后，按“ctrl+s”保存PrivateSubForm_click()DimxAsSingle'定义x为单精度型变量，由标准输入对话框输入DimyAsSingle'定义y为单精度型变量，值由窗体显示x=val(inpubox(请输入变量x))y=6*x-5Printy=;yEndSub17、编写程序，求1+2+3+……+n=500中最小的n。PrivateSubForm_click()DimsAsSingle'定义s存入和DimnAsSingle'定义变量s=0n=0Don=n+1s=s+nLoopUntils=500Printn=;nEndSub18、编写递归函数求5！的函数PublicFunctions(nAsInteger)AsLongIfn=1Thens=1Elses=n*s(n-1)EndIfEndFunctionPrivateSubform_click()Prints(5)=;s(5)EndSub第三套1、下列关于算法的说法不正确的是（）A、其他三项都正确B、算法是程序设计的“灵魂”C、解决问题的过程就是实现算法的过程D、算法独立于任何具体的语言，BASIC算法只能用BASIC语言来实现2、下列流程图表示的是程序的（）基本结构的算法A、顺序结构B、选择结构C、循环结构D、其他三项都不是3、下列（）数据类型不是数值型A、DateB、DoubleC、SingleD、Integer4、表达式abs(-3.6)*sqr(100)的值是（）A、360B、-36C、-360D、365、在VB中，显示和编辑程序代码时，采用（）A、窗体设计器窗口B、工程资源管理器窗口C、代码编辑窗口D、属性窗口6、下列语句中定义了一个实型变量的是（）A、其他三项都不对B、dimnameasstringC、dimsumassingleD、dimendasinteger7、下列（）函数返回系统的当前时间A、time()B、date()C、day()D、year()8、能够改变复选框中背景颜色的属性是（）A、FONTB、BACKCOLORC、FONTCOLORD、VALUE9、以下是一段VB程序：a=1b=0forI=1to5b=b+a*InextI它的基本结构属于（）A、顺序结构B、选择结构C、循环结构D、树型结构10、下列程序段中，循环体执行的次数是（）x=0fory=1to10step–1x=x+1nextyA、1B、10C、0D、411、下列程序段运行后，m的值为（）a=2:b=1:c=5ifabthenm=aelsem=b语句块选择noyesifcmthenm=cA、1B、2C、5D、提示错误，无答案12、阅读下面程序，当单击窗体之后，m的值是（）privatesubform_click()dimmasinteger:dimIasintegerm=0forI=1to3m=m+2nextIprintmendsubA、0B、4C、6D、813、阅读下面程序，单击窗体后，在文本框text1和text2中显示的内容分别是（）privatesubform_click()dimxasinteger,nasintegerx=1n=0dowhilex20n=n+1x=x*3looptext1.text=str(x)text2.text=str(n)endsubA、273B、327C、203D、3211