1、高中数学网（ ） ，海量高考资源免费下载！高三算法复习十（基础综合练习）1、在 VB 窗体中有一个对象，该对像的属性窗口如图所示，下列说法不正确的是( )AInterval 为属性名B1680 为属性值C该对象的名称为 Timer1D根据“Timer1 Timer”可判断窗体名为Timer2、VB 语句 Label1.Caption=“结果“用于在标签中显示字符串，该语句中的 “Caption”是( )A属性名 B对象名C属性值 D类名3、程序运行界面如图所示。要求在文本框 Text1 中输入字符串，单击“统计”按钮Command1 后，在标签 Label2 中显示所输入字符串长度。需要编写的
2、 VB 事件处理过程的名称为( )ACommand1_Click BText1_ClickCForm_Click DLabel2_Click4、下列关于对象的描述中，错误的是( )A对象的属性用于描述对象的状态B对象的属性与方法可以有多个C对象事件的发生会驱动该对象相应事件处理过程的执行D对象的属性值只能在属性窗口中设置5、在 VB 集成环境下编制了含一个窗体的 VB 应用程序并保存在磁盘上，运行测试后编译成可执行程序，整个过程中肯定会产生的文件类型是( )A .vbp .frm .exe B.vbp .exe .txtC .txt .exe .frm D.frm .txt .vbp6、某学生
3、完成一个 VB 程序后，单击程序中的按钮，却怎么都不能完成想要的功能，产生这种现象不可能的原因是( )A程序处于设计状态，还没有运程程序 B代码窗口没有关闭就直接运行程序C 按钮的事件代码没有编写 D编写了 DblClick 事件代码7、在 Visual Basic 中，单击文本框 Text2 触发的事件处理过程名是( )高中数学网（ ） ，海量高考资源免费下载！A Text1_Click BText2_GotFocusC Text2.Click DText2_Click8、在面向对象程序设计中，对象的“方法”是指( )A 计算的方法 B对象处理其属性的行为C 方法就是事件 D程序设计的方法9
4、、下列描述错误的是( )A在 VB 对象窗口中，双击窗体对象后，出现的是该对象的属性窗口B双击工具箱中相应类的图标可以在窗体中添加对象CVB 程序保存时会产生工程文件(.vbp)和窗体文件(.frm)D对象的属性可以在属性窗口中设置，也可以在程序代码中赋值10、在 VB 程序界面设计中，要在按钮上显示“计算” ，应该设置的属性是( )AText BCaptionC名称 DVisible11、下列说法正确的是( )A按钮类对象只能捕获单击 Click 事件 B标签类对象不能捕获事件C文本框对象也能捕获单击 Click 事件 D只有鼠标能产生事件12、在Visual Basic中，表示窗体装载的事
5、件是( )A. Click B. KeyPress C. Load D. DblClick13、在Visual Basic中，如果要在标签Label1上显示“Success”，则应设置的属性是( )A. BackColor B. Caption C. Height D. Width14、关于标签类，下列说法错误的是( )A第一个产生的标签对象默认名称为 Label1 B程序运行时，标签框不能输入内容C标签框不能获得焦点 D标签框上的文字由其 Text 属性决定15、下列属性及其说明错误的是( )ALeft Top 对象左上角点的坐标 BVisible 对象的可见性CEnabled 对象的有效性
6、 DText 窗体的标题16、VB 界面设计时要在窗体中显示一个圆，最简单的方法是选择控件( )A BC D17、在Visual Basic中，语句Ok.Text=“奥林匹克“，“Ok”是( )A. 属性名 B. 属性值 C. 对象名 D. 窗体名18、在 VB 中，小王使用变量 email 存储电子邮箱地址，该变量的数据类型应定义为( )ABoolean BString CInteger DDouble19、在 VB 中，要存储某人的年龄，最好选用的数据类型是( )高中数学网（ ） ，海量高考资源免费下载！ABoolean BString CInteger DDouble20、我国每过一段时
7、间都要进行一次人口普查工作，为了数据统计的方便，工作人员想设计一个 VB 程序来处理，那么关于人口总数的存储和处理应该选用的数据类型是( )ABoolean BString CInteger DLong21、某 VB 程序要存储性别数据，则应选用的数据类型是( )ABoolean BString CInteger DDouble22、下列常量定义语句不正确的是( )AConst name= “Jordan “ BConst age As Integer=100CConst age As Long=100 DConst sex As Boolean= “True “23、下列属于字符串 Stri
8、ng 类型常量的是 ( )A123 B“123 “ CFalse D1.2324、下列语句中常量的命名正确的是( )A1score B longCname_123 D sex-125、下列语句合法的是( )AConst math As string =150 BConst finished As Boolean=TureCConst m As Integer=40000 DConst cost As Single=325.9026、以下可以作为 VB 变量名的是( )A3D Bx_y Cx+y DAnd27、下列 VB 的变量定义正确的是( )ADim a,b As Double BDim a
9、-b as IntegerCDim c As True DDim d2 as Single28、已知某校 100 名学生的体重数据（包括一位小数） ，要求编写 VB 程序，统计超过平均体重的人数。下列变量的定义最适合该程序的是( )A定义 100 个整数类型变量B定义 100 个单精度实数类型变量C定义一个元素个数为 100 的整数类型一维数组D定义一个元素个数为 100 的单精度实数类型一维数组29、 （2009 年 3 月试题）在 VB 数组说明语句 Dim a(3 to 8, 4 to 9) As Single 中，数组 a 的变量类型是( )A长整数型 B字符串型C单精度实数型 D双精
10、度实数型30、下列 VB 数组变量的定义正确的是( )ADim a(1 to 3)( 2 to 10) As Integer BDim B(0 to 10,1 to 100) As StringCDim 1class(1 to 60)As String DDim long(1 to 100) As Integer31、想要把全班 60 位同学生姓名存储到程序中，最适合的变量定义是( )A定义 60 个 String 类型变量B定义 60 个 Name 类型变量C定义一个元素个数为 60 的 Name 类型数组D使用语句:Dim name(1 to 60)As String高中数学网（ ） ，海
11、量高考资源免费下载！32、VB 标准函数 Rnd 的作用是返回一个大于等 0 且小于 1 的随机实数，只产生大于等于10 且小于 100 随机整数的 VB 表达式是( )AInt(Rnd*100) BInt(Rnd*90+10)CInt(Rnd*99+1) DInt(Rnd*99+10)33、能实现从字符串中取出子字符串功能的 VB 标准函数的函数名是( )AVal BStr CLen DMid34、下列 VB 函数中，与 Chr 函数作用相反的是( )ALen BVal CStr DASC35、执行 VB 语句 s=Mid(“abcdefgh “,2,3)后，变量 s 的值为( )A“abc
12、 “ B“cde “ C“bcd “ D “bc “36、将数学表达式 写成 VB 表达式，正确的是( )baxlnAlog(x)/(a+b) Blog(x)/a+b Cln(x)/(a+b) Dln(x)/a+b37、变量 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该程序段执行后，变量 m 中存储的是 ( )A累加值 B计数值 C最大值 D最小值45、小金编写了一个统计随机数分布的 VB 程序，部分程序如下所示
13、。在调试程序时出现如右图所示的错误信息。n=0m=0For i=1 To 100If Rnd0.5 Thenn=n+1Elsem=m+1Next i小金仔细分析该程序段后，发现其中缺少了( )AFor BEnd If CNext DIf46、有如下 VB 程序段：x=0For i=1 To 8 Step 2x=x+iNext i该程序段执行后，变量 x 的值是( )A9 B16 C25 D3647、有如下 VB 程序段:x=1y=0Do While xb Thenmax=aElsemax=bEnd IfEnd FunctionAmax(1,2) Bc=max( ) Cc=max(3,5) Dc
14、=max(1.2,1.23)55、在Visual Basic中，如果给变量a、b都赋值为-1，则下列语句正确的是( )Aa=-1:b=-a Ba=b=-1 Ca=-1:b=a D-1=a:-1=b56、在Visual Basic中，若a=4，b=3，则执行完下列语句后，变量c的值为( )If ab Then c=a+1 Else c=b-1End IfA2 B3 C4 D557、执行完以下 VB 程序段后，变量 s 的值为( )s=0For i=0 to 10 Step 3s=s+iNext iA55 B19 C18 D2558、有如下Visual Basic程序段： x=0For i=0 T
15、o 10 Step x=x+iNext i要使循环体x=x+i执行3次，步长必须是( )A1 B2 C 3 D459、以下程序段是一个完整的Visual Basic的Do语句，则划线处的语句应该是( )高中数学网（ ） ，海量高考资源免费下载！a=0:s=0Do While a=5s=s+aa=a+1AEnd Do BEnd If CLoop DNext a60、 （2009 年 3 月试题）下列 VB 程序运行时，单击命令按钮 Command1 后，文本框 Text1中显示的内容是 ,文本框 Text2 中显示的内容是 。Private Sub Command1_Click( )Dim a(
16、1 To 5) As Long，I As Integera(1)=1For i=2 To 5a(i)=a(i-1)*iNext iText1.Text=Str(a(2)Text2.Text=Str(a(5)End Sub61、如下Visual Basic程序行动后，文本框Text1显示的值为_。Private Sub Command1_Click()Dim s,k,i As Integerk = 1s = 0For i = 1 To 5 Step 2k = k * 2s = s + kNext iText1.Text = Str(s)End Sub62、下列 VB 程序运行时，单击命令按钮 Command1 后，文本框 Text1 中显示的内容是 ,文本框 Text2 中显示的内容是 。Private Sub Command1_Click( )Dim a(1 To 10) As Integer, i As Integer,s As IntegerFor i=1 To 10a(i)=2*iNext i Text1.Text=Str(a(10)s=0For i=1 To 5s=s+a(i)Next i高中数学网（ ） ，海量高考资源免费下载！Text2.Text=Str(s)End Sub
