高中信息技术-VB常用的标准函数-浏览题阅览题-会考复习题
高中信息技术-VB枚举算法与程序实现-浏览题阅览题-会考复习题
高中信息技术VB枚举算法与程序实现浏览题阅览题会考复习题学校:___________姓名：___________班级：___________考号：___________一、选择题1．使用枚举法解决问题，在列举问题的可能解的过程中（）A．可以遗漏，但不应重复B．不能遗漏，也不应重复。
C．可以重复，但不应遗漏。
可以遗漏，也可以重复。
【答案】B【解析】2．有如下VB程序段m=a(1)For i=2 to 100If a(i) > m then m=a(i)Next i该程序段执行后，变量m中存储的是( )A．累加值B．计数值C．a(1)至a(100)中的最大值D．最小值【答案】C【解析】3．读程序，写出下列程序的输出结果55、s = 1For j = 100 To -100 Step -1s = s * jNext jMsgBox (s)上述程序段中s = s*j 的执行次数是( )【答案】D【解析】4．统计1～1 000间个位数是4，且能被9整除的数共有多少个，可以采用的算法是( ) A．查找算法B．枚举算法C．解析算法D．排序算法【答案】B【解析】5．在游戏中经常有开数字密码锁得场景，已知一个6位数的密码锁，正确的数字顺序组合是由下面一组数字426815经过两次冒泡排序得到，请问开锁的正确数字组合可能是（）。
A．864251 B．842651 C．126845 D．124685【答案】A【解析】6．某食品连锁店5位顾客贵宾消费卡的积分依次为810，512，613，700，900。
采用选择排序算法对其排序，若完成第一遍时的结果为：512，810，613，700，900，则完成第二遍的结果是( )A．512，613，700，900，810B．512，810，613，900，700C．512，900，613，700，810D．512，613，810，700，900【答案】D【解析】7．模拟剪刀石头布的游戏，骰子是一个正六面体，用1~3这3个数分别代表剪刀、石头、布这三种情况，使用RND随机函数可以表示为（）A．INT（RND（3）+1）B．INT（RND*2+1）C．INT（RND（2）+1）D．INT（RND*3+1）【答案】D【解析】8．三个正整数a、b、c满足等式a2+b2=c2，a、b、c称为“勾股数”，求出100以内所A．枚举算法B．解析算法C．冒泡排序D．顺序查找【答案】A【解析】9．有如下VB程序:Dim i As Integer, j As Integer, k As string, n As Integern = 3List1.ClearFor i=1 To nk =″″For j=1 To ik = k+″*″Next jList1.AddItem kNext i该程序运行后, 在列表框List中显示的是( )A．B．C．D．【答案】A【解析】10．关于枚举算法的说法错误的是( )A．一般是通过循环中嵌套分支结构来实现的。
高中信息技术会考(VB部分)
高中信息技术会考VB复习题一、单选题1. 计算机程序的三种结构是顺序结构、、选择结构。
A．模块结构B．循环结构C．多重循环结构D．IF块结构2. 是指用户操作引发或由系统引发，能被对象所识别并做出响应的动作。
A．任务B．事件C．控件D．过程3. 在VB中，窗口坐标系的原点在，x轴向右为正，y轴向下为正。
A．窗口左上角B．窗口右下角C．窗口正中间D．窗口右上角4. 在VB应用程序设计中，通常应对编写程序代码。
A．所有对象B．窗体C．Timer D．有事件的对象5. 在面向对象程序设计中，用来描述对象的特征信息。
A．事件B．方法C．代码D．属性6. 在VB编程中，如果需要返回鼠标的当前位置，或了解按下的是鼠标哪个键及需要配合键盘上的Shift、Ctrl、Alt键时，应该使用事件。
A．Click B．Change C．MouseDown D．KeyPress7. 在VB应用程序设计中，如果想让Timer控件每秒钟响应一次，应该将其Inerval属性设置为。
A．1 B．60 C．100 D．10008. 下列过程中，是程序开始运行时，窗体一加载就运行的程序段。
A．Form_Load B．Form_ClickC．Form_MouseDown D．Form_KeyPress9. 的Visual Basic表达式是。
A．(-b+b^2-4ac)/2a B．(-b+sqr(b^2-4*a*c))/(2*a)C．(-b+sqr(b^2-4ac))/(2a) D．(-b+sqr(b^2-4ac))/2a10. 在VB系统中，代表内存单元，是命了名的存储空间。
A．变量B．常量C．函数D．字节11. 语句用于声明变量，并定义变量的数据类型，给变量分配存储空间。
A．Sub B．Dim C．Call D．End12. 在VB程序设计语言中，语句的功能是使系统产生的随机数真正随机化。
A．Rnd B．Circle C．Randomize D．Dim13. 关系表达式的值为。
高中信息技术 VB赋值语句 浏览题阅览题 会考复习题
高中信息技术VB赋值语句浏览题阅览题会考复习题学校:___________姓名：___________班级：___________考号：___________一、选择题1．数组排序。
点击“产生随机数”按钮，让计算机随机产生10个整数，并对这10个整数进行标号，再点击“排序”按钮，对这10个整数进行从大到小排序。
如图所示。
程序代码如下：Dim a(1 To 10) As IntegerDim i, j, k, kt As IntegerPrivate Sub Command1_Click()List1.Clear'清除列表框数据For i ＝1 To 10Randomize'随机数初始化a(i) ＝Int(Rnd() * 1000)List1.AddItem Str(i) ＋”＝” ＋Str(a(i))Next iCommand2.Enabled ＝True'激活排序按钮End SubPrivate Sub Command2_Click()For i ＝1 To 9k ＝iFor j ＝____①____To 10If a(j) > a(k) Then k ＝jNext jIf i <> k Then__②____End IfNext iList2.ClearFor i ＝1 To 10List2.AddItem Str(i) ＋” ＝” ＋Str(a(i))Next iEnd Sub请在①、②划线处填入合适的语句或表达式，把程序补充完整：程序中①划线处应填入__________________；程序中②划线处应填入__________________。
【答案】①I+1；②t=a（k）:a(k)=a(i):a(i)=t【解析】2．执行VB语句s=Mid("abcdefgh",2,3)+chr(66)后，变量s的值为( ) A．"cdB" B．"bcd65" C．"cdA" D．"bcdB"【答案】D【解析】3．在ＶＢ中，有如下程序段，该程序段执行后，变量x的值是x=0for i=1 to 5x=x+i-1next iA．0 B．5 C．15 D．10【答案】D【解析】4．某VB程序功能：输入正整数n,单击命令按钮Command1后，则会衍生出一串有规律的数字，形式为“1 2 3…n-1 n n-1…3 2 1 ”。
高中信息技术 VB循环语句 浏览题阅览题 会考复习题
高中信息技术VB循环语句浏览题阅览题会考复习题学校:___________姓名：___________班级：___________考号：___________一、选择题1．下列程序运行后的运行结果为▁▁▁。
X=8：Y=X：Z=10IF X<=Y THENPRINT X；Y；ELSEIF Z>=X THENPRINT ZEND IFEND IFA．10 8B．8 8C．10 10D．8 10【答案】B【解析】2．数组排序。
点击“产生随机数”按钮，让计算机随机产生10个整数，并对这10个整数进行标号，再点击“排序”按钮，对这10个整数进行从大到小排序。
如图所示。
程序代码如下：Dim a(1 To 10) As IntegerDim i, j, k, kt As IntegerPrivate Sub Command1_Click()List1.Clear'清除列表框数据For i ＝1 To 10Randomize'随机数初始化a(i) ＝Int(Rnd() * 1000)List1.AddItem Str(i) ＋”＝” ＋Str(a(i))Next iCommand2.Enabled ＝True'激活排序按钮End SubPrivate Sub Command2_Click()For i ＝1 To 9k ＝iFor j ＝____①____To 10If a(j) > a(k) Then k ＝jNext jIf i <> k Then__②____End IfNext iList2.ClearFor i ＝1 To 10List2.AddItem Str(i) ＋” ＝” ＋Str(a(i))Next iEnd Sub请在①、②划线处填入合适的语句或表达式，把程序补充完整：程序中①划线处应填入__________________；程序中②划线处应填入__________________。
高中信息技术-VB查找算法与程序实现-浏览题阅览题-会考复习题
高中信息技术 VB 查找算法与程序实现 浏览题阅览题 会考复习题学校: ___________ 姓名： ___________ 班级： ___________ 考号： ___________数是:【答案】C【解析】查找几次可以找到目标值（C . 3 1 【答案】C 【解析】3.已知有一组数据 2, 3, 6, 9, 10, 17, 22, 25排列，若要对分查找数值 22,需要查找3次, 这3次查找中依次找到的数据是（ ）。
A. 10 17 22 B . 9 10 22 C.10 25 22【答案】D 【解析】4 .定义变量s 表示团购价，则在窗口上显示团购价的语句应该是？（）【答案】A 【解析】评卷人得分选择题3、 6、7、 10、 12、 16、25、30、75中找到数据 10的查找次 A 、2 B 、3 C 、4 D 、72 .有一组数据为 “2 3、5、5、7、 7、8”，利用顺序查找和对分查找查找 5时，则分别A . 3无法使用对分查找B . 4无法使用对分查找D . 4D . 917 22A 、Iabel4.caption=str(s) C 、s=str(label4.caption)B 、label4.text=val(s) D 、s=val(label4.caption)1 .用对分查找法从数列5 •读程序，写出下列程序的输出结果（共6题，每题只有一个正确答案，每题2分，共12分）s = 1For j =" 10" To -10 Step -2s =" s" * jNext jMsgBox （s）上述程序段中s =" s*j"的执行次数是（）A. 20B. 10C. 11D. 21【答案】D【解析】6 .关于对分查找和顺序查找算法的叙述，正确的是（）。
A. 顺序查找需要排序，效率低；对分查找不需要排序，效率高。
B. 顺序查找不需要排序，效率低；对分查找需要排序，效率高。
高中信息技术-VB常用的标准函数-浏览题阅览题-会考复习题
高中信息技术VB常用的标准函数浏览题阅览题会考复习题学校:___________姓名：___________班级：___________考号：___________一、选择题1．下列流程图描述的是判断任意3个正数A、B、C是否能构成勾股数，请按此算法功能，把流程图填写完整。
A . A^2="B^2+C^2" or B^2="A^2+C^2" and C^2=A^2+B^2B . A^2="B^2+C^2" and B^2="A^2+C^2" or C^2=A^2+B^2C . A^2="B^2+C^2" and B^2="A^2+C^2" and C^2=A^2+B^2D . A^2="B^2+C^2" or B^2="A^2+C^2" or C^2=A^2+B^2【答案】D【解析】2．对输入的两个整数a和b，找出其中的较大者赋给c并输出。
解决该问题的算法流程图如右图所示，流程图中虚线框部分的内容可为【答案】D【解析】3．下列Visual Basic表达式中计算结果为4的是（）A．Abs(-4.2) B．Len("a123") C．Sqr(4) D．Int（3.5）【答案】B【解析】4．在Visual Basic中，有如下程序：Private Sub Command1_Click()Dim a As Integer,b As Integer,c As IntegerDim d As Integer,z As Integera=Val(Text1 Text):b=Val(Text2.Text):c=Val(Text3.Text)d=max(a,b)z=max(d,c)Text4,Text=Str(d)Text5,Text=Str(z)End SubFunction max(x As Integer,y As Integer) As IntegerIf x>y Then max=x Else max=yEnd Function分析该程序段，下列说法正确的是（）A.该程序中包含了两个自定义函数B.在函数max中定义了两个整数型参数C.在textl，text2，text3中输入数据后程序即被执行D.函数max的返回值是字符串类型【答案】B【解析】题目中只包含了一个自定义函数max（）,函数的返回值是integer整数型。
高中信息技术 VB常量、变量和数组 浏览题阅览题 会考复习题
高中信息技术VB常量、变量和数组浏览题阅览题会考复习题学校:___________姓名：___________班级：___________考号：___________一、选择题1．能正确表达“a≤1或a≥5”的VB逻辑表达式是_______。
A、a<=1 或a>=5B、a<=1,a>=5C、a<=1 or a>=5D、a<=1 and a>=5【答案】C【解析】2．小李在设计VB程序时所使用复选框对象的属性窗口如下图所示，他想编制该复选框单击事件的处理过程，则该事件处理过程名是（）A、CheckBox_ClickB、加粗_ClickC、Check1_ClickD、复选框_Click【答案】C【解析】3．设a= - 8,b=6,下列运行结果中，值最大的是（）2*a+3*b B．sqr(a^2+b^2) C．int(a+b) D．abs(b+a/b)【答案】B【解析】4．有如下Visual Basic程序段：for i= 1 to 11 step 3s=s*inext i语句s=s*i共执行的次数为（）A．11 B．10 C．5 D．4【答案】D【解析】5．下面的程序代码是通过函数求出二个整数型变量a、b中的较大值，其中所定义的函数名是（）Function max(a, b As Integer) As IntegerIf a > b Then max = a Else max = bEnd FunctionPrivate Sub Command1_Click()Dim a As Integer, b As Integer, s as integera = Val(Text1.Text):b = Val(Text2.Text)s = max(a, b)Text3.Text = sEnd Submand1_ClickB.functionC.maxD.max(a, b As Integer)【答案】C【解析】6．在VB数组说明语句Dim a(3 To 8，4 To 9) As Single中，数组a的变量类型是（）A．长整数型B．字符串型C.单精度实数型D.双精度实数型【答案】C【解析】Single表示的是单精度实数型。
信息技术高中会考VB模块操作题题库演示教学
信息技术高中会考V B 模块操作题题库信息技术高中会考VB模块操作题题库第1题打开“Y:\4619”文件夹中的文件：“d1.vbp”，进行以下操作并保存。
在VB代码窗口指定位置修改完善程序代码，实现求1+4+7+……+40的值。
第2题打开“Y:\4620”文件夹中的文件：“d1.vbp”，进行以下操作并保存。
在VB代码窗口指定位置修改完善程序代码，实现求1到300之间偶数的个数。
第3题打开“Y:\4621”文件夹中的文件：“d1.vbp”，进行以下操作并保存。
在VB代码窗口指定位置修改完善程序代码，实现求1到100之间所有整数的和。
第4题打开“Y:\4622”文件夹中的文件：“d1.vbp”，进行以下操作并保存。
在VB代码窗口指定位置修改完善程序代码，实现求100到200之间奇数的和。
第5题打开“Y:\4623”文件夹中的文件：“d1.vbp”，进行以下操作并保存。
在VB代码窗口指定位置修改完善程序代码，实现求2到10之间所有偶数的积。
第6题打开“Y:\4624”文件夹中的文件：“d1.vbp”，进行以下操作并保存。
在VB代码窗口指定位置修改完善程序代码，实现求5+10+15+…+85的和。
第7题打开“Y:\4625”文件夹中的文件：“d1.vbp”，进行以下操作并保存。
在VB代码窗口指定位置修改完善程序代码，实现求1到500之间能被7整除的数的个数。
第8题打开“Y:\4626”文件夹中的文件：“d1.vbp”，进行以下操作并保存。
在VB代码窗口指定位置修改完善程序代码，实现求2×12×22×32×42×52的积。
第9题打开“Y:\4627”文件夹中的文件：“d1.vbp”，进行以下操作并保存。
在VB代码窗口指定位置修改完善程序代码，实现求2+5+8+11+……+50的值。
第10题新建一个VB工程，按下表的要求添加控件，并设置其属性。
将操作结果保存在“Y:\4674”文件夹下，窗体文件名为：“Form1.frm”，工程文件名称为：“工程1.vbp”。
高中会考vb试题及答案
高中会考vb试题及答案高中会考VB试题及答案一、选择题（每题2分，共20分）1. 在Visual Basic中，以下哪个是正确的变量声明方式？A. Dim xB. Dim x As IntegerC. Dim x = 10D. Dim x As Integer = 10答案：B2. 下列哪个是Visual Basic中的循环结构？A. IfB. ForC. Select CaseD. Sub答案：B3. Visual Basic中的“End”语句用于结束什么？A. 程序B. 过程C. 循环D. 条件答案：B4. 在Visual Basic中，以下哪个不是内置的控件？A. LabelB. TextBoxC. ButtonD. Slider答案：D5. 下列哪个是Visual Basic中的数组声明方式？A. Dim arr(5) As IntegerB. Dim arr As Integer = 5C. Dim arr = New Integer(5)D. Dim arr As Integer(5)答案：A6. 在Visual Basic中，以下哪个是正确的条件语句？A. If x > 10 ThenB. If x > 10C. If x > 10D. If x > 10 End If答案：A7. Visual Basic中，以下哪个是正确的函数调用？A. Call Print("Hello World")B. Print "Hello World"C. Call Print("Hello World")D. Print("Hello World")答案：D8. 下列哪个是Visual Basic中的事件？A. ClickB. EventC. FunctionD. Procedure答案：A9. 在Visual Basic中，以下哪个是正确的类声明方式？A. Class MyClassB. Dim MyClassC. Sub MyClassD. Function MyClass答案：A10. 下列哪个是Visual Basic中的错误处理语句？A. TryB. CatchC. FinallyD. All of the above答案：D二、填空题（每空2分，共20分）1. 在Visual Basic中，使用________来定义一个类。
高中信息技术 VB排序算法与程序实现 浏览题阅览题 会考复习题
高中信息技术VB排序算法与程序实现浏览题阅览题会考复习题学校:___________姓名：___________班级：___________考号：___________一、选择题（一）顺序查找数据：我们假定被查找的数据存储在有n个元素的数组变量d中，要寻找的一个特定的数据(这个数据称为查找键)已经存储在变量key中。
下面是顺序查找算法的输入输出说明。
输入：查找键(设在变量key中)。
被查找的数据(设在数组变量d中)。
输出：若找到，输出值为key的数据所在的数组元素的下标，记为i；若未找到，输出结果为提示字符串："找不到"。
当在n=8个元素的数组里顺序查找数据的示意图如下：找到情况未找到情况总结顺序查找数据结果判断条件：(1)、当找到时，肯定i<="8," n个数据时，肯定i<=n，i即为找到的数组元素下标，d(i)=key；(2)、当"找不到"时，i=9>8了；n个数据时，当i=n+1时，表示"找不到"。
顺序查找的主程序段如下：Private Sub 顺序查找_Click()n个数据放入d(1)到d(n)中Key =" Val(Text1.Text):" i =1．‘变量Key从文本框Text1取的数要查找的数；Do While ①i =" i" + 1LoopIf i <=" n" ThenText2.Text = "在d(" + Str(i) + ")中" ‘例如在文本框Text2显示：“在d(6)中”ElseText2.Text = "找不到"End IfEnd Sub上程序Do While的条件① 是（）A．Key <> d（i）B．i <= nC．Key <> d(i) And i <= nD．Key <> d(i) or i <= n【答案】C【解析】2．用选择排序将七个数“2022、2017、2018、2014、2021、2012、2015”从小到大进行排序，则第二轮交换数据后的顺序是：A、2022、2021、2018、2017、2014、2012、2015B、2012、2014、2018、2017、2021、2022、2015C、2012、2017、2018、2014、2021、2022、2015D、2022、2021、2018、2014、2017、2012、2015【答案】D【解析】3．关于对分查找和顺序查找算法的叙述，正确的是（）。
高中信息技术-VB枚举算法与程序实现-浏览题阅览题-会考复习题
End If
Next j
Next i
For i= 1To n
list2.AddItem Str(a(i))
Next I
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii= 13Then
n=n+ 1
1密码是六位数字，前面两位为31;
2最后两位数字相同；
3能被16和46整除。
程序界面如图所示，单击 帮助找回密码”按钮(Command"后，可能的密码显示在列表
框List1中。
口找密码□回O
f帮助找Mi密码i
I叩锻的密码有 暑|纳to
315744
31H6J1K
解决此问题的相应程序如下：
Private Sub Command1_Click()
Next i
该程序段执行后，变量m中存储的是()
A.累加值B.计数值C. a(1)至a(100)中的最大值D.最小值
【答案】C
【解析】
3.读程序，写出下列程序的输出结果
55、s= 1
For j= 100To -100 Step -1
s = s * j
Next j
MsgBox (s)
上述程序段中
s = s*j的执行次数是(
当误的是
(
)
A.—般是通过循环中嵌套分支结构来实现的。
B.循环结构用来 枚举”分支结构用于 检验”
C.列举所有可能解的范围时，可以扩大但不能缩小，以防漏解。
D.采用枚举法时，也可能找不到符合条件的解。
【答案】C
【解析】
高中信息技术学业水平测试(会考)信息技术科目Vb界面练习
4、为按钮1编写单击事件代码，要求单击“登陆”按钮后，标签控件内容变为“班级姓名座位号”。如“100*班张三33号”
Vb界面练习二
1、 新建一工程
2、添加相应的控件，两个文本框控件（text1和text2）；两个标签控件（label1和label2）；两个命令按钮控件（command1和command2）
4）在"简历"右侧画一文本框Text2,高为1500,宽为4335,设为多行文本输入,并有垂直滚动条;
5）保存文件.
3）插入一个命令按扭,标题为"单击进入",字体为黑体,小三号,按钮宽度2000。
4）保存结果。
Vb界面练习七
1）设窗体Form1的名称改为"Ct1";
2）在Ct1窗体上画两个标签Label1,Label2,标题分别为"姓名","简历",字体为楷体三号字;
3）在"姓名"右侧画一文本框Text1,清空内容;
3、设置各控件的相关属性，设置后界面如图所示
4、密码输入时在屏幕上以“*”代替;
提示：Text2控件的PassWordChar属性设置为“*”,作用：设置文本utton为false，minbutton为false）
Vb界面练习三
Label2
Vb界面练习四
Vb界面练习五
1）将窗体标题设为"课程选择";
2）在窗体上画一个名称为Label1标签,标题为"学号",字体为宋体,小二号;
3）在"学号"右侧画一个名称为Text1的文本框,宽为2300,高为555;
高中信息技术 VB注释语句 浏览题阅览题 会考复习题
高中信息技术VB注释语句浏览题阅览题会考复习题学校:___________姓名：___________班级：___________考号：___________一、选择题1．在Visual Basic中，要定义一个一维数组name，用于存储10位学生姓名信息，则正确的数组定义语句是（）A．Dim name(1 To 10) As IntegerB．Dim name(1，10) As IntegerC．Dim name(1，10) As StringD．Dim name(1 To 10) As String【答案】D【解析】2．“某商场的店庆促销活动之一：店庆日购物满500元可在5折优惠后再减100元，否则只打5折”。
用算法描述这一问题，可采用的算法结构是（）A．顺序结构B．选择结构C．循环结构D．树形结构【答案】B【解析】3．在VB语言中，除了赋值语句具有计算功能外，（）也具有计算功能。
A．inputbox（）B．For C．if D．Print【答案】D【解析】二、填空题4．小明设计了如下所示累乘器程序，以完成式子：1×2×3×4×5×6的累乘计算。
Private Sub form_load()Dim k As Long, i As Integerk = 0 ………①For i = 1 To 6k = k * i ………②Next iMsgBox Str(k)End Sub为了完成小明的计算，程序中标有①、②的两处语句，哪个语句应作相应的修改，修改后其正确的语句为（写出标号和正确的语句）_____________。
【答案】①；k=1【解析】。
vb高中会考试题及答案
vb高中会考试题及答案一、选择题（每题2分，共20分）1. 在Visual Basic中，以下哪个选项是正确的数据类型？A. IntegerB. StringC. DoubleD. All of the above答案：D2. 下列哪个选项不是Visual Basic中的控件？A. LabelB. TextBoxC. ButtonD. Excel答案：D3. 在Visual Basic中，哪个关键字用于声明一个过程？A. FunctionB. SubC. ClassD. Both A and B答案：D4. 在Visual Basic中，以下哪个选项是正确的循环结构？A. ForB. WhileC. DoD. All of the above答案：D5. Visual Basic中的哪个函数用于返回字符串的长度？A. LenB. LengthC. SizeD. Count答案：A6. 在Visual Basic中，以下哪个选项不是事件处理程序的正确写法？A. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickB. Public Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)C. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)D. Public Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 答案：B7. 在Visual Basic中，以下哪个选项是正确的数组声明方式？A. Dim myArray() As IntegerB. Dim myArray As Integer()C. Both A and BD. None of the above答案：C8. 在Visual Basic中，以下哪个关键字用于声明一个类？A. ClassB. StructureC. ModuleD. Interface答案：A9. Visual Basic中，哪个函数用于将字符串转换为大写？A. ToUpperB. UpperCaseC. ConvertToUpperD. ToUppercase答案：A10. 在Visual Basic中，以下哪个选项是正确的错误处理语句？A. On Error GoTo 0B. On Error Resume NextC. On Error Goto 0D. All of the above答案：D二、填空题（每题2分，共20分）1. 在Visual Basic中，使用________关键字可以声明一个变量。
信息技术学业水平测试VB操作复习题目含答案
信息技学水平 VB操作复 目含答案
VB操作一
Private Sub Command1_Click() Dim s(9) As Single For i = 0 To 9 s(i) = Val(InputBox("请输入一个数")) Next i For i = 9 To 0 Step -1 Print s(i) Next i
②
a=①
③
s=②
b=③
Next k
Print s
End Sub
信息技学水平 VB操作复
目含答案
a = a+b s = s+b/a b = a+b
Private Sub Command1_Click() Dim i As Integer Dim s As Integer i=1 s=0 Do While i <= 99 s=s+① i=② Loop Print "s=" & ③
目含答案
Private Sub Command1_Click() Dim a(10) As Integer For i = 1 To 10 a(i) = Int(Rnd * 1000) Next i For i = 1 to 9 For j = i+1 to 10 If a(i) > a(j) Then a(0) = a(i) a(i) = a(j) a(j) =a(0) End If Next j Next i For i = 1 To 10 Print CStr(a(i)) Next i
t = Val(①)
If ② Then
Label1.Caption = "超重！不能参赛！" Else
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
高中信息技术VB常用的标准函数浏览题阅览题会考复习题学校:___________姓名：___________班级：___________考号：___________一、选择题1．下列流程图描述的是判断任意3个正数A、B、C是否能构成勾股数，请按此算法功能，把流程图填写完整。
A . A^2="B^2+C^2" or B^2="A^2+C^2" and C^2=A^2+B^2B . A^2="B^2+C^2" and B^2="A^2+C^2" or C^2=A^2+B^2C . A^2="B^2+C^2" and B^2="A^2+C^2" and C^2=A^2+B^2D . A^2="B^2+C^2" or B^2="A^2+C^2" or C^2=A^2+B^2【答案】D【解析】2．对输入的两个整数a和b，找出其中的较大者赋给c并输出。
解决该问题的算法流程图如右图所示，流程图中虚线框部分的内容可为【答案】D【解析】3．下列Visual Basic表达式中计算结果为4的是（）A．Abs(-4.2) B．Len("a123") C．Sqr(4) D．Int（3.5）【答案】B【解析】4．在Visual Basic中，有如下程序：Private Sub Command1_Click()Dim a As Integer,b As Integer,c As IntegerDim d As Integer,z As Integera=Val(Text1 Text):b=Val(Text2.Text):c=Val(Text3.Text)d=max(a,b)z=max(d,c)Text4,Text=Str(d)Text5,Text=Str(z)End SubFunction max(x As Integer,y As Integer) As IntegerIf x>y Then max=x Else max=yEnd Function分析该程序段，下列说法正确的是（）A.该程序中包含了两个自定义函数B.在函数max中定义了两个整数型参数C.在textl，text2，text3中输入数据后程序即被执行D.函数max的返回值是字符串类型【答案】B【解析】题目中只包含了一个自定义函数max（）,函数的返回值是integer整数型。
5．随机产生15~60之间正整数（包括15和60）的表达式是（）A．Fix(15*Rnd)+60B．Int(60*Rnd)+15C．Int(46*Rnd)+15D.Fix(45*Rnd)+15【答案】C【解析】Rnd函数的使用方法:1、产生的随机范围内有X个整数则最终公式中应为：Rnd*X；2、产生的随机范围从Y开始则最终公式应为：Rnd+Y。
如：产生一个范围在-5~20之间的随机整数。
分析：X为26，Y为-5，所以最终公式为：Int（Rnd*26-5）或Int （Rnd*26）-56．对以下程序段的说法正确的是（）s=0i=0Do While s<10i=i+1s=s+i*iLoopA．该程序的循环体执行了3次B．该程序段结束后i的值为3C．该程序段结束后i的值为4D．该程序段结束后s的值为13【答案】ABD【解析】7．有如下一段VB程序。
Private Sub Command1_Click()Dim y As LongText1.Text = ""y = f(3)Label1.Caption = Str(y)End SubFunction f(n As Integer) As LongText1.Text = Text1.Text + Str(n)If n <= 1 Thenf = 1Elsef = f(n - 1) + 2End IfEnd Function程序运行时，单击命令按钮Command1后，文本框Text1中显示的内容是（）A．1 B．3 C．123 D．321【答案】D【解析】8．下列VB表达式的值等于3的是( )。
A．Sqr(2) + 1 B．Abs(-1) - 2C．Asc("1") + 2 D．Len("-2") + 1【答案】D【解析】9．下列判断x≤1的VB表达式中，正确的是（）。
A．x<1 and x=1 B．not x>1 C．x <=1 D．x<1 or x=1【答案】BCD【解析】10．随机数函数Rnd可以产生一个大于等于0且小于1的随机数，现在想产生一个[5，10]的随机整数，可行的表达式是（）A．int（Rnd*6）+4B．int（Rnd*5）+5C．int（Rnd*6）+5D．int（Rnd*10）【答案】B【解析】Rnd函数的使用方法:1、产生的随机范围内有X个整数则最终公式中应为：Rnd*X；2、产生的随机范围从Y开始则最终公式应为：Rnd+Y。
如：产生一个范围在-5~20之间的随机整数。
分析：X为26，Y为-5，所以最终公式为：Int（Rnd*26-5）或Int （Rnd*26）-511．下列赋值语句错误的是（）。
A．a=b+c B．m=m*i C．x=y-1 D．5y=abs(x)【答案】D【解析】12．表达式Int(198.555*100+0.5)/100的值为( )A．198.56 B．199.6 C. 198 D．200【答案】A【解析】13．10 mod 3 * 2 +2 的值为（）A．10 B．6 C．4 D．8【答案】B【解析】在计算平均重量x时，结果中产生了8位小数，若要对x保留一位小数，并对第二位小数四舍五入，则下列表达式中正确的是（）。
A．Int（x + 0.5）B．Int（x * 100 + 0.5）/ 100C．Int（x * 10）/14．D．Int（x * 10 + 0.5）/ 10【答案】D【解析】15．下列VB程序段的输出结果是a=25:b=18:c=bif a>b thenc=aend ifprint cA．25 B．18 C．7 D．0【答案】A【解析】16．阅读如下Visual Basic程序，Function ave （a As single，b As single）as single ave=（a+b）2End FunctionPrivate Sub Command1_Click（）Print ave（4,5）End Sub程序运行结果是（）A．9B．4.5C．5D．4【答案】D【解析】ave（）是求整数平均数的自定义函数。
17．有如下Visual Basic程序段：A＝“Happy new year！”B＝Len(A)\2C＝63 Mod 10Text1.Text＝Mid(A，B，C)该程序运行后文本框text1显示的内容为( )A．3 B．newC．B D．Mid(A，7，3)【答案】B【解析】18．写出下面流程图所表述的算法的功能▁▁▁▁A. 降序排序B. 求最大值C. 交换输出D. 判断是否是偶数【答案】B【解析】19．将1、1、2、3、5、8、13、21、……数列的前20项存入a数组的正确程序段是_______。
【答案】C【解析】20．在VB中，设x=389，能得到其百位数字“3”的正确表达式是_______。
A、Int(x/10)*10B、Int(x/100)*100C、Int(x/100)D、x-Int(x/10)*10【答案】C【解析】21．下列VB程序段运行完毕后，变量x的值为x="2" : y=64Do while x<= Sqr(y)x=x+3LoopA．2 B．5 C．8 D．11【答案】D【解析】22．下列VB函数中，返回值类型均为String的是（）A．Len和StrB．Asc和MidC．Chr和StrD．Sqr和Exp【答案】C【解析】chr（）函数和str（）函数的返回值都是string型。
23．小明编写一个模拟qq登录的VB程序。
当输入用户名、密码和验证码，点击登录按钮后，会跳出信息框提示是否验证成功。
部分程序与流程图如下所示：uname = Text1.Text '输入用户名psd = Text2.Text '输入密码vcode = Val(Text3.Text) '输入验证码If vcode <> Val(Label3.Caption) Then' Label3显示的是随机验证码ElseIf uname <> "admin" Or psd <> "123456" Then”Else” 方框中正确的语句是（ ）。
A ． ①中“验证成功”B ． ②中“输出用户名或密码有误”C ． ②中“验证成功D ． ③中“输出验证码错误”【答案】B【解析】24．设X=5278,能得到其百位上数字“2”的正确表达式是( ）A ．X MOD 100B ．X\100 MOD 10C ．X\100 MOD 100D ．X\10 MOD 10【答案】B【解析】25．在计算平均重量X 时，结果中产生了许多位小数，若需要对X 保留一位小数，并对第二位小数进行四舍五入，则下列表达式中正确的是（ ）A ．Int(x*10+0.5)/10B ．Int(x*100+0.5)/100C ．Int(x*10)/10D ．Int(x+0.5)【答案】A【解析】int （）函数用于计算不大于x 的最大整数。
二、填空题26．（1）所谓算法是 。
（2）VB 界面设计一般包括 、 、 。
（3）描述算法的方法有3种，分别是 、 、 。
（4）VB 是一种 程序设计语言。
（5）abs （－3.8）＝ sqr （49）＝ int （－7.8）＝（6）int （10*Rnd ）表示【答案】（1）解决问题的方法和步骤；（2）设计程序界面 编写程序代码 调试、运行程序 （3）自然语言主 伪代码 流程图 （4）可视化（面向对象或高级语言都算对）（5）3.8；7；－8；（6）0－9这十个整数【解析】27．有一组数：1、2、4、7、……，其第1个数是1，第2个数比第1个数大1，第3个数比第2个数大2，第4个数比第3个数大3，以此类推。
求其前20项的和。
以下VB 程序实现上述功能，请把程序中的①、②出填写完整。
Dim i As Integer, p As Integer, s As Integeri = 1p = 1s = 0Do While ______①______s = s + pi = i + 1______②______LoopPrint s【答案】i<=20p=p+i-1【解析】28．Visual Basic 表达式x^2+k/(1+a*x-b))对应的数学式子为__ ____。