算法练习

a．VB中常用控件及窗体的常用属性： 控件 TextBox (文本框) Label (标签) Caption CommandButton Form (命令按钮) (窗体) Caption Caption Timer Image (计时器) (图像框) Interval Picture stretch 主要属性 Text b．窗体本身也是一个对象，窗体的标题是由Caption属性表示的。 1、下列关于对象的描述中，错误的是( ) A．对象的属性用于描述对象的状态 B．对象的属性与方法可以有多个 C．对象事件的发生会驱动该对象相应事件处理过程的执行 D．对象的属性值只能在属性窗口中设置

2、某VB窗体上有一个文本框、一个命令按钮和一个标签,对象如下表所示:程序运行时,能直接驱动事件处理过程Cmd_Click的操作是( ) A．单击窗体 B．单击文本框 对象类型 窗体 文本框 命令按钮 标签 C．单击命令按钮 D．单击标签

Form Txt Cmd Lbl 对象名 3、下列能表示矩形、圆、椭圆等形

状的控件是( )

A．标签(Label) B．简单图形(Shape)

C．文本框(TextBox) D．命令按钮(CommandButton)

4、在Visual Basic中，某对象的属性窗口如下左图所示.该对象名是( ) A．Enabled B．Timer C．tine D．tine Timer

5、(浙江省2011年9月高考题)一个VB程序的运行界面如下图所示。下面说法不正确的是 ．．．A．文本框Text1的Caption属性值为“H” B．标签Label1的Caption属性值为“输入字符” C．命令按钮Command1的Caption属性值为“查询” D．窗体的Caption属性值为“查询字符ASCII码”

6、在VB中,要在标签对象Label１上显示文字“欢迎光临”,下列语句正确的是( ) A．Label1.Caption=欢迎光临 B．Label1.Text=”欢迎光临” C．Label1.Caption=”欢迎光临” D．Label.Caption=”欢迎光临”

7．下列各组控件都具有Caption属性的是( ) A．简单图形、按钮 B．标签、文本框 C．按钮、标签 D．文本框、按钮

8．VB开发应用程序的两大精髓是“可视化”和( ) A．事件面向 B．事件驱动 C．对象 D．窗口化

~ 5 ~

算法练习

9．某学生设计了一个VB应用程序，他单击了窗体上的“测算”按钮对象，应用程序的窗体界面及按钮的属性窗口界面如下图所示，现在想编制该按钮单击事件的处理过程，则该事件处理过程名是 A．测算_Click

B．Command1_Click C．Cmd1_Click D．Cmd1_DblClick

10．一个VB工程的部分设计界面如下图所示. 下列选项中正确的是( ) A．窗体的Caption属性值是“对象” B．窗体名称是“Form１” C．当前选中对象的名称是“Shape” D．工程的名称是“圆”

11．(2010HK)有如下Visual Basic程序段：

Private Sub Label1_DblClick() Dim x As Integer, y As Integer x = 5 y = 15

Text1.Text = Str(x + y) End Sub

能运行这段程序的事件是

A）单击命令按钮Command1 B）单击标签Label1 C）双击标签Label1 D）单击文本框Text1

12．在VisualBasic中,语句x＝Val(student.text)中的student是( ) A．属性名 B．属性值 C．对象名 D．类名

13. 如下图所示VB的文件菜单,若想生成能在Windows环境中直接运行的文件,应选 择( )

A．① B．② C．③ D．④

14. (2012HK)在Visual Basic中，鼠标单击窗体Form触发的事件处理过程名为 A）Text1_Click B）Form_Click C）Text1_DblClick D）Form_DblClick

15.下列控件中可用于接受用户输入文本,又可用于显示文本的是( )

A．Label B．TextBox C．CommandButton D．ListBox

~ 6 ~

算法练习

16. (2012HK)某Visual Basic程序如下： Private Sub Command1_Click() Dim x As Integer, i As Integer For i = 1 To 10 Step 3 x = i * (i + 2)

List1AddItem Str(x) Next i End Sub

运行程序，单击命令按钮Command1后弹出如图所示的出错信息提示。引起该错误的语句是 A）For i = 1 To 10 Step 3 B）x = i * (i + 2) C）List1AddItem Str(x) D）Next i

17. (2011HK)某Visual Basic程序的一个事件过程如下： Private Sub Command1_Click() Dim x As Single

Dim y As Single x = -10 y = Abc(x)

Label1.Caption = Str(y) End Sub

运行程序，单击命令按钮Command1后弹出如图所示的出错信息提示，引起该错误的语句是 A）Dim y As Single B）x = -10 C）y = Abc(x) D）Label1.Caption = Str(y)

18．下列关于VB基本控件的叙述中，正确的是( ) A．文本框和标签都可以用于程序的输入和输出 B．命令按钮和标签都有Caption属性 C．每个控件都具有相同的属性 D．语句List1.clear中，List1属于ListBox控件类，clear是该对象的属性

①Int(X)函数，当X是负数时的情况，如 Int(－8.9)的值是－9。

②Rnd()函数的功能是随机产生一个[0，1)区间内的小数，能取到0，但取不到1。若产生一个[a，b] 区间内的整数，可用语句Int(Rnd()*(b－a＋1))＋a实现。如产生一个[100，200]区间内的整数，语句为：Int(Rnd()*(101))＋100。

③Asc(X)与Chr(X)，Str(X)与Val(X)是两对互逆函数。

④Len(X)函数的X参数中的字母、中文字符、空格、标点符号等都要占一个长度单位，可理解为“数个数”函数。

19.下列可以作为VB变量名的是( ) A．A&s B．A＋s C．As D．A_s

20．在VB数组说明语句Dimd(3To8,4To9)AsBoolean中,数组d的变量类型是( ) A．长整数型 B．字符串型 C．单精度实数型 D．逻辑型

21．在VB中，下列属于字符串常量的是 ( ) A．”2014” B．ABC C．True D．9.8

22．已知x＝”Visual Basic”，则表达式Mid(x，6，3)的值为 ( ) A．”lBa” B．”l B” C．”Bas” D．” lB”

~ 7 ~

算法练习

23．(浙江省2012年3月高考题)某宾馆的房间号由5位字符组成(例如A0823表示A幢8层23号房间)，末位数字为奇数时表示房间朝南、为偶数时表示房间朝北。字符串变量s中存储了1个房间号，下列能正确判断房间朝南的VB表达式是( ) A．Val(Mid(s,5,1)) Mod 2＝1 B．Val(Mid(s,5,1)) Mod 2＝0 C．Val(Mid(s,5,1)) \\2＝1 D．Val(Mid(s,5,1))\\2＝0

24．下列能表示“x与y都小于100”的VisualBasic逻辑表达式是( ) A．(x＜100) And (y＜100) B．x＜100,y＜100 C．(x＜100) Or (y＜100) D．x＜100 : y＜100

25．VisualBasic表达式3+27 \\ 2 Mod 3* 2,正确的值是( ) A．０ B．２ C．３ D．４

26．在Visual Basic中，下列能作为变量名的是( ) A．you B．As C．x＋y D．2b

27．在程序中用变量存储某个人的身份证号码，以下数据类型合适的是( ) A．Integer B．Long C．String D．Boolean

28．用下面语句定义的数组的元素个数是 ( ) Dim names(5) As String A．4 B．5 C．6 D．不确定

29．已知字符”A”的ASCII码是65, 则VB表达式Chr(Asc(“E”)-3)的值是( ) A．＂A＂ B．＂B＂ C．＂C＂ D．66

30．下列VB表达式中,只能产生-100到100之间(包括-100和100)随机整数的是( ) A．Int(Rnd?101) B．Int(Rnd?100)＋100 C．Int(Rnd?200)-100 D．Int(Rnd?201)-100

31．已知某校100名学生的身高数据(包含一位小数)，要求编写VB程序，统计超过平均身高的人数。下列变量定义最适合该程序的是( ) A．定义100个整数类型变量 B．定义100个单精度实数类型变量 C．定义一个元素个数为100的整数类型一维数组

D．定义一个元素个数为100的单精度实数类型一维数组

32．在Visual Basic中，下列语句定义错误的是( ) A．Const g＝9.8 B．Dim False as Boolean C．Dim b(1 to 5) as string D．Dim y as Long

33．已知x＝－９,则VB表达式Abs(x)＋Int(x/２)的值是( ) A．－14 B．4 C．4.5 D．５

34．已知x＝8,y＝＂-7＂,则VB表达式Str(x)＋y的值为( ) A．１ B．＂1＂ C．＂８-7＂ D．＂8+ -7＂

35．VB表达式Len(Mid(＂HappyNewYear2012!＂,6,4))的计算结果是( ) A．４ B．５ C．６ D．１０

36．下列能表示“x大于1且x小于等于9”的VisualBasic表达式是( ) A．x＞10 or x＜＝９ B．x＞＝1 Or x＜＝９ C．x＞＝１And x＜＝９ D．x＞１ And x＜＝９

~ 8 ~