豆丁微信公众号
君，已阅读到文档的结尾了呢~~
扫扫二维码，随身浏览文档
手机或平板扫扫即可继续访问
VB程序设计试题一
举报该文档为侵权文档。
举报该文档含有违规或不良信息。
反馈该文档无法正常浏览。
举报该文档为重复文档。
推荐理由：
将文档分享至：
分享完整地址
文档地址：
粘贴到BBS或博客
flash地址：
支持嵌入FLASH地址的网站使用
html代码：
&embed src='http://www.docin.com/DocinViewer-4.swf' width='100%' height='600' type=application/x-shockwave-flash ALLOWFULLSCREEN='true' ALLOWSCRIPTACCESS='always'&&/embed&
450px*300px480px*400px650px*490px
支持嵌入HTML代码的网站使用
您的内容已经提交成功
您所提交的内容需要审核后才能发布，请您等待！
3秒自动关闭窗口问卷正在加载中，请稍候...
如果由于网络原因导致此框一直不消失，请重新刷新页面！
基本信息：*姓名：班级：1.“对象”是面向对象程序设计中的重要概念，下列哪个选项不是VB中的对象？代码框文本框窗体命令按钮2.下列表达式的值为False的是”969”&”n97”6&>len(“basic”)3>23.下列各组控件都具有Caption属性的是窗体、文本框文本框、定时器窗体、标签标签、定时器4.如下VB程序段
For i=1 to 3
循环结束后，变量i的值为61345.下列关于递归的叙述正确的是“从前有座山……”，老和尚讲故事的例子是一个完整的递归算法过程“两个镜面正对的平面镜中，物体的像无限映照“，这是一个完整的递归算法过程递归算法分为递推和回归两个过程递归函数和递归过程都能返回参数值6.如下VB程序段
Select Case i
End Select
程序运行后，变量x的值为413917.下列选项中，可作为VB变量名的是 Integer Beta Double Single8.关于数组定义语句“Dim
Single”,下列叙述正确的是该数组最多能够存放20个整数该数组最多能够存放20个单精度实数该数组最多能够存放30个双精度实数该数组最多能够存放30个单精度实数9.图形符号“ ”在算法描述流程图中表示判断条件是否满足需求处理或运算的功能输入输出操作算法的开始或结束10.关于VB中的数组，下列说法错误的是数组元素的引用形式为“数组名(下标)”数组是一种基本数据类型数组中的若干元素是一个整体数组是一组相同类型的变量集合11.已知字符“d”的ASCII编码是，则字符“g”的ASCII编码是12.如下VB程序段
Private Sub Form_Click()
Dim s As Boolean
s= Not 2*5 && 11
单击窗体后，S的值是True01False13.下列关于常量的描述，错误的是在VB中的常量有数值型常量、字符常量等字符串常量包括双引号本身数值型常量类似于数学中常数用一对半角双引号括起来的字符串称为字符串常量14.如下VB程序段
Dim x As Integer
Dim y As Integer
If x&0 Then
If x=0 Then y=0 Else y=-1
运行后，y的值是641-1015.如下VB程序段
Do While i&100
它的基本结构属于 树型结构 顺序结构 选择结构 循环结构16.要在名为Lbl_Show标签上显示“信息技术学业考试”，则程序中应使用的代码为Lbl_Show.Caption=信息技术学业考试Lbl_Show.Label=信息技术学业考试Lbl_Show.Caption=”信息技术学业考试”Lbl_Show.Text=”信息技术学业考试”17.用下列哪个变量名作为家庭地址的变量命名较符合规范straddressblnaddresslngaddressintaddress18.下列四个VB对象中，没有Caption属性的是窗体命令按钮标签文本框19.如下VB程序段
For i=2 to 4 step -2
运行程序后，变量S，I的值是 0，2 2，4 程序出错 0，020.在VB中，表达式Left(“Basic”&”程序设计”，6)的结果是ic程序设计序设计Basic程Basic21.在描述算法的流程图中，表示运算与处理的符号框为22.如下VB程序段
Do while a&=b
执行后，a、b的值分别为8、82、116、644、223.VB提供的标签控件(label)具有的功能是计时显示文本输入文本插入图片24.如下VB程序段
Dim x As Integer
Print (x\2)*Int(-2.1)
执行后，显示的结果为-5.25-7.5-6-525.在VB程序中，执行Print “23”+“45”语句的结果是False2345“23+45”6826．Visual Basic、Java是面向对象的程序设计语言，它们属于汇编语言高级语言机器语言自然语言27.返回指定日期“月份”的函数是Day()Year()Month()Date()28.算法描述可以有多种表达方法，下面不可以用来描述算法的是伪代码机器语言自然语言流程图29.在VB中，表达式的值在区间[5，15)内的是Rnd*14+5Rnd*10+5Int(Rnd*11)+5Int(Rnd*5)+1030.在VB中，下列哪个选项是正确的赋值语句a4=100100=aa+s=5675a=10031．如下VB程序段
For i=0 To 100
它的基本结构属于选择结构树型结构顺序结构循环结构32.下列选项中，不属于高级程序设计语言的是C++汇编语言PascalVB33.如下VB程序段
If a&b Then m=a Else m=b
If c&m Then m=c
运行后，m的值为72提示错误，无答案2334．在VB中，要设置窗口的标题文本，应设置的窗体属性是TextFontNameCaption35．在VB中，表达式Left(“2014年青奥会”，6)的值为20142014年2014年青奥会2014年青36．在用流程图描述算法时，表示判断的图形符号是37．在VB程序设计中，变量的命名要遵循一定的规则。下列变量名合法的是a#22achinaas38.双击窗体中的对象后，VB将显示的窗口是属性窗口项目(工程)窗口工具箱代码窗口39.计算机中信息存储的基本长度单位是字长字节二进制的位字40.如下VB程序段
If a=b Then Print “Y” Else Print “N”
关于程序段IF语句中“a=b”的说法，正确的是把变量a的值赋给变量b变量a和变量b的值是否相等交换变量a与变量b的值把变量b的值赋给变量a41.如下VB程序段
For i=10 To 1
程序运行后，Print i 语句执行的次数是执行1次一次也不执行出错执行10次42.在VB中，设a=2,b=3,表达式a=3值是01FalseTrue43.在VB中，表达式Mid(“程序设计”，2)的结果是序序设计程程序44.输入1到100之间所有的质数，可用下列哪个算法实现？解析法排序法二分查找法穷举法45.如下程序段
For i=1 To 10
执行后，屏幕将输出1002101105546.在VB中，下列哪个选项是命令按钮的事件？LoadChangeClickDblclick47.如下VB程序段
运行后，在文本框Text1中输入5，程序输出的结果是10200510048.在VB中，已知a,b,c三个变量都已赋有互不相同的值，下列语句
执行后，其值相等的变量是a，ba，cb，ca，b，c49.下列选项中，属于算法描述方法的是流程图枚举法集合法列表法50.在VB中，表达式Mid(“初识VB程序”，4，3)的结果是识VBB程序VB程程序51.将数学表达式 写成VB的表达式，下列选项正确的是a+b/2a(a+b)/2*a(a+b)/2a(a+b)/(2*a)52.下列选项中，属于窗体对象Form1方法的是Form1.CaptionForm1.ClickForm1.NameForm1.Print53.下面是求圆的面积的VB程序
Dim r As Single ……①
Dim s As Single
r=2.7 ……②
s=r2*3.14 ……③
print s ……④
其中错误的语句是④③①②54．如下VB程序段
执行后，变量a的值为324555.如下VB程序段
Dim x As Boolean
程序的运行后，显示的结果是-10TrueFalse56.在VB中，表达式123 & Mid(“123456”,3,2)的结果是157123123341234557.与人类自然语言最为接近的计算机程序设计语言是汇编语言机器语言低级语言高级语言58.下列选项中，属于VB合法变量名的是sum33sumsum+3int59.在VB中，设a=2,b=3,c=4,表达式a=b Or 3*a&c值是True32False60.在VB中，要设置文本框的背景色，应设置的文本框属性是TextNameBackColorForeColor61.如下VB程序段
IF X&0 THEN
它的基本结构属于顺序结构循环结构选择结构树型结构62.下列关于算法的叙述，错误的是算法一定有输入算法必须有输出算法可以使用程序设计语言来实现算法必须执行有限步以后能结束63.如程序中定义如下数组：Dim
Integer, 则以下关于数组元素引用错误的是a(2)a(23+5)a(101)a(11\2)64.下列说法中错误的是在word中可以插入表格，word具有对表格进行排序的功能在powerpoint中也可以插入表格，并且具有对表格中数据进行排序的功能利用excel电子表格软件可以方便地进行排序，并且具有自定义排序的功能用编程来解决排序问题是一种可行的方法65.为了提高程序的可读性，可以在语句后面添加注释语句，VB程序中用作注释的标识符是，’：！66．在VB中，要设置文本框中显示的内容，应设置的文本框属性是NameCaptionFontText67.将代数式 改为VB表达式，正确的写法是x-y/(x+y)x-y/x+y(x-y)/x+y(x-y)/(x+y)68.在VB中，表达式Int(x/2)=x/2的作用是用于测试X是否为偶数返回一个非整数返回一个奇数用于测试X是否为奇数69.如下程序段
执行后，其值相等的是X，BX，ZX，YY，Z70．利用VB编程实现求圆的面积，若要从文本框Text1中获取圆半径r，正确的语句是r=val(Text.Text1)Text.Caption=Str(r)Text1.Text=val(r)r=val(Text1.Text)71.下列选项中，正确引用字符型数据的是“hello”‘thank’3.14“1”72.下列选项中，逻辑表达式的结果为真的是Int(-1.8)=-Abs(2)Cos(0)=Sin(90)Sin(0)=Rnd-1Int(1.8)=Sqr(4)73.关于程序设计语言发展三个过程的下列叙述中，正确的是机器语言、高级语言、面向对象机器语言、汇编语言、高级语言自然语言、机器语言、人工智能自然语言、伪代码、流程图74.如下VB程序段
执行后，变量C的值是2345493675.在VB中，设a=2，b=3，c=4，d=5，表达式a&b or c&=d的值是0False1True76.在VB中，已知x= -3、y=5，运行如下程序段后，X、Y的值分别为
x=x + Abs(y)
y=x + y3、-55、-3-5、3-2、-577.下列语句中，要更改窗体的背景色，需要设置的属性是ForeColorFillColorBackGroundBackColor78.VB表达式Int(-5.6)/2的值等于-223-379.下列选项中，可以精确地绘制出函数图像(如y=x2)的软件是Visual Basic画图Photoshop记事本80.在VB中，以下声明符号常量的语句，正确的是Public
String=”Visual”Dim
StringConst
StringConst
String=”Visual
Basic”81.如下VB程序段
Do while x&50
x=(x+2)*(x+3)
执行后x的值为
1680725082.在VB中，下列函数结果是数值型的是Chr(x)String(2，“x2”)Len(x)Str(x)83.在VB中，若要在文本框中输入密码(内容只显示“*”)，则应当设置Caption属性值为“*”设置Name属性值为“*”设置Passwordchar属性值为“*”设置Text属性值为“*”84.如下VB程序段
程序运行结果是261025585.VB中Integer表示整型，其最大的取值是32767655353276686.在VB中，表达式6 \ 4的值是011.5出错87.现实生活中有一些工作可以通过编程来解决。下列描述中，不必使用编程来处理的是编辑一份《调查报告》灭火机器人驱动系统学籍管理系统“神舟七号”发射管理系统88.如下VB程序段
Select Case b
End Select
执行后，a、b的值分别为6、26、31、21、389.下列哪个选项不是VB中合法的变量名？a007no_1cd*sum90.下列选项中，不是标签控件具有的属性是TextLeftEnabledBackcolor91.为了抓取计算屏幕显示画面，可以使用按键Print
ScreenShift+CAlt+CCtrl+V92.在VB中，描述X、Y中存在一个小于Z的逻辑表达式是x+y & zx&z
y&zx & y & zx&z
y & z93.“输入对话框”是VB中一种重要的交互式输入数据的方法。
下列哪一个选项可以实现如图所示的对话框？InputBox(“请输入r”,“输入圆半径”)InputBox(请输入r，输入圆半径)MsgBox(“请输入r”，“输入圆半径”)Input(“请输入r”，“输入圆半径”)94.在VB中，表达式Len(“程序设计”)的结果是248095.图形符号“ ”在算法描述流程图表示判断条件是否满足需求处理或运算的功能输入输出操作算法的开始或结束96.如下VB程序段
For i=1 To 2 Step -0.1
运行后，循环体执行的次数是10次2次出错一次也不执行97.如下VB程序段
它的基本结构属于选择结构树型结构循环结构顺序结构98.在VB中，已知a，b，c三个变量都已赋有互不相同的值，下列语句
执行后，其值相等的变量是b，ca，ba，ca，b，c
&提供技术支持《算法与程序设计》模块 Ⅰ.填空题：（1）&&代数式 对应的VB（或 JAVA）表达式为__________。（2）&&从数列23、11、19、17、65中找出数据19，若采用顺序查找法从左边第一个数开始查找，需要查找_____次。（3）&&在a、b2、c#这三个变量名中，不符合变量命名规则的是_____。（4）程序的基本结构包括顺序结构、选择结构和循环结构。下列程序主要采用________结构，计算1到100之间的整数和。Rem VB代码(部分)s=0For i="1" To 100&& s=s+i&&&Next I&//JAVA 代码(部分)int s=0;for (int i=1;i&=100;i++)&&{& s=s+i;&}&提示：下载试题将会占用您每日试题的下载次数，建议加入到试题篮统一下载（普通个人用户：3次/天）【知识点】&&&&&&&&&&&&&&&&&&&&&&&& 类题推荐程序的三种控制结构用VB编写的函数bubble_sort是一个用冒泡方法实现排序的函数，其调用时需要三个参数：布尔类型参数sx来确定是升序还是降序，sx为True时为升序，否则为降序；整数型数组a()是待排序的数据，数据从a(1)开始存放；整数型参数n表示传入的数组长度，该函数的返回值也是一个整数型数组。所以调用此函数实现排序非常方便：比如有一个整数型数组a(1 to 10)需要降序排序，可以直接这样调用：a()＝bubble_sort(False，a()，10)该函数VB代码如下：Function bubble_sort(sx As Boolean，a() As Integer，n As Integer) As Integer()Dim i，j，t As IntegerFor i＝1 To n－1For j＝____①____ Step－1If ____②____ ThenIf a(j)＜a(j－1) Then t＝a(j)：a(j)＝a(j－1)：a(j－1)＝tElseIf a(j)＞a(j－1) Then t＝a(j)：a(j)＝a(j－1)：a(j－1)＝tEnd IfNext jNext ibubble_sort＝a()End Function请将代码补充完整：①___________________________________________。②___________________________________________。某通信部门规定：拨打市话时，如果通话时间不超过3分钟（含3分钟），则收取通话费0.22元；如果通话时间超过3分钟，则超过部分以每分钟0.11元收取通话费（计费时只计算整数分钟）。下面是根据给出的通话整数分钟计算话费的流程图和程序。程序段：Private Sub Command1_Click()Dim xas integer，y as singlex = Val(Text1.Text)If& x&=3& Then y=0.22&&&&Elsey = ②End IfText2.text=str(y)End Sub请分析任务，完成如下问题。（1）流程图中菱形表示&&&&&&&&&&&&&&&&（选填A.数据处理/B.选择分支）&&&&&&&&。流程图中①处应填写&&&&&&&&。（2）程序段中②处应填写的内容是&&&&&&&&。（3）在程序段中出现了Text1和Text2控件，它们同属于&&&&&&类型的控件(选填A.文本框/B.列表框/C.标签）。在一次学校的运动会上,高一女子100米决赛的成绩已出来，前8名的成绩记录单由于不小心丢掉一张,只剩下7 个成绩,并已按成绩排序，分别是(单位:秒)14.5，15.1，16.5，16.8，17.1，17.5，17.9，后来找到了,请将找到的成绩插入相应的位置,使数据序列仍保持有序,并求出该成绩的名次。根据已有程序段,请补齐流程图中的空格。程序如下：Dim a(1 To 8) As IntegerDim n, i, j, x As IntegerPrivate Sub Command1_Click()x = Val(Text2．Text)If x & a(n) Theni=n+1elsei = 1Do While x & a(i)i =" i" + 1LoopEnd IfText3．text=str(i)‘在文本框text3 显示名次End SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii =" 13" Thenn =" n" + 1a(n) = Val(Text1．Text)List1．AddItem Str(a(n))Text1．Text = "": Text1．SetFocus ‘准备在text1 接受下一个数据End IfEnd Sub试题点评评分：0评论：暂时无评论暂时无评论末页使用过本题的试卷同步试卷暂无数据相关知识点组卷网 版权所有vb程序设计简单 最后一道题 求助 谢谢_百度知道
vb程序设计简单 最后一道题 求助 谢谢
我有更好的答案
Dim n, sum As Integer
Do While sum &= 300
sum = sum + n
Loop第三个写n-1
采纳率：80%
来自团队：
n=n+1;sum=sum+n;仅供参考，呵呵
可是我觉 sum=sum*n 因为sum是总数
应该是求和吧，为啥要相乘呢？
为您推荐：
其他类似问题
vb程序设计的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。