vb考题3.doc_第1页
vb考题3.doc_第2页
vb考题3.doc_第3页
vb考题3.doc_第4页
vb考题3.doc_第5页
已阅读5页,还剩154页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、计算1到10的奇数的积,下面划线处应该使用哪组命令?_(1)_For J=1 to 10 _(2)_S=S*JNext JPrint S A.(1)S=1(2)Step 2 B.(1)S=1(2)Step -2 C.(1)S=0(2)Step 1 D.(1)S=0(2)Step 2 2、下面语句正确的是 A.If a10 Then a=a+1:b=b+a:c=c+b (不要选冒号粗的那个,因为那是中文时的冒号)B.If a10 Then a=a+1,b=b+a,c=c+b C.If a10 Then a=a+1;b=b+a;c=c+b D.If a10 Then a=a+1 b=b+a c=c+b 3、运行以下程序后,输出的结果是 (这题和考试题好像有点不同,好像少了那个Cls,所以考试的答案选了C)For i=1 to 5 step 2ClsPrint i=;I;Next I A.135 B.5 C.i=1 i=3 i=5 D.i=4、在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程:Private Sub Form_Load()Text1.Text= Text1.SetFocusFor i=1 To 10Sum = Sum + iNext iText1.Text = SumEnd Sub上述程序的运行结果是 A.在文本框Text1中输出55 B.在文本框Text1中输出0 C.出错 D.在文本框Text1中输出不定值5、Private Sub Form_Load()Text1.Text=Text1.SetFocusWhile i20s=s+Ii=i+6WendText1.Text=sEnd Sub A.在文本框Text1中输出6 B.在文本框Text1中输出36 C.在文本框Text1中输出0 D.程序出错 6、下面程序的运行结果是Sub Mysub(b()%)For i=1 To 4b(i)=2*INextEnd SubPrivate Sub Form_Click()Dim a(1 To 4)%a(1)=5:a(2)=6:a(3)=7:a(4)=8Mysub a()For i=1 To 4Print a(i)Next IEnd Sub A.2468 B.5678 C.10121416 D.25810 7、下面是窗体单击事件中的代码:Private Sub Form_Click()If x y Then Print xy”End Sub程序运行后单击窗体,在窗体上输出的结果是: A.x B.y C.不确定 D.xy8、设窗体单击事件中代码如下:a = int(-2.4) b = TrueFor I = 1 To 3 Select Case b Case 23 a = a + 1 Case 3344 a = a + 2 End Select Next I Print a 程序运行后,单击窗体,则在窗体上显示的内容是: A.3 B.2 C.1 D.0 9、设窗体单击事件中代码如下:a = int(-2.4) For I = 1 To 3 Select Case I Case 1 a = a + 1 Case 2 a = a + 2 End Select Next I Print a 程序运行后,单击窗体,则在窗体上显示的内容是: A.4 B.2 C.1 D.0 10、下面数组声明语句,正确的是 A.Dim c8,12 As Integer B.Dim c(8,12) As Integer C.Dim c8,12 As Integer D.Dim c(8 12) As Integer11、已知有数组声明:Dim a(-2 to 3,-2 to 5) as integer,引用数组元素,正确的是 A.a(0,0) B.a(-2) C.a0,0 D.a(6,0)12、若默认数组下界为1,并有数组声明语句Dim a(3,-1 To 16)则数组a包含元素的个数为 A.36 B.72 C.54 3*18D.18 13、根据内存区开辟时机的不同,可以把数组分为 A.一维数组和多维数组 B.一维数组和二维数组 C.静态数组和动态数组 D.其他都不对 14、下面的声明语句哪句是错误的? A.Dim A(100) B.Dim A(10 To 100) C.x=10 Dim A(5 to x) D.Dim A(5,10)15、静态数组定义后,下面哪句叙述的是正确的? A.可以使用ReDim再次定义 B.可以使用Private再次定义 C.可以改变类型 D.不可以再次定义16、下面数组声明语句,正确的是 A.Dim y10,10 As Integer B.Dim y(10,10) As Integer C.Dim y10,10 As Integer D.Dim y(10 10) As Integer17、以下哪个控件不可以获得焦点? A.文本框 B.命令按钮 C.标签 D.复选框18、一般在窗体上输入下面哪类数据时,使用单选钮接收? A.学生姓名 B.性别 C.年龄 D籍贯19、当组合框的style属性被设置为何值时,只能从下拉列表框中选择项目,而不允许输入文本? A.0 下拉,输入文本B.1 不下拉,不输入文本C.2 D.3 20、以下窗体的属性中只能通过属性窗口设置的属性为: A.Name B.Caption C.left D.Picture21、在使用print方法进行输出操作时,如果省略对象名称,则把信息输出到: A.立即窗口 B.打印机 C.当前窗体 D.图片框 22、将标签框的哪个属性设为True时,可根据Caption属性指定的标题自动调整标签的大小? A.Caption B.Autosize C.Alignment D.BorderStyle23、用来在标签中显示文本的属性为:A.Text B.Print C.Caption D.WordWrap24、当文本框1的内容发生变化时,要求文本框2的内容同时发生变化,应使用文本框1的什么事件触发? A.Change B.Gotfocus C.Lostfocus D.Setfocus25、文本框的TabIndex属性值是: A.当文本框是控件数组时的索引号。 B.运行时,tab键按下时文本框获得焦点的顺序。 C.没有什么用处。 D.运行时,回车键按下时文本框获得焦点的顺序。26、下面叙述哪个是正确的? A.图片框可以获得焦点。 B.图像框可以获得焦点。 C.图像框中可以作为容器使用。 D.形状控件可以作为容器使用。27、下面哪个属性可以使图片框的大小自动适应图片的大小? A.AutoSize B.Stretch C.Picture D.Enabled 28、下面哪个控件是容器? A.图像框 B.图片框 C.Shape控件 D.Line控件29、按钮有下面哪组事件? A.Change、DblClick B.LostFocus、GotFocus C.Scroll、Timer D.DblClick、Scroll30、一般在窗体上输入下面哪类数据时,使用单选钮接收? A.学号 B.姓名 C.性别 D.分数 31、组合框不能输入数据,只能通过选择下拉列表中的项目,Style属性值应该是: A.0 B.1 C.2 D.3 32、下面对计时器控件的陈述哪个是正确的? A.计时器在运行时是可见的。 B.计时器在运行时显示为一个随时间变化而变化的数字时间。 C.计时器控件可以在一定时间间隔内自动执行计时器timer事件过程中的程序。 D.使用计时器控件,只需要编制timer事件中的程序即可。33、语句Command1.Enabled=False的作用是 A.使命令按钮生效 B.使命令按钮重新出现 C.使命令按钮失去作用 D使命令按钮消失34、使用框架的主要目的是 A.对控件进行分组 B.使控件整齐有序 C.使窗体美观 D.便于控制控件35、在按钮的单击事件中有下面一句命令,4次单击按钮后输出的值是下面哪一个种?Private mPrivate Sub Command1_Click()m=m+1Print m;End Sub 0 1 2 3 0 0 0 0 1 1 1 1 1 2 3 4 36、变量a1中存放的是实领工资金额数值,在标签框中输出工资,选项中哪句是正确的?Dim a1 As Singlea1 = 1256.85 Label1.Caption = 实发工资为 + a1 + 元 Label1.Caption = 实发工资为 + Str(a1) + 元 Label1.Caption = 实发工资为 + left(a1, 4) + 元 Label1.Caption = 实发工资为 + Mid(a1, 4) + 元 37、如果需要产生随机整数,可以通过把随机数乘以一个整数再加1求得,一般格式为Rnd*整数 Rnd*整数+1 Int(Rnd+整数) Int(Rnd*整数)+1 38、下列变量名正确的是 (这题我错了)Print Print_Num 25 2A 39、在窗体上画一个命令按钮,然后编写如下的事件过程:Private Sub Command1_Click()Dim a as String,b as stringa=InputBox()b=InputBox()Print b+aEnd Sub程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是40、赋值语句:a=123&Mid(123456,3,2)执行后,a变量中的值是 12334 123 12334 157 41、已知A=12345678,则表达式Val(left(A,4)+mid(A,4,2)的值为( )。 123456 123445 8 6 42、函数Sgn(-10)的结果为( )。 0 -1 1 任意值 42、下列合法的整型变量是()。 P39num! sum% xinte$ mm# 43、下面语句执行完毕后,变量x的值为( )。(考试时这题的题目好像错了)x=12 mod -5 -2 2 -2.4 2.4 44、下面哪一个叙述为正确的? VB的编程非常简单,只要将窗体上的控件设置好,再将控件的属性按要求设置即可完成程序的编制。 VB的特点中的可视化编程是指随时可使用打印预览看一下效果。 VB的特点中的事件驱动机制是系统已经编制好的一些针对控件的程序,可以直接调用。 VB系统提供了数据库管理功能。 P345、一行命令可以分成多行写,在不是最后一行的行尾部需要加上续行符,下面哪个是续行符? 空格+下划线 下划线 空格+减号 减号 46、关于对象的属性不正确的是 对象的属性一般有属性名和属性值 可以通过属性窗口设置属性的值 可通过程序代码设置属性值 对象的所有属性值均可以在设计时设置 47、与Label1=姓名等价的语句是: Label1.Text=姓名 Label1.Name=姓名 Label1.Caption=姓名 Label1.Name=姓名 48、VB的注释语句是以( )开始的? P57Rem或 Rem或; Note或* Note或! 49、”abc”&Not -5*6:2=3 (具体题记不清了,答案就是这样的,注意空格。我在立即窗口敲出的答案是abc-30 False,和四个答案都不一样,而且这个好像只能复制才能敲出答案,自己输老出错)Aabc-30FalseBabc -30FalseCabc-30 falseDabc -30FalseA=12345678,Val(left(A,4) + mid(A,4,2)50、大小写转化51、MsgBox返回值的内容问题1年龄变量为整型,下面下划线处不能使用选择项目中的哪个表达式?Select Case nlCase _Case _End Select A.16 B.is 18 and is 20 C.30 To 40 D.31, 35 问题2下面程序在运行后,变量x的内容是什么?x=0for i=1 to 10Select Case iCase 2,4,6,8,10x=x+iEnd SelectNext i A.30 B.55 C.10 D.0 问题3当设计程序时按钮的caption属性值设置为1,运行时单击按钮,当奇数次单击,按钮的caption属性值为2,否则为1。下面划线处应该是哪条命令?Private Sub Command2_Click()_End Sub A.If Command2.Caption = 1 Then Command2.Caption = 2 B.If Command2.Caption = 1 Then _ Command2.Caption = 2 Else _ Command2.Caption = 1 C.If Command2.Caption = 2 Then Command2.Caption = 1 D.If Command2.Caption = 2 Then _Command2.Caption = 1 Else _ Command2.Caption = 2 问题4当设计程序时按钮的caption属性值设置为1,运行时,单击按钮,按钮上显示笑;再次单击,按钮上显示哭;再次单击,按钮上显示笑,如此往复。下面哪段程序正确? A.If Command1.Caption = 笑 Then Command1.Caption = 哭 B.If Command1.Caption = 笑 Then _ Command1.Caption = 哭 Else _ Command1.Caption = 笑 C.If Command1.Caption = 哭 Then Command2.Caption = 笑 D.If Command1.Caption = 哭 Then _ Command1.Caption = 笑 Else _ Command1.Caption = 哭 问题5单击按钮,当按钮上显示为开始考试,将计时器的enabled属性设为真,否则,不作任何处理。下面按钮单击事件中的程序哪个是正确的? A.If Command1.Caption = 开始考试 Then Timer1.Enabled = True B.If Command1.Caption = 开始考试 Then Timer1.Enabled = True End IF C.If Command1.Caption 开始考试 Then Timer1.Enabled = True D.If Command1.Caption 开始考试 Then Timer1.Enabled = True End If 问题6单击按钮,当按钮上显示为开始考试,将按钮的显示改为考试结束。下面哪段程序正确? A.If Command1.Caption = 开始考试 Then Command1.Caption=考试结束 B.If Command1.Caption = 开始考试 Then Command1.Caption=考试结束 End IF C.If Command1.Caption 开始考试 Then Command1.Caption=考试结束 D.If Command1.Caption 开始考试 Then Command1.Caption=考试结束 End If 问题7当每单击标签框一次,标签框的背景颜色就变化一次,但如果新的背景色和前景色是一个颜色,则不改变背景色,下面哪段命令是正确的? A.Private Sub Command1_Click()mcolor = Int(Rnd * 50000)If mcolor Label1.ForeColor Then Label1.BackColor = mcolorEnd Sub B.Private Sub Command1_Click()mcolor = Int(Rnd * 50000)If mcolor Label1.ForeColor Then Label1.BackColor = mcolor End IfEnd Sub C.Private Sub Command1_Click()Label1.BackColor = Int(Rnd * 50000)End Sub D.Private Sub Command1_Click()mcolor = Int(Rnd * 50000)If mcolor = Label1.ForeColor Then Label1.BackColor = mcolor End Sub 问题8如果成绩=80分标签框显示优秀,成绩=60并且80显示及格,成绩0且60显示不及格,下面哪段程序正确? A.If cj = 80 Then Label1.Caption = 优秀If cj = 60 Then Label1.Caption = 及格If cj = 0 Then Label1.Caption = 不及格 B.If cj = 0 ThenLabel1.Caption = 不及格ElseIf cj = 60 ThenLabel1.Caption = 及格ElseIf cj = 80 ThenLabel1.Caption = 优秀End If C.If cj = 80 ThenLabel1.Caption = 优秀ElseIf cj = 60 ThenLabel1.Caption = 及格ElseIf cj = 0 ThenLabel1.Caption = 不及格End If D.If cj = 80 ThenLabel1.Caption = 不及格ElseIf cj = 60 ThenLabel1.Caption = 及格ElseIf cj = 0 ThenLabel1.Caption = 优秀End If 问题9计算1到10的积,下面划线处应该使用哪组命令?_(1)_For J=1 to 10_(2)_Next JPrint S A.(1)S=0(2)S=S*1 B.(1)S=1(2)S=S*1 C.(1)S=0(2)S=S*J D.(1)S=1(2)S=S*J 问题10下面的程序功能是什么?S = 0While s 100Print Int(Rnd * 20)s = s + 2Wend A.打印100个20以内的随机整数。 B.打印50个20以内的随机整数。 C.打印1到100之间的偶数。 D.什么也没做。 问题11下面的程序功能是什么?S =1While s 100Print Int(Rnd * 20)s = s + 3Wend A.打印100个20以内的随机整数。 B.打印33个20以内的随机整数。 C.打印1到100之间的3的倍数。 D.什么也没做。 问题12如果备注(bz)是退学,成绩(cj)=-1;如果备注是缺考,成绩=0;如果备注是缓考,成绩=-2。下面哪段程序正确? A.If bz =退学 Then cj = -1If bz =缺考 Then cj = 0If bz =缓考 Then cj = -2B.If bz =退学,缺考,缓考 Then cj = -1,0,-2 C.If bz =退学 And 缺考 And 缓考 Then cj = -1 And 0 And -2 D.If bz =退学 Or 缺考 Or 缓考 Then cj = -1 Or 0 Or -2 问题13如果备注(bz)是退学,成绩(cj)=-1;如果备注是缺考,成绩=0;如果备注是缓考,成绩=-2。下面哪段程序正确? A.If bz =退学 Then cj = -1ElseIf bz =缺考 Then cj = 0ElseIf bz =缓考 Then cj = -2 End If B.If bz =退学,缺考,缓考 Then cj = -1,0,-2 C.If bz =退学 And 缺考 And 缓考 Then cj = -1 And 0 And -2 D.If bz =退学 Or 缺考 Or 缓考 Then cj = -1 Or 0 Or -2 问题14如果成绩=80分标签框显示优秀,成绩=60并且80显示及格,成绩0且60显示不及格,下面哪段程序正确? A.If cj = 80 ,60,0 Then Label1.Caption = 优秀, 及格, 不及格 B.If cj = 80 Then Label1.Caption = 优秀If cj = 60 Then Label1.Caption = 及格If cj = 0 Then Label1.Caption = 不及格 C.If cj = 0 Then Label1.Caption =不及格If cj = 60 Then Label1.Caption =及格If cj = 80 Then Label1.Caption =优秀 D.If cj = 80 ThenLabel1.Caption = 不及格ElseIf cj = 60 ThenLabel1.Caption = 及格ElseIf cj = 0 ThenLabel1.Caption = 优秀End If 问题15如果成绩=80分标签框显示优秀,成绩=60并且80显示及格,成绩0且61显示不及格,成绩100或者0标签框显示数据错误,下面哪个不正确? A.Label1.Caption = Iif(cj 100, 数据错误, Iif(cj = 80, 优秀, Iif(cj = 60, 及格, Iif(cj = 0, 不及格, 数据错误) B.Label1.Caption = IIf(cj 100 Or cj 0, 数据错误, IIf(cj = 80, 优秀, IIf(cj = 60, 及格, 不及格) C.If cj 100 Or cj 0 ThenLabel1.Caption = 数据错误ElseLabel1.Caption = IIf(cj = 80, 优秀, IIf(cj = 60, 及格, 不及格)End If D.If cj 100 And cj 0 ThenLabel1.Caption = 数据错误ElseLabel1.Caption = IIf(cj = 80, 优秀, IIf(cj = 60, 及格, 不及格)End If 问题16 下面程序执行后,会输出哪个结果?nl=8Select Case nlCase 8Print 1;Case Is=8Print 2;Case 8 to 100Print 3;Case 8,10,15Print 4;End Select A.1 B.1 2 C.1 2 3 D.1 2 3 4 问题17下面程序在运行时不出现消息框,文本框中的内容是选择项目的哪个值?nl=val(text1.text)Select Case nlCase is =90Msgbox 优秀,48,消息Case Is=80Msgbox 良好,48,消息Case Is=60Msgbox 及格,48,消息Case Is=0End Select A.120 B.80 C.65 D.-10 问题18下面程序在运行后,变量x的内容是什么?x=0for i=1 to 10Select Case iCase Is9x=x+iCase 2,4x=x+IEnd SelectNext I A.16 B.30 C.55 D.10 问题19计算1到100的奇数的和,下面划线处应该使用哪组命令?S=0For J=1 to 100 _(1)_(2)_Next JPrint S A.(1)Step 1(2)S=S+1 B.(1)Step 2(2)S=S+1 C.(1)Step 1(2)S=S+J D.(1)Step 2(2)S=S+J 问题20 计算1到100的偶数的和,下面划线处应该使用哪组命令?S=0For _(1)_ Step -2_(2)_Next JPrint S A.(1)J=100 to 1(2)S=S+J B.(1)J=1 to 100(3)S=S+J C.(1)J=100 to 2(4)S=S+1 D.(1)J=2 to 100(5)S=S+1 问题21 下面的程序功能是什么?S = 0While s 100Print Int(Rnd * 50)s = s + 1Wend A.打印100个50以内的随机整数。 B.打印1到100。 C.打印100个100以内的随机整数。 D.什么也没做。 问题22下面的程序功能是什么?S = 0While s 100Print Int(Rnd * 20)s = s + 1Wend A.打印99个20以内的随机整数。 B.打印100个20以内的随机整数。 C.打印101个20以内的随机整数。 D.什么也没做。 问题23下面的程序功能是什么?S = 0While s 100 Print Int(Rnd * 50)s = s + 2Wend A.打印100个50以内的随机整数。 B.打印50个50以内的随机整数。 C.打印1到100。 D.什么也没做。 问题24下面的程序实现1到10的乘积,请选择下划线处的命令:s = 1I = 1Dos = s * II = I + 1Loop While _Print s A.I10 B.I11 C.I10 D.I11 问题25下面哪个循环体内的语句1次也没有执行过? A.For I=1 to 10 Step -1Print iNext J B.For I=1 to 10 Step 0Print iNext J C.For I=1 to 10 Step 1Print iNext J D.For I=1 to 10 Step 2Print iNext J 问题26计算1到10的奇数的积,下面划线处应该使用哪组命令?_(1)_For J=1 to 10 _(2)_S=S*JNext JPrint S A.(1)S=1(2)Step 2 B.(1)S=1(2)Step -2 C.(1)S=0(2)Step 1 D.(1)S=0(2)Step 2 问题27下面的程序实现1到10的乘积,请选择下划线处的命令:s = 1I = 1Dos = s * II = I + 1Loop While _Print s A.I=10 B.I=11 C.I=10 D.I=11 问题28下面的程序实现1到100的求和,请选择下划线处的命令:s =0I = 1Dos = s + II = I + 1Loop While _Print s A.I=100 B.I=101 C.I=100 D.I=101 问题29下面的程序实现1到100的求和,请选择下划线处的命令:s = 0I = 1Dos = s + II = I + 1Loop While _Print s A.I100 B.I101 C.I100 D.I101 问题30下面的程序实现1到30的求和,请选择下划线处的命令:s = 0I = 1Dos = s + II = I + 1Loop While _Print s A.I30 B.I31 C.I30 D.I31 问题31下面的程序实现1到10的乘积,请选择下划线处的命令:s = 1I = 1Do While _s = s * II = I + 1Loop Print s A.I10 B.I11 C.I10 D.I11 问题32下面的程序实现1到100的和,请选择下划线处的内容:s = 1_(1)_Do While _(2)_s = s + II = I + 1Loop Print s A.(1)I=1(2)I100 B.(1)I=1(2)I=100 C.(1)I=2(2)I100 D.(1)I=2(2)I=100 问题33下面的程序实现1到100的和,请选择下划线处的内容:s = 0_(1)_Do While _(2)_s = s + II = I + 1Loop Print s A.(1)I=0(2)I100 B.(1)I=0(2)I=100 C.(1)I=1(2)I100 D.(1)I=1(2)I=100问题34下面的程序实现输入对话框输入数值数据,当输入end字符串输入结束,打印输入数据的和,请选择下划线处的内容:msj = InputBox(请输入数据:, 输入数据)Do While _(1)_(2)_msj = InputBox(请输入数据:, 输入数据)LoopPrint s A.(1)UCase(msj) END(2)s=s+val(msj) B.(1)UCase(msj) = END(2)s=s+val(msj) C.(1)UCase(msj) END(2)s=s+msj D.(1)UCase(msj) = END(2)s=s+msj 问题35下面的程序实现输入对话框输入数值数据,当输入-1字符串输入结束,打印输入数据的和,请选择下划线处的内容:msj = InputBox(请输入数据:, 输入数据)Do While _(1)_(2)_msj = InputBox(请输入数据:, 输入数据)LoopPrint s A.(1)val(msj) -1(2)s=s+val(msj) B.(1)val(msj) =-1(2)s=s+val(msj) C.(1)val(msj) -1(2)s=s+msj D.(1)val(msj) = -1(2)s=s+msj 问题36下面的程序,完成了什么功能?Dim a(3, 7)For I = Lbound(a, 1) To Ubound(a, 1)For j = Lbound(a, 2) To Ubound(a, 2)a(I, j) = Int(Rnd * 10) + 50Print a(I, j);Next jPrintNext I A.输出了21个0到50的数 B.输出了21个50到60的数 C.输出了32个0到50的数 D.输出了32个50到60的数 问题37数组a的下标是从1到20,数组中赋值了20个随机数,下面程序完成什么功能?For I = 1 To 20For j = I + 1 To 20If a(I) a(j) Thenmmm = a(I)a(I) = a(j)a(j) = mmmEnd IfNext jNext I A.将数组中的数据按值的大小升序排列好。 B.将数组中的数据按值的大小降序排列好。 C.将数组中的数据从头至尾调换了一下位置,第1个到了最后1个,第2个到了倒数第2个。 D.没有改变任何顺序。 问题38数组a的下标是从1到20,数组中赋值了20个随机数,下面程序完成什么功能?For I = 1 To 20For j = I + 1 To 20If a(I) a(j) Thenmmm = a(I)a(I) = a(j)a(j) = mmmEnd IfNext jNext I A.将数组中的数据按值的大小升序排列好。 B.将数组中的数据按值的大小降序排列好。 C.将数组中的数据从头至尾调换了一下位置,第1个到了最后1个,第2个到了倒数第2个。 D.没有改变任何顺序。 问题39数组a的下标是从1到20,数组中赋值了20个随机数,下面程序完成什么功能?For I = 1 To 20s=0For j = I + 1 To 20s=s+a(j)Next ja(I)=sNext I A.将数组中的数据按值的大小升序排列好。 B.将数组中本元素之后的所有元素中存放的数据之和放入本元素中。C.将数组中的数据从头至尾调换了一下位置,第1个到了最后1个,第2个到了倒数第2个。 D.将数组中本元素开始往后的所有元素中存放的数据之和放入本元素中。 问题40数组a的下标是从1到20,数组中赋值了20个随机数,下面程序完成什么功能?For I = 1 To 20s=0For j = I + 1 To 20s=s+a(j)Next ja(I)=a(I)+sNext I A.将数组中的数据按值的大小升序排列好。 B.将数组中本元素之后的所有元素中存放的数据之和放入本元素中。 C.将数组中的数据从头至尾调换了一下位置,第1个到了最后1个,第2个到了倒数第2个。 D.将数组中本元素开始往后的所有元素中存放的数据之和放入本元素中。 问题41下面的语句d=15Print Iif(d12,d大于12,d小于12)与之等价的条件语句是 A.d=15If d12 ThenPrint d小于12Else Print d大于12End If B.d=15If d12 ThenPrint d大于12Else Print d小于12End If Cd=15If d12 ThenPrint d大于12Else Print d小于12 D.d=15If d12 ThenPrint d大于12Else Print d小于12End If 问题42下面语句正确的是 A.If a10 Then a=a+1:b=b+a:c=c+b B.If a10 Then a=a+1,b=b+a,c=c+b C.If a10 Then a=a+1;b=b+a;c=c+b D.If a10 Then a=a+1 b=b+a c=c+b 问题43在块结构条件语句中,当If结构内有多个条件为True时,则 A.Visual Basic依次执行条件为True的后面的语句块 B.Visual Bas

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论