高中信息技术选考VB专题练习(一轮复习)

上传人:lil****ar 文档编号:280698735 上传时间:2022-04-22 格式:DOC 页数:5 大小:245.50KB
返回 下载 相关 举报
高中信息技术选考VB专题练习(一轮复习)_第1页
第1页 / 共5页
高中信息技术选考VB专题练习(一轮复习)_第2页
第2页 / 共5页
高中信息技术选考VB专题练习(一轮复习)_第3页
第3页 / 共5页
高中信息技术选考VB专题练习(一轮复习)_第4页
第4页 / 共5页
高中信息技术选考VB专题练习(一轮复习)_第5页
第5页 / 共5页
亲,该文档总共5页,全部预览完了,如果喜欢就下载吧!
资源描述

《高中信息技术选考VB专题练习(一轮复习)》由会员分享,可在线阅读,更多相关《高中信息技术选考VB专题练习(一轮复习)(5页珍藏版)》请在金锄头文库上搜索。

1、信息技术VB专题复习一 班级 姓名 1、已知字母“A”的ASCII码为65,则Visual Basic表达式结果为数值162的是( )A. Asc(“A+a”)B. 1+62C. Chr(65)+Chr(97)D. Abs(-65-97)2、字符串变量st的值为“ZheJiangTongXiang”,下列VB表达式的值为“TongXiang”的是( ) AMid(st,9,8)BMid(st,9,4)+ Xiang CMid(st,13,5) D. Tong +Mid(st,13,5)3、在VB中,下列函数返回值最大的是( )ASqr(9) BAbs(-3.2) Cint(3.2) DLen(

2、3.2)4、计算表达式Val(10) + Len(2AB)的值是( ) A.12 B.13 C. 102 D. 102AB5、下列VB表达式的值最大的是( )A10 Mod 5 B5 Mod 10 C10 / 5 D5 / 106、下列Visual Basic表达式的值为True的是( ) A1=2 B7879 CLen(78)Len(中国) DMid(abcdef, 2, 3) = abc7、设X=5678,能得到其百位上数字“6”的正确表达式是( ) AX Mod 100 BX100 Mod 10 CX100 Mod 100 DX10 Mod 108、声明语句Dim A(-2 to 2)

3、As Integer定义的数组的元数个数是( )A.3 B. 4 C. 0 D. 59、将数学表达式写成Visual Basic表达式,正确的是( )A. Int(Abs(ab c * c) B. Sqr(Abs(ab c * 2)C. Int(Abs(a * b c * c) D. Sqr(Abs(a * b c * c)10、有如下Visual Basic程序:A=10:B=20:A=A+B:B=A-B该程序段运行后,变量A和B的值是( )A.10和20 B.30和20 C.30和10 D.30和-1011、要实现变量M的值与变量N的值进行交换,可用语句( )A.X=M:M=N:N=X B

4、.M=N:N=M:X=NC.X=M:N=M:X=N D.M=X:X=N:N=M12、“如果条件表达式xy0成立,那么i=i+1”。能实现该功能语句是( )Aif xy0 then i=i+1 B. if xy and y0 then i=i+1C. if x=y or x=0 then i=i+1 D. if x=y and y=0 then i=i+113、随机数函数Rnd可以产生一个大于等于0且小于1的随机数,现在想产生一个6,24的随机整数,可行的表达式是( )A. Rnd*24 B.int(6+Rnd*18) C.6+int(Rnd*18+1) D.6+int(Rnd*19)14、在V

5、isual Basic中,若要定义变量no用于存储汽车牌照号码,如浙A12345,则正确的定义语句是( )A. Dim no As Integer B. Dim no As String C. Dim no As Single D. Dim no As Boolean15、一个Visual Basic工程的部分设计界面如图所示,下列选项中正确的是( )A. 窗体的Caption属性值是cool B. 当前选中的对象类型是图像Image C. 工程文件是cool.vbp D. 当前选中对象的名称是Command116、运行下面的 Visual Basic程序,单击命令按钮 Command1,出现

6、如下图所示的提示信息: Private Sub Command1_Click()Dim i As Integer, c As String, s As String, t As Strings = 2012 Herot = For i = 1 To Len(s) c = Mid(s, i, 1) If c = a And c = z t = t + c End IfNext iText1.Text = tEnd Sub出现该错误的原因是A变量s的数据类型说明 BIf语句缺少ElseC变量t的数据类型说明错误 DIf语句缺少Then错误有如下VB程序段:s=1For i = To 5 step

7、-2s=s*(i+1)Next i该程序段运行时,要使循环体s=s*(i+1)被执行10次,则循环变量i的初值是( )A-15 B-14 C23 D25有10个数据100、15、28、70、80、12、10、200、6、50依次存放在数组d(1 to 10)中,使用如下程序段找出最小值: 当方框内的语句刚好执行完5次后(此时循环变量i的值为6),变量min的值是( ) A. 15 B. 12 C. 10 D. 6如下图所示的流程图,算法执行时,若输入n的值为5,则输出s的值是 A10 B13 C16 D25有如下Visual Basic程序段:x=3:y=75Do While xSqr(y)x

8、=x+2Loop该程序段运行后,变量x的值为( )A. 5 B. 7 C. 8 D. 9Dim x , y As Integerx = 2y = 20Do While x yx = x 2Loop运行这段程序段,循环体的循环次数为( ) A4 B3 C2 D0某Visual Basic程序如下:Private Sub Command1_Click() Dim s As String, i As Integer s = For i = 1 To 10 Step 2 s = Str(i) + s Next i Text1.Text = sEnd Sub运行程序,单击命令按钮Command1后,在文

9、本框Text1中显示的内容为( )A13579 B1 3 5 7 9 C9 7 5 3 1 D97531某同学编写一个可输出1到100之间所有偶数之和的Visual Basic程序,部分程序如下:Private Sub Command1_Click()Dim x As Single For I=0 To 100 If _ Then x=x + I End If Next I Print xEnd Sub 横线上应填写的正确语句是( )A. x Mod 2 = 0 B. x Mod 2 0 C. i Mod 2 = 0 D. I Mod 2 0编写VB程序,实现如下功能:在文本框Text1中输入

10、包含数字、字母的字符串,单击“统计”按钮Command1,统计该字符串中数字字符的个数,并在标签 Label1中输出结果。界面如下图所示。 题5-1图 题5-2图(1)在设计应用程序界面时,应使用图2所示“控件工具箱”中的_(填写相应编号)添加“统计”按钮。(2)为实现上述功能,请在划线处填入合适代码或选项。Private Sub Command1_Click()Dim s As String, c As StringDim i As Integer, n As Integer, num As Integers=_ (填写程序代码) num = 0n = Len(s) _ (填写程序代码,提示

11、:循环结构) _ (填写程序代码,提示:取字母)If c = 0 And c = 9 Then num = num + 1 End IfNext ilabel1.Caption = Str(num)End Sub编写VB程序,实现如下功能:在文本框text1中输入自然数n,单击“产生n个随机数,并求和与最大数计算”按钮Command1,则在列表框List1中输出n个小于100的随机整数,并输出n个随机数的和与最大值,界面如第4题图所示。【版权所有:21教育】(1)观察运行界面,选项中没有用到的控件是 ( 选项A B C D)。(2)设计该窗体界面时,需要将窗体form1的 属性设置为“最大随机数”。(3)请完善下列程序代码:Private Sub Command1_Click()Dim a(1 To 10) As IntegerDim s As IntegerDim max As Integern = Val(Text1.Text)i = 1Do While i max Then (填写程序代码)LoopNext iList1.AddItem 和为: + (填写程序代码)List1.AddItem 最大值为: + Str(max)End Sub

展开阅读全文
相关资源
正为您匹配相似的精品文档
相关搜索

最新文档


当前位置:首页 > 行业资料 > 其它行业文档

电脑版 |金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号