VB 程序阅读题

vb 练习题及答案【篇一：vb 习题(含答案)】lass=txt>1 、vb 程序中，通常不会产生错误提示的是( )。

（1 分）a、编译错误b、逻辑错误c、运行时错误d、实时错误2、在设计阶段，双击窗体上任一空白处，打开的窗口是( )。

（1 分）a、工程资源管理器窗口b、代码窗口c、工具箱窗口d、属性窗口3、下列说法中，正确的说法是( )。

（1 分）a、窗体名称和该窗体文件名必须一致b、窗体名称和该窗体文件名可以不相同c、窗体名称和该窗体文件名不能使用汉字d、窗体名称不能使用汉字、但该窗体文件名能使用汉字4、visual basic 有完备的help 联机帮助功能，可以通过按下功能键( )得到帮助。

（ 1 分）a、f9 b 、f8c、f1 d 、f55、以下( )控件可作为容器使用。

（ 1 分）a、label b 、pictureboxc、textbox d 、image6、将窗体的boderstyle 属性设置为( )可使窗口不显示标题栏。

（ 1 分）a、0 b 、1c、2 d 、57、文本框没有( )属性（1 分）a、text b 、namec、caption d 、borderstyle23、下列( )是不合法的常量。

（ 1 分）a、100 b 、10e02c、100.0 d 、10e0.524、下列对变量的定义中，定义x 为变体型变量的是( )。

（1 分）a、dim x as double b 、dim xc、dim x! d 、x%=2325、设有如下变量声明：dim testdate as date ，为变量testdate正确赋值的表达方式是( )。

（1 分）a、textdate=#1/1/2002# b 、testdate=#1/1/2002#c、textdate=date(1/1/2002) d 、testdate=format(m/d/yy,1/1/2002)26、在立即窗口中运行以下语句，a=beijing :b=shanghai :printa,b 对其输出结果的描述中，正确的是( )。

VB期末试题（含答案）一、单选题（每题1.5分，共30分）1.在VB中，假定有以下程序段, 则执行结束后k的值是：（ A ）For i =1 To 3k = i+2Next iA． 5 B．4 C． 3 D．62. 以下控件中可以作为容器控件的是（ B ）A．Image图像框控件 B．PictureBox图片框控件C．TextBox文本框控件 D．ListBox列表框控件3.关于Image控件和PictureBox控件的说明，其中错误的是（ B ）A．Image控件和PictureBox控件都有Picture属性B．Image控件和PictureBox控件都支持Print方法C．Image控件和PietureBox控件都可以用LoadPicture函数把图形文件装入控件中D．Image控件和PictureBox控件都能在属性窗口装入图形文件，也都能在运行期间装入图形文件4.为使计时器控件每隔5秒钟产生一个计时器事件(Timer事件)，则应将其Interval属性值设置为( D )A．5 B．500 C．10 D．5000 5.能显示窗体的方法是（ B ）。

A．Visible B．Show C．New D．Open6.MsgBox函数中有4个参数，其中必须写明的参数是（ C ）A．指定显示按钮的个数 B．对话框的标题 C. 提示信息 D. 所有参数都是可选的7.你若在代码窗口中编写：msgbox(“AAAA”,vbokonly,”BBBB”)语句后，所产生的信息框的标题是（ C ）A．AAAA B．空 C．BBBB D．出错，不能产生信息8.要使文本框获得输入焦点，则应采用文本框控件的（D ）方法。

A．GotFocus B．LostFocus C．KeyPress D．SetFocus9.为了把焦点移到某个指定的控件，所使用的方法是（ A ）A．SetFoeus B．Visible C．Refresh D．GetFocus10.语句if 3*4>=10 thena=1elsea=2end if执行后，a的值为（ D ）。

09微机升学班《Visual Basic6.0》练习题一一、选择题：1、窗体上有一个列表框和一个文本框，编写如下两个事件过程：Private Sub Form_Load()List1.Additem＂Beijing＂List1.Additem ＂Tianjin＂List1.Additem＂Shanghai＂Text1.Text= ＂＂End SubPrivate Sub List1_DblClick()x=List1.TextPrint X+Text1.TextEnd Sub程序运行后，在文本框中输入＂China＂,然后双击列表框中的＂Shanghai＂,则输出结果为________。

A.China BeijingB.China TianjinC.China ShanghaiD.Shanghai China2、在窗体上画一个列表框和一个文本框，然后编写如下两个事件过程；Private Sub Form_Load()List1.AddITem＂357＂List1.AddITem＂246＂List1.AddITem＂123＂List1.AddITem＂456＂Text1.Text=＂＂End SubPrivate Sub List1.DblClickOM=List1.TextPrint M+Text1.TextEnd Sub程序运行后,在文本框中输入“123”,然后双击列表框中的“456”,则输出结果为________。

A.1245B.456123C.123456D.03、在列表框中当前被选中的列表项的序号是由下列________属性表示的。

A.ListB.IndexC.ListlndexD.False4、在Visual Basic中，组合框是文本框和________特性的组合。

A.复选框B.标签C.列表框D.目录列表框5、为组合框Combol增加一个数据项"计算机"，下列命令正确的是________bol.Text="计算机"bol.ListIndex="计算机"bol.Addltem "计算机"bol.ListCount="计算机"6、执行了下面的程序后，组合框中数据项的值是________。

一、单项选择题（共10题、总分30分、得分30分）1. 下列哪个语句定义了包含8个元素的单精度数组（） (本题分数：3 分，本题得分：3 分。

)A、Dim a(2,4) As SingleB、 Dim a(1 to 8)!C、Dim a!(7)D、 Dim a(1 to 2,3 to 6) As Long2. 下列关于菜单访问键和快捷键的说法正确的是（） (本题分数：3 分，本题得分：3 分。

)A、若一菜单项的Caption属性为“打开(&O)”，则其快捷键是Ctrl+OB、快捷键指用于执行一个命令的功能键或组合键，可以在菜单编辑器中将快捷键设为Alt+FC、可以为任意的菜单项都添加快捷键或访问键D、通过访问键打开某个子菜单时，必须先使焦点位于其上一级菜单3. 如果要退出Do…Loop循环，可使用语句（）。

(本题分数：3 分，本题得分：3 分。

)A、ExitB、 Exit DoC、 Exit ForD、Exit For4. 若有数组说明语句：Dim t(1 To 10) As Variant，则t被定义为（）。

(本题分数：3 分，本题得分：3 分。

)A、数值数组B、可调数组C、字符串数组D、可变类型数组5. 在下列关于对话框的叙述中，错误的是（）： (本题分数：3 分，本题得分：3 分。

)A、作为对话框窗体的Borderstyle、ControlBox、MaxButton和MinButton应分别设置为l、True、False和 False。

B、语句frmAbout．Show vbModeless，frmMain将 fmAbout窗体显示为 fmMain的无模式子窗体。

C、可以将对话框分成两种类型：模式的和无模式。

D、语句frmAbout．Show将frmAbout作为无模式对话框显示。

6. 在窗体上有一按钮Command1，其事件过程如下，则按下Command1窗体上显示的是（）Private Sub Command1_Click()Dim i As IntegerScale (0, 0)-(10, 10)For i = 1 To 3DrawStyle = iDrawWidth = iLine (0, i + 1)-Step(8, 0)CurrentY = CurrentY + 1NextEnd Sub (本题分数：3 分，本题得分：3 分。

《VB程序设计》模拟试题●填空题1.窗体模块的文件扩展名为 ___FRM_________ 、标准模块的文件扩展名为____BAS______ 、类模块文件的扩展名为______CLS_______ 。

Basic中数据类型可分为 _____标准数据类型________和用户自定义数据类型两大类，前者根据其取值的不同，可分为_____整型_________、 ______长整型_____、布尔型和 ____字符型_________。

3. Abs= ；Int= ____-10_______。

4. "程序"& "设计"运算结果为 ___程序设计____ 。

5. Dim a, b as Boolean语句显式声明变量a是___变体___变量，b是___布尔__变量。

6. MsgBox函数的返回值中， VBRetry表示单击了____重试_____按钮，VBYes 表示单击了___是_____按钮，VBNo表示单击了_____否____按钮。

7. 要加载窗体，可以在代码中使用___________语句，要显示窗体，可以在代码中使用___________方法，要隐藏窗体，可以在代码中使用Hide方法，要卸载窗体，可以在代码中使用___________方法。

8.对话框分为_________对话框和________对话框两种类型，其中_____________ 对话框最常用。

9. 对象是Visual Basic应用程序的基本单元，它是由 ___类___创建的。

在Visual Basic中可以用属性、 __方法___、___事件___ 来说明和衡量一个对象的特性。

10. 条件判断语句可以使用___If…then____________语句、____If…Then…Else______语句和 ______If…Then…ElseIf______语句。

Select case 语句11. 声明一个值为的常量Pi的语句为___Const pi = 。

Visual Basic程序设计综合练习题一及答案一、单项选择题(每题3分，共45分）1．无论何种控件，共同具有的属性是（）。

A．Text 属性B．Caption属性C．Name属性D．Autosize属性2．当需要上下文帮助时,选择要帮助的内容,希望出现MSDN窗口及显示所需的帮助信息，应按的键是( )。

A．Help B．F10 C．F1 D．Esc3．为了保存一个Visual Basic应用程序,下列说法正确的是（）。

A．只保存窗体文件（。

frm）B．只保存工程文件(.vbp）C．分别保存工程文件和标准模块文件(。

bas)D．分别保存工程文件、窗体文件和标准模块文件4．在Visual Basic中,变量的默认类型是（)。

A．Integer B．VariantC．Double D．Currency5．Timer控件可用于后台进程中，可在Timer事件内编程，要停止触发Timer事件,需要设置的属性是( ）。

A．Interval=0或Enabled=False B．Interval=0或Visible=False C．Enabled=False 或Enabled=0 D．Interval=0且Enabled=False6．要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮,只要对下列( ）属性设置就有效。

A．MaxButton B．BorderSyleC．Width D．MinButton7．有程序代码如下：Text1。

Text = "Visual Basic"，则Text1，Text ，和"Visual Basic"分别代表( ）。

A．对象，值，属性B．对象，方法，属性C．对象，属性，值D．属性，对象，值8．要设置命令按钮的背景图形，必须设置的两个属性是（）。

A．Value和Icon B．Style和IconC．Caption和Picture D．Style和Picture9．在VB中，下列合法的变量名是（）。

期末自测题（A卷）文件部分的选择题要做，其它类型的题目不用做，不作考察选择题其它部分还没有时间做一、单选题（每题1分，共25分）1、211.66.160.1 是Internet上的( )。

(A) IP地址 (B)域名 (C)密码 (D)软件编号2、在以下四个www网址中，（）网址不符合www网址书写规则。

(A) (B) (C) (D) 3、下列字符中，其ASCII码值最小的一个是（）。

(A) A (B) a (C) Z (D) X4、下列软件中属于浏览器的是（）。

(A) Excel (B) Internet Explorer (C) QQ (D) Visual Basic5、电子邮件(E-mail)地址的正确形式是（）。

(A)用户名@域名 (B)用户名#域名 (C)用户名/域名 (D)用户名.域名6、下面变量名不合法的是（）。

(A) a2 (B) abcd (C) a$x (D) Cd_E7、下列表达式中，正确的Visual Basic表达式是（）。

(A) 2sin45° (B) ∏*R2 (C) x÷y×5 (D) （x+1）/（x^2+1）/28、下面逻辑表达式的值为真的是（）。

(A) "A"> "a" (B) "abc"> "bc"(C) "That"> "Thank" (D) 12> 12.19、下列过程定义语句说明不合法的是（）。

(A) Sub f1(ByRef n() As Integer) (B) Sub f1(ByRef n As Integer)(C) Sub f1(ByVal n() As Integer) (D) Sub f1(ByVal n As Integer)10、执行下面的4个打印语句，将出错的是（）。

二、阅读程序写出运行‎结果1．在程序运‎行‎时，将保存在C盘‎P i‎c文件夹中的名‎为Fi‎s hing.‎b mp的‎图片加载到‎图片框Pi‎c tur‎e1中的语句‎为‎（1）‎‎。

2．执行下面‎的‎C ommand1_‎C lick事件过程后‎，Text1中显示‎内‎容是（2‎）‎，Tex‎t2中‎显示内容是‎‎（3）‎。

Pr‎i vat‎e Sub ‎C om‎m and1_C‎l i‎c k()‎‎D im S As ‎S tring, I ‎A s Intege‎r‎Con‎s t‎Ch As ‎S tr‎i ng = ‎"012‎34567‎89."‎‎S = "2‎L0A‎03U.1SI‎0V‎.11"‎‎F or I = 1‎To Len(S)‎‎I‎f InStr(‎C h‎, Mid(S‎, I‎, 1)) ‎= 0 ‎T hen‎‎‎Tex‎t1 ‎= Mid(S‎,‎I, 1) & ‎T‎e xt1‎Else‎‎‎Text2 =‎T‎e xt2 & ‎M id‎(S, I,‎1)‎‎En‎d If‎N‎e xt‎IEnd ‎S u‎b3．执行下面‎程‎序，单击Comma‎n d1按钮后，窗体上‎第一行内容是‎‎（4），‎第二‎行内容是‎（‎5）‎，最后一‎行内容是‎（6‎）‎。

Pri‎v at‎e Sub C‎o m‎m and1_Cl‎i‎c k()‎D im N As I‎n teger, M‎‎A s Integ‎e r‎, Lcm A‎s I‎n teger‎N =‎9M ‎= 27‎‎L cm = ‎R ec‎u rsion(‎N,‎M)‎P‎r int "Lcm‎="; LcmEn‎d SubPri‎v‎a te Func‎t i‎o n Recu‎r si‎o n(A A‎s In‎t eger‎, B A‎s In‎t eger)‎As‎Intege‎r‎Stat‎i‎c k As In‎t eger‎k = k + 1‎‎If A‎M‎o d B = ‎0 T‎h en‎‎Rec‎u rsio‎n = ‎A‎E ls‎e‎‎Recursi‎o‎n = Recur‎s ion(A + A‎/ k, B)‎‎End I‎f‎Pri‎n t ‎A, k‎k‎= 0‎E nd F‎u nct‎i on4．‎执行下‎面程序，当单击‎C o‎m mand1按钮‎时‎，列表框中显示的第‎一行是（7）‎，第二行是‎‎（8）‎‎，第三行是‎‎（9）‎。

VB程序(chéngxù)习题集(附答案)解析VB程序习题集(附答案(dá àn))解析VB简介(jiǎn jiè)1、在以下有关对象属性(shǔxìng)的叙述中，不正确的是___________。

A、一个对象的属性可分为外观(wàiguān)、行为若干类B、不同属性(shǔxìng)可能具有不同的数据类型C、一个对象的所有属性(shǔxìng)都可在属性窗口的列表中进行设置D、属性窗口中的属性列表既可按字母排序也可按类别排序2、Visual Basic中最基本的对象是___________，它是应用程序的基石，也是其他控件的容器。

A、文本框B、命令按钮C、窗体D、标签3、有程序代码“Text1.Text="Visual Basic"”，其中的Text1、Text和“Visual Basic”分别代表___________。

A、对象、值、属性B、对象、方法(fāngfǎ)、属性C、对象(duìxiàng)、属性、值D、属性(shǔxìng)、对象、值4、用窗体的___________属性(shǔxìng)来设置窗体的标题。

A、CaptionB、StyleC、TextD、Name5、窗体上有一个文本框控件Text1，假设已存在(cúnzài)三个整型变量a、b、c，且变量a的值为5，变量b的值为7，变量c的值为12。

以下的___________语句可以使文本框内显示的内容为：5+7=12。

A、Text1.Text = a + b + cB、Text1.Text = "a+b=c"C、Text1 = a & "+" & b & "=" & cD、Text1 = "a" & "+" & "b" & "=" & "c"6、如果在窗体上有命令按钮OK，在代码编辑窗口有与之对应的Cmd_Click（）事件，则命令按钮的名称属性和Caption属性分别为_________。

第一章选择题1. VB是一种面向对象的可视化程序设计语言,采取了（A ）的编程机制。

（A）事件驱动(B) 按过程顺序执行（C）从主程序开始执行(D) 按模块顺序执行2. 以下不属于VB的工作模式的是（c ）模式。

(A) 运行(B)设计(C) 编译(D)中断3. 在VB集成环境创建VB应用程序时，除了工具箱窗口、窗体窗口、属性窗口外，必不可少的窗口是（ C ）。

（A）窗体布局窗口（B）立即窗口（C）代码窗口（D）监视窗口4. 保存新建工程时，默认的路径是（B ）。

（A）My Documents （B）VB98 （C）\ （D）Windows5. 将调试通过的VB工程经“文件”菜单的“生成.exe文件”编译成.exe后，将该可执行文件拿到其他机器上不能运行的主要原因是（A ）。

（A）运行的机器上无VB系统（B）缺少.frm窗体文件（C）该可执行文件有病毒（D）以上原因都不对6. VB6.0集成开发环境可以（D ）。

（A）编辑、调试、运行程序，但不能生成可执行程序（B）编辑、调试、生成可执行程序，但不能运行程序（C）编辑、生成可执行程序、运行程序，但不能调试（D）编辑、调试、运行程序，也能生成可执行程序7. VB6.0集成环境的主窗口中不包含（B ）。

（A）菜单栏（B）状态栏（C）标题栏（D）工具栏8. 在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（C ）。

（A）工程资源管理器窗口（B）工具箱窗口（C）代码窗口（D）属性窗口9. 下面四个选项中，不是VB6.0工具箱的标准控件的是（C ）。

（A）滚动条（B）定时器（C）多媒体（D）框架10. VB6.0的（C ）版本，可供专业编程人员开发功能强大的组内分布式应用程序。

（A）初级版（B）学习版（C）企业版（D）专业版11. 英文缩写“OOP”的含义是（A ）。

（A）面向对象程序设计（B）结构化程序设计语言（C）事件驱动的编程机制（D）可视化程序设计12. 不能打开代码窗口的操作是（B ）。

VB期末考试试题一、填空题1、VB程序设计的主要特点是（1）和(2） .2、在VB中，最主要的两种对象是（3）和（4）。

“““”””3、工程是构成应用程序文件的（5） .4、方法是VB提供的一种(6）,用来完成一定的操作.5、浮点类型数据包括单精度型和___（7）__数据。

6、事件是窗体或控件对象识别的___（8)____.7、可用窗体的___（9）_ 方法在窗体中显示文字。

8、复选框控件Value属性指示复选框处于____（10）___或禁止状态(暗淡的）中的某一种。

9、在VB中，修改窗体的（11)和（12) 属性值,可改变窗体的大小。

10、双击工具箱中的控件图标，可在窗体的（13）出现一个尺寸为缺省值的控件.11、在MsgBox函数中，如果缺省title参数，则使用（14）作为消息框的标题。

12、设x＝34.58,语句Print Format(x，“000。

0"）的输出结果是（15） .13、在VB 中，数值型变量的初值为（16），Varant型变量的初值为（17) ，布尔型变量的初值为（18）。

14、设置窗体的（19) 属性,可在窗体上显示图片。

15、程序运行工程中，清除MP图片框中的图片应使用语句（20）。

二、选择题1、菜单控件只包括一个事件，即（1），当用鼠标单击或键盘选中后按“回车”键时触发该事件,除分隔条以外的所有菜单控件都能识别该事件。

A、GotFocusB、LoadC、ClickD、KeyDown2、滚动条控件（如图所示）的Max属性所设置的是（2) 。

A、滚动框处于最右位置时,一个滚动条位置的Value属性最大设置值B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量D、滚动条控件无该属性3、SQL 语句Select ＊Form student 中的*表示（3) .A、所有记录B、所有字段C、所有表D、都不对4、以下选项中，不属于标签的属性是（4) 。

VB简介1、在以下有关对象属性的叙述中，不正确的是___________。

A、一个对象的属性可分为外观、行为若干类B、不同属性可能具有不同的数据类型C、一个对象的所有属性都可在属性窗口的列表中进行设置D、属性窗口中的属性列表既可按字母排序也可按类别排序2、Visual Basic中最基本的对象是___________，它是应用程序的基石，也是其他控件的容器。

A、文本框B、命令按钮C、窗体D、标签3、有程序代码“Text1.Text="Visual Basic"”，其中的Text1、Text和“Visual Basic”分别代表___________。

A、对象、值、属性B、对象、方法、属性C、对象、属性、值D、属性、对象、值4、用窗体的___________属性来设置窗体的标题。

A、CaptionB、StyleC、TextD、Name5、窗体上有一个文本框控件Text1，假设已存在三个整型变量a、b、c，且变量a的值为5，变量b的值为7，变量c的值为12。

以下的___________语句可以使文本框内显示的内容为：5+7=12。

A、Text1.Text = a + b + cB、Text1.Text = "a+b=c"C、Text1 = a & "+" & b & "=" & cD、Text1 = "a" & "+" & "b" & "=" & "c"6、如果在窗体上有命令按钮OK，在代码编辑窗口有与之对应的Cmd_Click（）事件，则命令按钮的名称属性和Caption属性分别为_________。

A、OK、CmdB、Cmd、OKC、CmdOK、OKD、OK、CmdOK7、窗体Form1的名称属性是frm，它的Load事件过程名为___________。

VisualBasic6.0程序设计试题一与答案一、判断题：1、移动框架时框架内控件也跟随移动，所以框架内各控件的Left、Top属性值也将随之改变。

（错）2、VB提供的几种标准坐标系的原点都是在绘图区域的左上角，如果要把坐标原点放在其它位置，则需要使用自定义坐标系统。

（对）3、若窗体的坐标刻度为“缇”、窗体上的图片框控件的坐标刻度为“磅”，则图片框的Left属性值的单位为“缇”。

（对）4、用Scale方法改变了窗体坐标系后，窗体的Left、Top属性值不变。

（对）5、将容器的FillStyle属性设置为0后，容器中已绘制的图形的填充样式都为实心。

（错）6、语句“Shape1.FillStyle = vbSolid”和“Shape1.FillStyle = 0”作用相同。

（对）7、用Cls方法能够清除窗体或图片框中用Picture属性设置的图形。

（错）8、用Cls方法可以清除组合框中的所有表项。

（错）9、Picture图片框既可用来显示图片和绘制图形，也可以用Print方法来显示文字。

（对）10、在图片框中放置的控件既可以在该图片框内移动，也可以移出该图片框外。

（错）11、框架控件和形状控件都不能响应用户的鼠标的单击事件。

（错）12、图片框的Move方法不仅可以移动图片框，而且还可以改变该图片框的大小，同时也会改变该图片框控件的有关属性值。

（错）13、执行语句Pic1.Picture = ”c:\temp\a.bmp”，可以为图片框控件Pic1加载文件名为c:\temp\a.bmp的图形文件。

（错）14、Picture对象的AutoSize属性值为True时，表示该对象不管原来图片的大小，一律都自动调整为控件的大小尺寸，以便能够完整地显示该图片。

（错）15、图片框控件与影像框控件加载图形文件的方法相同。

（对）二、选择题：1、改变控件在窗体中的左右位置应该修改控件的（）属性？（B）A. TopB. LeftC. WidthD. Right2、要改变控件的宽度，应该修改控件的（）属性？（C）A. TopB. LeftC. WidthD. Right3、重新定义图片框控件的坐标系统，可采用该图片框的（）方法？（A）A. ScaleB. ScaleXC. ScaleYD. SetFocus4、容器的ScaleMode属性值为（）时，容器坐标系的每一个单位为一磅？（A）A. 2B. 1C. 4D. 65、改变了容器的坐标系后，该容器的（）属性值不会改变？（A）A. LeftB. ScaleLeftC. ScaleTopD. ScaleWidth6、无论怎样改变图片框控件P1的坐标系，其中心点的x，y坐标分别为（）？（B）A.(P1.ScaleLeft+P1.ScaleWidth)/2、(P1.ScaleTop+P1.ScaleHeight)/2B.P1.ScaleLeft+P1.ScaleWidth/2、P1.ScaleTop+P1.ScaleHeight/2C.P1.Left+P1.Width/2、P1.Top+P1.Height/2D.P1.Width/2、P1.Height/27、设置图片框控件PIC1的背景色为红色，可以执行语句（）？（B）A.PIC1.BackColor = QBcolor(1)B.PIC1.BackColor = 255C.PIC1.BackColor = RGB(0,0,255)PIC1.BackColor = RGB(0,255,0)8、要使Shape控件以实心方式填充，应该设置其（）属性？（B）A. FillColorB. FillStyleC. BackStyleD. Shape9、下列表达式中，（）不是蓝颜色的值？（C）A.vbBlueB. Rgb(0,0,255)C. QBColor(12)D. &HFF000010、下列表达式中，（）不是红颜色的值？（C）A.vbRedB. Rgb(255,0,0)C. QBColor(1)D. &HFF11、（）对象不能作为控件的容器？（C）A. FormB. PictureBoxC. ShapeD. Frame12、若在图片框上用绘图方法绘制一个圆，则图片框的（）属性不会对该圆的外观产生影响。

VB程序阅读题与程序填空题综合练习1、阅读下面程序，当单击窗体之后，窗体上输出的是。

Private Sub Form_Click( )Dim i As Integer, j As IntegerDim k As Integerk=0For i = 0 To 10 Step 3For j = 1 To 10If j > = 5 Then i = i +4: Exit Forj = j + 1k = k + 1NextIf i > 8 Then Exit ForNextPrint kEnd Sub2、阅读下面的事件过程。

单击窗体后，在文本框Text1和Text2中显示的内容分别是和；若将程序中A语句与B语句的位置互换，再次执行程序，单击窗体后在Text1和Text2中显示的内容分别是和。

Private Sub Form_Click( )Dim x As Integer, y As Integerx = 1 : y = 0Do While x < 3y = y + x 'A语句x = x + 1 'B语句LoopText1.Text = xText2.Text = yEnd Sub3、下面程序段中，k循环共执行次，在窗体上显示的结果是。

Dim b As Integer, k As Integerb = 1For k =1 To 5b = b * kIf b > = 15 ThenExit ForElsek = k + 1End IfNext kPrint k, b4、以下是按钮cmdl的Click事件过程，求1~100之间的所有质数。

质数的个数显示在窗体上，在划线处填上缺少的内容。

Private Sub cmdl_Click( )Dim intNum As Integer, int1 As Integer, int2 As IntegerintNum = 0For int1 =For int2 = 2 To int1 \2If (int1 Mod int2) = 0 ThenintNum=1End IfNextIfsNum = sNum + 1End IfNextPrintEnd Sub5、若命令按钮的名称为CmdExit，程序要求单击以上命令按钮时，程序停止运行。

第七章理论复习题1、阅读下列程序：Private Sub Form_Click()Dim m As IntegerStatic n As IntegerFor i = 1 To 3n = n + im = m + i ^ 2NextPrint m, n`End Sub运行时两次单击窗体结果为（）。

A、14 614 6B、14 614 12C、14 628 6D、14 628 122、窗体上的命令按钮编写如下事件过程：Private Sub Command1_Click()Dim array1(10, 10) As IntegerDim i, j As IntegerFor i = 2 To 4For j = 3 To 5array1(i, j) = i * jNext jNext iPrint array1(2, 4) + array1(3, 4)End Sub运行时，单击命令按钮后输出的结果是（）。

A、9B、13C、程序出错D、205、以下数组声明语句中数组a包含的元素个数为（）。

Dim a(3,-2 to 1,5)A、96B、75C、60D、136、有声明Dim a(-3 to 1,3) As Integer，则下列叙述中正确的是（）。

A、数组a是二维动态数组B、数组a共有20个元素C、a（0,0）不是该数组的元素D、a（1,1）是该数组的第十个元素7、下列叙述中错误的是（）。

A、控件数组的每一个元素共享同样的事件过程B、控件数组的每一个元素都有与之相关联的下标值C、控件数组的每一个元素都有不同的name属性作为标识D、可在运行过程中删除控件数组的某个元素8、能使一维数组arr(6)元素个数加1，但保留数组中原有元素的语句是（）。

A、ReDim arr(7)B、ReDim Preserve arr(7)C、Public arr(1 to 7)D、Static arr(7)9、运行下列程序，单击窗体时在窗体上显示的结果是（）。

VB期末考试试题（A卷）一、选择题1。

要改变控件的宽度，应修改该控件的（ B )属性。

A、TOPB、widthC、LeftD、Height2。

将命令按钮Command1设置为不可见，应修改该命令按钮的（A）属性。

A、VisibleB、ValueC、CaptionD、Enabled3.单机滚动条两端的任何一个滚动箭头，将触发该滚动条的( C ）事件。

A、Scroll B 、KeyDown C、change D、Dragver 4。

（ D ）对象具有clear方法。

A、图片框B、窗体C、复选框D、列表框5.中心定义图片框控件的坐标系统,可采用该图片框的（ A ）A、scaleB、Scale XC、scale YD、setFocus 6。

将通过对话框CommdDialog1的类型设置成另存为对话框，可调用该控件的（ B）方法。

A、ShowopenB、ShowsaveC、ShowColorD、ShowFont7。

形状控件所显示的图形不可能是（ D ）A、圆B、椭圆C、圆角正方形D、等边三角形8.由Fro K=10 TO oslept 3:next K循环语句控件的循环次数是（ B )A、12B、0C、—11D、—109。

下列数据类型中，占用内存最大值是( D )A、BoolwanB、ByteC、LntegerD、Single 10。

如果在图片框上使用绘图方法绘制一个实心圆，则图片框的（ C ）属性决定了该图片的颜色。

A、BackColroB、ForelklorC、FillcolorD、Dlawstyle一、选择题1。

要在垂直位置上移动控件，应利用控件的( C )属性。

A、LeftB、WidthC、TopD、Height2。

要在文本框中的文本显示掩码（密码）符，在属性设置时，首先必须设置（ D）属性为False。

A、TxetB、EnabledC、VisibleD、Multline 3。

用键盘的光标键选中某一菜单项，并按回车触发菜单的( C ）的事件.A、KeyPressB、KeyDownC、ClickD、Keyllp4.一下（ D ）对象不具有Clear方法.A、列表框B、组合框C、剪贴框D、图片框5.软件列表中设定“文件列表”显示文件类型应改该控件的（ D ）属性。

Else 分支 选择结构1. 在窗体上画一个名称为Commandl 的命令按钮和两个名称分别为Textl 、Text2的文本框，然后编写如下事件过程:Private Sub Command 1 _Click()n=Textl.TextSelect Case nCase 1 To 20x=10Case 2, 4, 6x=20Case Is <10x=30Case 10x=40End SelectText2.Text=xEnd Sub程序运行后，如果在文本框Textl 中输入10,然后单击命令按钮，则在Text2中显示的内容是10 2. 在窗体上画…个名称为Commandl 的命令按钮，然后编写如下事件过程： Private Sub Command 1 _Click()x = -5If Sgn(x) Theny = Sgn(x 人 2)Elsey = Sgn(x)End IfPrint yEnd Sub程序运行后，单击命令按钮，窗体上显示的是 13. 在窗体上画一个名称为Commandl 的命令按钮，然后编写如下事件过程： Private Sub Command 1 _Click()x=InputBox("I 叩 ut")Select Case xCase 1,3Print”分支 1"Case Is >4Print”分支 2"Case ElsePrint "Else 分支"End SelectEnd Sub程序运行后，如果在输入对话框中输入2,则窗体上显示的是4.在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程：Private Sub Command 1 _Click()A = 75IfA>60Then1= 1ElseIfA>70Then1 = 2Elself A> 80 Then1 = 3ElseIfA>90Then1 = 4End IfPrint "I="; IEnd Sub程序运行后，单击命令按钮，窗体上显示的是15.阅读下列程序，写出运行结果。