【MOOC】程序设计基础（VB）-西北农林科技大学 中国大学慕课MOOC答案

【MOOC】程序设计基础（VB）-西北农林科技大学中国大学慕课MOOC答案第一章单元测验1、【单选题】VB集成开发环境有三种工作模式，不属于三种工作模式之一的是（）。本题答案：【编辑模式】2、【单选题】类是同种（）的集合和抽象。本题答案：【对象】3、【单选题】程序代码“Text1．Text=VisualBasic，其中的Text1、Text和VisualBasic分别代表（）。本题答案：【对象、属性、值】4、【单选题】要使某对象在运行时不可显示，应对()属性进行设置。本题答案：【Visible】5、【单选题】不论任何控件，共同具有的属性是()属性。本题答案：【Name】6、【单选题】启动窗体时，系统自动执行启动窗体的()事件过程。本题答案：【Load】7、【单选题】程序运行后，在窗体上单击鼠标，此时窗体不会接受到的事件是()。本题答案：【Load】8、【单选题】在VisualBasic中最基本的对象是()，它是应用程序界面设计的基础，是其他控件的容器。本题答案：【窗体】9、【单选题】PrivateSubForm_click()PrintHelloMe.ForeColor=vbRedEndSub第一次单击窗体，输出Hello的颜色为：（）本题答案：【黑色（默认颜色）】10、【单选题】对于窗体Form1，执行了Form1.Left=Form1.Left-300语句后，则该窗体()。本题答案：【左移】11、【单选题】当标签需要自动调整标签大小以适应文本长度时，可设置的属性是（）。本题答案：【AutoSize】12、【单选题】下列叙述错误的是（）。本题答案：【VB是面向过程的程序设计语言】13、【单选题】文本框不具有（）属性。本题答案：【caption】第二章单元测验1、【单选题】下列可以将变量x、y的值互换的是（）。本题答案：【t=x:x=y:y=t】2、【单选题】多条语句要书写在一行，用（）符号作分隔符。本题答案：【：】3、【单选题】赋值语句g=200+Mid(31415926,3,2)执行后，变量g的值是（）。本题答案：【241】4、【单选题】表达式A%+B+C!-D#的结果为()。本题答案：【双精度】5、【单选题】下列符号中，可以用作变量名的是()。本题答案：【abc123】6、【单选题】-35000的数据类型是()。本题答案：【字符串型常量】7、【单选题】下列选项中，为日期型常量的是（）。本题答案：【#5/10/2002#】8、【单选题】设S=Myname，可得到字符串My的选项是（）。本题答案：【Left(S,2)】9、【单选题】用于返回字符串的长度函数是（）。本题答案：【Len()】10、【单选题】语句PrintFormat(32548.5,000,000.00)的输出结果是（）。本题答案：【032,548.50】11、【单选题】Int(198.555*10+0.5)/10的值()。本题答案：【198.6】12、【单选题】要使变量x赋值为[50～100]间的一个随机整数，正确的语句是()。本题答案：【x=INT(51*RND+50)】13、【单选题】如果x是一个正实数，可使x保留2位小数的表达式是()。本题答案：【0.01*Int(100*(x+0.005))】14、【单选题】表达式Val(4.5674e2)的值为()。本题答案：【456.74】15、【单选题】已知a=abcdefgh，则表达式right(a,4)+Mid(a,3,4)的值是()。本题答案：【efghcdef】16、【单选题】如果变量a=12、b=the、c=sdf、d=30，则表达式a*3mod4d\4ANDbcANDdc的值是()。本题答案：【True】17、【单选题】数学关系3≤x10表示成正确的VB表达式为()。本题答案：【3=xANDx10】18、【单选题】在VB中，能正确表达“X是小于100的非负数”的表达式是（）。本题答案：【X=0AndX100】19、【单选题】Dimx%,y%x=Inputbox(请输入第一个数)y=Inputbox(请输入第二个数)printx+y当输入分别为12和34时，程序输出为（）。本题答案：【46】20、【单选题】有如下代码：dimaaslong,baslonga=Inputbox(请输入第一个数)b=Inputbox(请输入第二个数)printab程序运行后，在两个对话框中先后输入12345和54321，则输出结果是（）。本题答案：【1234554321】基本控制结构随堂测试1、【单选题】VB三种结构化程序设计的基本结构是（）。本题答案：【顺序结构、选择结构、循环结构】第三章单元测验1、【单选题】VB的三种结构化程序设计的基本结构是（）。本题答案：【顺序结构、选择结构、循环结构】2、【单选题】设用Max表示x、y中较大的数，则下面语句中不正确的是（）。本题答案：【Ify=xThenMax=yMax=x】3、【单选题】下面语句执行后，变量W的值为（）。W=Choose(Int(3.6),Red,Green,Blue,Yellow)本题答案：【Blue】4、【单选题】设窗体上有一个文本框Text1，以下程序段的功能是（）。PrivateSubText1_KeyPress(KeyAsciiAsInteger)IfKeyAscii65OrKeyAscii90ThenKeyAscii=0EndIfEndSub本题答案：【该文本框只能接收A-Z之间的字母字符】5、【单选题】循环结构Fori=1to20step5一共执行（）次循环。本题答案：【4】6、【单选题】如下循环结构执行结束后i值将等于（）。Fori=1To15Step4……Nexti本题答案：【17】7、【单选题】下列程序段能实现在Form窗体上按指定格式分多行输出数据，问每行能输出（）个数据。Dimi%Fori=1To30PrintTab(((i-1)Mod5)*6);i;Nexti本题答案：【5】8、【单选题】InputBox函数返回值的类型为()。本题答案：【字符型】9、【单选题】下列程序的运行结果是（）。a=78Ifa50Theni=5ElseIfa60Theni=6ElseIfa70Theni=7ElseIfa80Theni=8EndIfPrinti本题答案：【5】10、【单选题】以下程序代码能执行的是（）。本题答案：【Ifa=1Thenb=0ElseIfc=0Thend=0EndIf】11、【单选题】某工厂当年产值为12亿，以后每年的产值按5%的速度增长，能正确计算四年后总产值的程序是（）。本题答案：【s=12:sum=12:r=0.05Fori=1996To1998s=s*(1+r)sum=sum+sNextiPrintsum】12、【单选题】下列程序段中不能正确计算1!、2!、3!的值是（）。本题答案：【Fori=1to3Forj=1toin=1n=n*jNextjPrintnNexti】13、【单选题】以下说法正确的是（）。本题答案：【ExitDo语句只能退出Do……Loop循环】14、【单选题】以下程序段的运行结果是（）。a=abcdeFori=3To1Step-2x=Left(a,i)y=Right(a,i)z=zxyNextiPrintz本题答案：【abde】15、【单选题】下面If语句统计满足性别(sex)为男、职称(duty)为副教授以上、年龄(age)小于40岁条件的人数，不正确的语句是()。本题答案：【Ifsex=男Andage40Andduty=教授Andduty=副教授Thenn=n+1】第五章单元测验1、【单选题】用冒泡排序算法对下列数据：123742192735564410，进行从小到大的排序，在将最大的数“沉”到最后时，数据的顺序是（）。本题答案：【123719273542441056】2、【单选题】用某种方法排序，调整序列如下，所选排序方法为（）。7428106304281763012847630128476301234768012347680123467801234678本题答案：【选择排序】3、【单选题】对N个记录进行简单选择排序，最少的比较次数为（）。本题答案：【N-1次】4、【单选题】对于长度为9的有序表，在进行折半查找时，查找失败，最多需要比较（）次。本题答案：【4次】5、【单选题】折半查找有序表(4,6,10,12,20,30,50,70,88,100)。若查找表中元素58,则它将依次与表中（）比较大小,最终的查找结果是失败。本题答案：【20,70,30,50】6、【单选题】下面的程序用于根据文本框X中输入的内容进行以下处理：若X为2、4、6，则打印X的值为2、4、6；若X在11到15之间，则打印X的值为大于等于11小于等于15；若X大于20，则打印X的值大于20；否则，打印X不在范围内。PrivateSubCommand1_Click()SelectCaseVal(X.Text)CasePrintX的值为2,4,6Case11to15PrintX的值为大于等于11小于等于15CaseIs20PrintX的值大于20CaseElsePrintX不在范围内EndSelectEndSub本题答案：【2,4,6】7、【单选题】找出被3、5、7除，余数均为1的最小的5个正整数。PrivateSubCommand1_Click()Dimcountn%,n%n=1:countn=0Don=n+1IfThenPrintncountn=countn+1EndIfLoopuntilcountn=5EndSub本题答案：【nmod3=1Andnmod5=1Andnmod7=1】8、【单选题】编程显示100~500之间所有的水仙花数之和。(水仙花数是3位数，其各位数立方之和等于该数本身)PrivateSubForm_Click()Print100~500之间所有的水仙花数为：Dimx%,a%,b%,c%Forx=100To500a=xMod10b=(xMod100)\10c=x\100IfThenPrintxNextxEndSub本题答案：【x=a^3+b^3+c^3】9、【单选题】输入两个整数M，N，求它俩的最大公约数。PrivateSubCommand1_Click()Dimm%,n%，t%，x%m=Val(InputBox(请输入第1个数m：))n=Val(InputBox(“请输入第2个数n：”))IfmnThent=m:m=n:n=tFory=nTo1Step-1IfThenPrint最大公约数为：;yExitForEndIfNextyEndSub本题答案：【mMody=0AndnMody=0】10、【单选题】从键盘输入一个数N，判断是否为质数。PrivateSubCommand1_Click()DimN%,I%,K%N=Val(InputBox(N=？))K=N-1ForI=2ToKIfNModI=0ThenExitForNextIIfThenPrintN;“是质数ElsePrintN;“不是质数EndIfEndSub本题答案：【IK】第六章单元测验1、【单选题】要想从子过程调用后返回两个结果，下面子过程语句说明合法的是（）。本题答案：【Subf(n%,m%)】2、【单选题】以下叙述错误的是（）。本题答案：【表达式中可以调用Sub过程】3、【单选题】假定定义了一个过程SubAdd(aAsSingle,bAsSingle)，则正确的调用语句是()。本题答案：【Add12,12】4、【单选题】Sub过程与Function过程的区别是（）。本题答案：【Sub过程名不能返回值，而Function过程可通过过程名返回值。】5、【单选题】定义过程时，关键字Private的作用是（）。本题答案：【此过程只可以被本窗体模块中的其他过程调用。】6、【单选题】同一个模块内的不同过程之间相互传递数据，以下叙述错误的是（）。本题答案：【利用过程级变量】7、【单选题】过程中定义的变量，在过程结束后，对该过程保留变量的值，则应该使用（）关键字。本题答案：【Static】8、【单选题】下面的程序输出100-300之间的素数，阅读程序并填空。Functionsushu(ByvalxAsInteger)AsBooleanDimiAsIntegersushu=FalseFori=2Tosqr(x)IfxModi=0ThenexitforNextiIfi=sqr(x)Then_____________EndFunctionPrivateSubCommand1_Click()DimmAsIntegerForm=100To300Ifsushu(m)ThenPrintm;NextmEndSub本题答案：【sushu=True】9、【单选题】下列程序可以求方阵对角线元素之和。OptionBase1PrivateFunctiondjx(a%(),n%)AsIntegerDimi%Fori=1TonSum=Sum+a(i)NextiIfnMod20ThenSum=Sum-a(n\2+1,n\2+1)EndIfdjx=SumEndFunctionPrivateSubCommand1_Click()Dima%(),n%n=InputBox(n=)ReDima%(n,n)Fori=1TonForj=1Tona(i,j)=Int(Rnd*9+1)Printa(i,j);NextjPrintNextiPrint对角线元素之和为：_____________EndSub本题答案：【djx(a,n)】10、【单选题】下列程序用选择法升序排序。阅读程序并填空。OptionBase1PrivateSubpaixu(a())n=Ubound(a)Fori=1Ton-1k=iForj=i+1TonIfa(j)a(k)Thenk=jNextjt=a(i):a(i)=a(k):a(k)=tNextiEndSubPrivateSubCommand1_Click()Dimb(),iAsIntegerb=Array(15,8,4,13,6,10,17,1)n=UBound(b)Print排序前：;Fori=1TonPrintb(i);NextiPrint_____________Print排序后：;Fori=1TonPrintb(i);NextiEndSub本题答案：【callpaixu(b)】11、【填空题】在窗体的通用程序段中用关键词Dim声明的是()级变量。本题答案：【模块】12、【填空题】变量的作用域可以分为过程级、()和全局级。本题答案：【模块级】13、【填空题】在子过程的调用中，要按地址进行参数传递，实参只能是变量或()。本题答案：【数组】14、【填空题】形参是数组时，只能采用（）传递方式。本题答案：【传地址】7.1测验1、【单选题】文件号最大可取的值为（）本题答案：【512】7.2随堂测验1、【单选题】下列关于顺序文件说法正确的是（）本题答案：【记录按进入的先后顺序存放的，读出也是按原写入的先后顺序读出】7.3随堂测验1、【单选题】要从磁盘上读入一个文件名为“c:\t1.txt”的顺序文件，下列（）是正确的语句H、2本题答案：【F=c:\t1.txtOpenFForInputAs#2】7.4随堂测验1、【单选题】使用Open语句打开文件时，下面哪个打开方式是以随机方式打开文件()本题答案：【Random】7.5随堂测验1、【单选题】下面关于随机文件的描述不正确的是()本题答案：【一个文件中记录号不必唯一】第7章单元测验1、【单选题】要向已有数据的c:\test\test．txt顺序文件添加数据，正确的文件打开命令是（）。H、51l本题答案：【OpenC:\test\test.txtForAppendAs#511】2、【单选题】以下有关文件的说法中，错误的是（）。本题答案：【用Binary方式打开一个随机文件，每次读写数据的字节长度取决于随机文件的记录长度】3、【单选题】以下有关文件的说法中，正确的是（）本题答案：【打开随机文件时，参数Len的值可任意设置】4、【单选题】执行语句OpenSample.datForRandomAs#1Len=50后，对文件Sample.dat中的数据能够进行的操作是()本题答案：【即可以读，也可以写】5、【单选题】为建一个随机文件，其中每一条记录由多个不同数据类型的数据项组成，应使用（）。本题答案：【记录类型】6、【填空题】数据文件按访问模式分为：（）、随机文件、和二进制文件。本题答案：【顺序文件】7、【填空题】数据文件按照存储信息的形式可以分为ASCII文件和（）。本题答案：【二进制文件】8、【填空题】在顺序文件中可以一次读入一行字符的语句是（）。本题答案：【LineInput】9、【填空题】如果用Open语句打开文件时缺省了访问类型，则VB默认的访问类型是（）本题答案：【随机访问】10、【填空题】用Openc:\student.txtForinputAs#1打开文件student.txt后，调用函数（）可判断文件的记录指针是否达到了文件末尾。本题答案：【Eof（1）】选择题1、【单选题】确定一个窗体或控件的大小的属性是()本题答案：【Width和Height】2、【单选题】要判断在文本框内是否按下了空格键，最好在文本框的()事件过程进行判断。本题答案：【KeyPress】3、【单选题】以下说法错误的是（）本题答案：【一个工程中包含有Form1、Form2、Form3这3个窗体对象，当单击启动按钮时，程序一定先运行Form1窗体，而不能先运行其他窗体对象。】4、【单选题】在立即窗口执行如下语句，则输出结果是（）。x$=Mydocumenty$=Deletec$=y$Ucase(Mid(x$,3,8))printc本题答案：【DeleteDOCUMENT】5、【单选题】InputBox函数返回值的类型为()。本题答案：【字符串】6、【单选题】数学关系3≤x10表示成正确的VB表达式为()本题答案：【3=xANDx10】7、【单选题】如果变量a=12、b=the、c=sdf、d=30，则表达式a*3mod4d\4ANDbcANDdc的值是()。本题答案：【True】8、【单选题】VB的三种结构化程序设计的基本结构是（）。本题答案：【顺序结构、选择结构、循环结构】9、【单选题】下面语句执行后，变量W的值为（）。W=Choose(Int(4.3),Red,Green,Blue,Yellow)本题答案：【Yellow】10、【单选题】下列程序的运行结果是（）。a=7SelectCaseaCaseIs2b=a+1CaseIs3b=a+2CaseIs5b=a+3CaseElseb=a+4EndSelectPrintb本题答案：【8】11、【单选题】下列程序段的执行结果为（）。A=2:B=1DoA=A+BB=B+1LoopWhileA5PrintA,B本题答案：【53】12、【单选题】下列程序段的输出结果为（）。DimA(5)Fori=1to5A(i)=i*iNextiPrintA(i)本题答案：【下标越界出错信息】13、【单选题】有关数据文件的正确描述是()本题答案：【因为随机文件中的记录是等长的，所以可以对文件中的记