1、 1 高三算法复习高三算法复习十十（基础综合练习基础综合练习） 1、在 VB 窗体中有一个对象，该对像的属性窗口如图所示，下列说法不正确的是( ) AInterval 为属性名 B1680 为属性值 C该对象的名称为 Timer1 D根据“Timer1 Timer”可判断窗体名为 Timer 2、 VB 语句 Label1.Caption=“结果“用于在标签中显示字符串， 该语句中的 “Caption” 是( ) A属性名 B对象名 C属性值 D类名 3、 程序运行界面如图所示。 要求在文本框 Text1 中输入字符串， 单击 “统计” 按钮 Command1 后，在标签 Label2 中显示
2、所输入字符串长度。需要编写的 VB 事件处理过程的名称为( ) ACommand1_Click BText1_Click CForm_Click DLabel2_Click 4、下列关于对象的描述中，错误的是( ) A对象的属性用于描述对象的状态 B对象的属性与方法可以有多个 C对象事件的发生会驱动该对象相应事件处理过程的执行 D对象的属性值只能在属性窗口中设置 5、在 VB 集成环境下编制了含一个窗体的 VB 应用程序并保存在磁盘上，运行测试后编译成 可执行程序，整个过程中肯定会产生的文件类型是( ) A .vbp .frm .exe B.vbp .exe .txt C .txt .exe
3、.frm D.frm .txt .vbp 6、某学生完成一个 VB 程序后，单击程序中的按钮，却怎么都不能完成想要的功能，产生这 种现象不可能的原因是( ) A程序处于设计状态，还没有运程程序 B代码窗口没有关闭就直接运行程序 C 按钮的事件代码没有编写 D编写了 DblClick 事件代码 7、在 Visual Basic 中，单击文本框 Text2 触发的事件处理过程名是( ) A Text1_Click BText2_GotFocus 2 C Text2.Click DText2_Click 8、在面向对象程序设计中，对象的“方法”是指( ) A 计算的方法 B对象处理其属性的行为 C
4、方法就是事件 D程序设计的方法 9、下列描述错误的是( ) A在 VB 对象窗口中，双击窗体对象后，出现的是该对象的属性窗口 B双击工具箱中相应类的图标可以在窗体中添加对象 CVB 程序保存时会产生工程文件(.vbp)和窗体文件(.frm) D对象的属性可以在属性窗口中设置，也可以在程序代码中赋值 10、在 VB 程序界面设计中，要在按钮上显示“计算” ，应该设置的属性是( ) AText BCaption C名称 DVisible 11、下列说法正确的是( ) A按钮类对象只能捕获单击 Click 事件 B标签类对象不能捕获事件 C文本框对象也能捕获单击 Click 事件 D只有鼠标能产生事
5、件 12、在Visual Basic中，表示窗体装载的事件是( ) A. Click B. KeyPress C. Load D. DblClick 13、在Visual Basic中，如果要在标签Label1上显示“Success”，则应设置的属 性是( ) A. BackColor B. Caption C. Height D. Width 14、关于标签类，下列说法错误的是( ) A第一个产生的标签对象默认名称为 Label1 B程序运行时，标签框不能输入内容 C标签框不能获得焦点 D标签框上的文字由其 Text 属性决定 15、下列属性及其说明错误的是( ) ALeft Top 对象左
6、上角点的坐标 BVisible 对象的可见性 CEnabled 对象的有效性 DText 窗体的标题 16、VB 界面设计时要在窗体中显示一个圆，最简单的方法是选择控件( ) A B C D 17、在Visual Basic中，语句Ok.Text=“奥林匹克“，“Ok”是( ) A. 属性名 B. 属性值 C. 对象名 D. 窗体名 18、在 VB 中，小王使用变量 email 存储电子邮箱地址，该变量的数据类型应定义为( ) ABoolean BString CInteger DDouble 19、在 VB 中，要存储某人的年龄，最好选用的数据类型是( ) ABoolean BString
7、CInteger DDouble 20、我国每过一段时间都要进行一次人口普查工作，为了数据统计的方便，工作人员想设计 一个 VB 程序来处理，那么关于人口总数的存储和处理应该选用的数据类型是( ) ABoolean BString CInteger DLong 3 21、某 VB 程序要存储性别数据，则应选用的数据类型是( ) ABoolean BString CInteger DDouble 22、下列常量定义语句不正确的是( ) AConst name= “Jordan “ BConst age As Integer=100 CConst age As Long=100 DConst se
8、x As Boolean= “True “ 23、下列属于字符串 String 类型常量的是( ) A123 B“123 “ CFalse D1.23 24、下列语句中常量的命名正确的是( ) A1score B long Cname_123 D sex-1 25、下列语句合法的是( ) AConst math As string =150 BConst finished As Boolean=Ture CConst m As Integer=40000 DConst cost As Single=325.90 26、以下可以作为 VB 变量名的是( ) A3D Bx_y Cx+y DAnd
9、27、下列 VB 的变量定义正确的是( ) ADim a,b As Double BDim a-b as Integer CDim c As True DDim d2 as Single 28、已知某校 100 名学生的体重数据（包括一位小数） ，要求编写 VB 程序，统计超过平均体 重的人数。下列变量的定义最适合该程序的是( ) A定义 100 个整数类型变量 B定义 100 个单精度实数类型变量 C定义一个元素个数为 100 的整数类型一维数组 D定义一个元素个数为 100 的单精度实数类型一维数组 29、 （2009 年 3 月试题）在 VB 数组说明语句 Dim a(3 to 8, 4
10、 to 9) As Single 中，数组 a 的变量 类型是( ) A长整数型 B字符串型 C单精度实数型 D双精度实数型 30、下列 VB 数组变量的定义正确的是( ) ADim a(1 to 3)( 2 to 10) As Integer BDim B(0 to 10,1 to 100) As String CDim 1class(1 to 60)As String DDim long(1 to 100) As Integer 31、想要把全班 60 位同学生姓名存储到程序中，最适合的变量定义是( ) A定义 60 个 String 类型变量 B定义 60 个 Name 类型变量 C定义
11、一个元素个数为 60 的 Name 类型数组 D使用语句:Dim name(1 to 60)As String 32、VB 标准函数 Rnd 的作用是返回一个大于等 0 且小于 1 的随机实数，只产生大于等于 10 且小于 100 随机整数的 VB 表达式是( ) AInt(Rnd*100) BInt(Rnd*90+10) CInt(Rnd*99+1) DInt(Rnd*99+10) 4 33、能实现从字符串中取出子字符串功能的 VB 标准函数的函数名是( ) AVal BStr CLen DMid 34、下列 VB 函数中，与 Chr 函数作用相反的是( ) ALen BVal CStr D
12、ASC 35、执行 VB 语句 s=Mid(“abcdefgh “,2,3)后，变量 s 的值为( ) A“abc “ B“cde “ C“bcd “ D “bc “ 36、将数学表达式 ba x ln 写成 VB 表达式，正确的是( ) Alog(x)/(a+b) Blog(x)/a+b Cln(x)/(a+b) Dln(x)/a+b 37、变量 c 中存储了一个字符，正确判断该字符为数字字符“0 “ “9 “的 VB 表达式是( ) Ac= “0 “ And c= “0 “ Or c=0 And Asc(c)=0 Or Asc(c)m Then m=a(i) Next i 该程序段执行后，
13、变量 m 中存储的是( ) A累加值 B计数值 C最大值 D最小值 45、小金编写了一个统计随机数分布的 VB 程序，部分程序如下所示。在调试程序时出现如 右图所示的错误信息。 n=0 m=0 For i=1 To 100 If Rnd0.5 Then n=n+1 Else m=m+1 Next i 小金仔细分析该程序段后，发现其中缺少了( ) AFor BEnd If CNext DIf 46、有如下 VB 程序段： x=0 For i=1 To 8 Step 2 x=x+i Next i 该程序段执行后，变量 x 的值是( ) A9 B16 C25 D36 47、有如下 VB 程序段: x
14、=1 y=0 Do While xb Then c=a+1 Else c=b-1 End If A2 B3 C4 D5 57、执行完以下 VB 程序段后，变量 s 的值为( ) s=0 For i=0 to 10 Step 3 s=s+i Next i A55 B19 C18 D25 58、有如下Visual Basic程序段： x=0 For i=0 To 10 Step x=x+i Next i 要使循环体x=x+i执行3次，步长必须是( ) A1 B2 C 3 D4 59、以下程序段是一个完整的Visual Basic的Do语句，则划线处的语句应该是( ) a=0:s=0 Do Whil
15、e a=5 s=s+a a=a+1 8 AEnd Do BEnd If CLoop DNext a 60、 （2009 年 3 月试题）下列 VB 程序运行时，单击命令按钮 Command1 后，文本框 Text1 中显示的内容是 ,文本框 Text2 中显示的内容是 。 Private Sub Command1_Click( ) Dim a(1 To 5) As Long，I As Integer a(1)=1 For i=2 To 5 a(i)=a(i-1)*i Next i Text1.Text=Str(a(2) Text2.Text=Str(a(5) End Sub 61、如下Visu
16、al Basic程序行动后，文本框Text1显示的值为_。 Private Sub Command1_Click() Dim s,k,i As Integer k = 1 s = 0 For i = 1 To 5 Step 2 k = k * 2 s = s + k Next i Text1.Text = Str(s) End Sub 62、下列 VB 程序运行时，单击命令按钮 Command1 后，文本框 Text1 中显示的内容 是 ,文本框 Text2 中显示的内容是 。 Private Sub Command1_Click( ) Dim a(1 To 10) As Integer, i As Integer,s As Integer For i=1 To 10 a(i)=2*i Next i Text1.Text=Str(a(10) s=0 For i=1 To 5 s=s+a(i) Next i Text2.Text=Str(s) End Sub
