VB程序设计第一次月考练习题.docx

1、VB程序设计第一次月考练习题第一章 Visual Basic程序设计概述一、填空题 1、Visual Basic是一种面向_的可视化程序设计语言，采取了_的编程机制。 2、在VB中工程文件的扩展名是_，窗体文件的扩展名是_。二、选择题 1、下面不是VB工作模式的是（ ）A设计模式 B运行模式 C汇编模式 D中断模式 2、可视化编程的最大优点是（ ）A具有标准工具箱 B一个工程文件由若干个窗体文件组成C不需要编写大量代码来描述图形对象 D所见即所得 3、下列不能打开属性窗口的操作是（ ）A执行“视图”菜单中的“属性窗口”命令B按F4键 C按Ctrl+TD单击工具栏上的“属性窗口”按钮 4、下列可

2、以打开立即窗口的操作是（ ）ACtrl+D BCtrl+E CCtrl+F DCtrl+G 5、Visual Basic的编程机制是（ ）A可视化 B面向对象 C面向图形 D事件驱动第二章 简单的VB程序设计一、填空题 1、设置是否可以用Tab键来选取命令按钮，应该用_属性。 2、一个控件在窗体的位置由_和_属性决定，其大小由_和_属性决定。 3、利用对象的属性setfocus可获得焦点，对于一个对象，只有其visible属性和_属性为true，才能接受焦点。 4、设置控件背景颜色的属性名称是_。 5、所有控件都具有的共同属性是_属性。 6、VB中的每个对象（控件）都有一组特征，这组特征称为_

3、，我们通过修改它可以控制对象的外观和操作。 7、通常情况下，VB中一个工程主要包括如下四个文件：窗体文件、工程文件、类模块文件和_文件，后者的扩展名为.Bas，通常由Basic语言编写，是一个可共用的子程序。 8、VB有三种工作模式，分别是设计（Design）模式、_和中断（Break）模式。二、选择题 1、以下能够触发文本框Change事件的操作是（ ）A文本框失去焦点 B文本框获得焦点C设置文本框的焦点 D改变文本框的内容 2、应用程序设计完成后，应将程序保存，保存的过程是（ ）A只保存窗体文件即可B只保存工程文件即可C先保存工程文件，之后保存窗体文件D先保存窗体文件（或标准模块文件），之

4、后还要保存工程文件 3、VB应用程序的运行模式是（ ）A解释运行模式 B编译运行模式 C两者都有 D汇编模式 4、任何控件都具有的属性是（ ）ATEXT BCAPTION CNAME DFORECOLOR 5、决定控件上文字的字体、字形、大小及效果的属性是（ ）ATEXT BCAPTION CNAME DFONT 6、在窗体上建立了多个控件，如TEXT、LABEL1、COMMAND1，若要使程序一运行焦点就定位在COMMAND1控件上，应将COMMAND1控件的（ ）设置为0AINDEX BTABINDEX CTABSTOP DENABLED 7、运行时，当用户向文本框输入新的内容，或在程序代

5、码中对文本框的TEXT属性进行赋值从而改变了文本框的TEXT属性值时，将触发文本框的（ ）事件ACLICK BDBLCLICK CGOTFOCUS DCHANGE 8、在运行时，按TAB键跳过了一个可以获得焦点的控件（如文本框），则可能是因为（ ）A该控件的TABSTOP属性值为TRUE B该控件的TABINDEX属性值为FALSEC该控件的ENABLED属性值为TRUE D该控件的ENABLED属性值为FALSE 9、为了防止用户随意将光标置于控件上，应（ ）A将控件的TABINDEX属性设置为0B将控件的TABSTOP属性设置为TRUEC将控件的TABSTOP属性设置为FALSED将控件的

6、ENABLED属性设置为FALSE 10、若要使标签控件显示时，不覆盖其背景内容，应设置标签控件的（ ）属性ABACKCOLOR BBORDERSTYLECFORECOLOR DBACKSTYLE 11、如果要在文本框中输入字符时，只显示某个字符，如星号（*），运行时，在文本框中输入的字符仍然显示出来，而不显示星号，原因可能是（ ）A文本框的MULTILINE属性值为TRUEB文本框的LOCKED属性值为TRUEC文本框的MULTILINE属性值为FALSED文本框的LOCKED属性为FALSE 12、在运行阶段，要在文本框TEXT1获得焦点时选中文本框中所有内容，对应的事件过程是（ ）APr

7、ivate Sub Text1_GotFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubBPrivate Sub Text1_LostFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubCPrivate Sub Text1_Change( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubDPrivate Sub Text1_SetFocus( )Text1.SelStart=0Text1.

8、Sellength=Len(Text1.Text)End Sub 13、Visual Basic继承了Basic语言简单易用的语法特点，同时支持面向对象的编程机制，其中构成其控件（对象）的三要素是（ ）A属性、事件、事件过程 B控件、窗体、事件C属性、过程、方法 D属性、事件、方法 14、决定标签（Label）显示的属性是（ ）AText BName CCaption DAlignment 15、命令按钮的标题文字由（ ）属性来设置。AText BCaption CName D(名称) 16、若要设置文本的显示颜色，则可用（ ）属性来实现。ABackColor BForecolor CFill

9、Color DBackstyle 17、在运行时，若要调用某命令钮的Click事件过程，则可设置该命令钮对象的（ ）属性为Ture来实现。AEnabled BValue CDefault DCancel 18、在运行时，若要获得用户在文本框中所选择的文本，可通过访问（ ）属性来实现。ASelStart BSelLenght CText DSelText第三章 VB基本语言一、填空题 1、一般可以使用_关键字声明常量。 2、_类型也称变体类型，是一种通用的、可变的数据类型，它可表示或存储任何一种数据类型。 3、变量的声明分为两种方法：_和_。 4、在VB中，用_语句设定数组的下界，用_和_语句分

10、别返回数组的上、下界。 5、在代码模块中加入Option Explicit的目的是_。 6、function aa (a1 as date,optional a2 as boolean) as single，写出optional命令的作用_。 7、在VB中，我们用一个简单的_语句就能实现退出程序。 8、生成消息框的命令是_，生成输入框的命令是_。 9、通用对话框（commondialog）属activex控件，它可以显示多个标准对话框，包括打开/另存为、字体、打印等对话框，若要显示所有文件，则应设置其属性filter=_，若要使它显示为打印对话框，则应使用什么方法_。 10、从字符串中任意位置

11、截取字符的函数是_。 11、语句For j = 3 To 20 Step 3 使循环体执行了_次。 12、对于正在使用的动态数组Arraya()，要增加一个单元，但不能破坏数组内的数据，则应使用语句_。 13、在Visual Basic中声明静态变量的关键字是_。 14、表达式10 Mod 6 4的值为_。 15、表达式chr(Asc(a) + 5)的值为_。 16、VB中使用注释有2种方法，即_和_。 17、VB中的数据以四种形式存储：常量、_、_和记录。 18、为了在VB中存储一个4行5列的二维矩阵，需要定义一个整型的数组，请把数组定义语句补充完整：Dim Juzhen(_ _) as I

12、nteger。 19、控件数组由一组相同类型的控件组成，这些控件共用一个相同的控件名，但是每个控件都有一个唯一的下标来区分，我们使用属性_ _来设置下标。 20、在过程调用中，实现调用过程的实参和被调用过程的形参之间的数据传递有两种方式：按值传递和_ _。 21、为了保证程序中必须对变量的强制性定义，需要在代码模块的声明部分加入_语句。 22、分析ForNext循环结构的实例：For i = 5 To 30 Step 2 中，循环体一共执行了_次。 23、表达式Mid(UniversityOfPetroleum, 8, 4) 的值为_。 24、常量分为普通常量和_常量。 25、要将大写字母转换

13、为小写字母，可使用_函数。 26、不管焦点在哪个控件上，按_键相当于按了取消按钮。 27、执行“工程”菜单下的_命令，可选择并添加ActiveX控件。 28、_是程序中VB停止执行的地方。 29、逻辑常量为True或_。 30、使用了_的声明后，当程序中使用未经声明的变量时，程序运行时会报错。 31、要将小写字母转换为大写字母，可使用_函数。 32、自字符串N1位开始向右取N2个字符，要使用_函数。 33、日期常量表示时，用符号_将日期型数据括起来。 34、局部变量只能在_中声明和使用。 35、模块级变量的声明关键字是Dim或_。 36、函数Abs(x)的功能是_。 37、表达式3/6*5的值

14、是_。二、选择题 1、以下哪个是合法的变量（ ）Aright Babc123 C123_abc Dab123c 2、下列说法错误的是（ ）A在同一模块不同过程中的变量可以同名B不同模块中定义的全局变量不可以同名C引用另一模块中的全局变量时，必须在变量名前加模块名D同一模块中不同级的变量可以同名 3、把MsgBox的返回值转换为数值应该使用的函数是（ ）ALog BStr CLen DVal 4、语句DIM AA(3,4,5)中定义的数组有（ ）个元素A12 B60 C120 D345 5、下面程序运行后输出的结果是（ ） A$=CHINA B$=STRING$(3,A$) PRINT B$ E

15、NDACHI BCCC CINA DAAA 6、以下语句的输出结果是（ ）Print Format$(32548.5, 000,000.00)A32548.5 B325,485.00 C032,548,50 D32,548,50 7、以下叙述中错误的是（ ）A如果过程被定义为Static类型，则该过程中的局部变量都是Static类型BSub过程中不能嵌套定义Sub过程CSub过程中可以嵌套调用Sub过程D事件过程可以像通用过程一样由用户定义过程名 8、Visual Basic提供的On Error Resume next错误陷阱语句表示（ ）A当发生错误时，使程序转跳到语句标号为0的程序块B当

16、发生错误时，不使用错误处理程序块C当发生错误时，忽略错误行，继续执行下一语句D当发生错误时，终止本过程执行，继续执行下一过程 9、在Visual Basic中，若要将控制权交给操作系统则通过（ ）的语句。AEnd BExit Do CExit Sub DDoEvents 10、在Visual Basic 中语句的续行号采用（ ）A空格与下划线 B下划线与空格 C空格与短线 D短线与空格 11、假定有以下程序段：For i=1 to 3 For j=5 to 1 Step 1 Print i*j Next j,i则语句Print i*j的执行次数是（ ）A15 B.16 C17 D18 12、从

17、键盘上输入两个字符串，分别保存在变量str1、str2中。确定第二个字符串在第一个字符串中起始位置的函数是（ ）ALeft BMid CString DInstr 13、如果将布尔常量值TRUE赋值给一个整型变量，则整型变量的值为（ ）A0 B-1 CTRUE DFALSE 14、下列叙述不正确的是（ ）A注释语句是非执行语句，仅对程序的内容起注释作用，它不被解释和编译B注释语句可以放在代码中的任何位置C注释语句不能放在续行符的后面D代码中加入注释语句的目的是提高程序的可读性 15、语句PRINT “INT(-13.2)”；INT(-13.2)的输出结果为（ ）AINT(-13.2)= -13

18、.2 BINT(-13.2)= 13.2CINT(-13.2)= -13 DINT(-13.2)= -14 16、如果TAB函数的参数小于1，则打印位置在第（ ）列A0 B1 C2 D3 17、变量未赋值时，数值型变量的值为（ ）A、0 B空 C1 D无任何值 18、下列语句中正确的是（ ）Atxt1.text+txt2.text=txt3.text Bcommand1.name=cmdokC12label.caption=1234 Da=inputbox(“hello”) 19、假设变量BOOLVAR是一个布尔型变量，则下面正确的赋值语句是（ ）ABOOLVAR=TRUE BBOOLVAR=

19、.TRUECBOOLVAR=#TRUE# DBOOLVAR=320判断循环结构的类型和循环体的执行次数，正确的选项是（ ）A当型循环，20次 B直到型循环，10次C当型循环，10次 D直到型循环，20次 26、在程序中，使用InputBox函数可以接受用户的输入，如果要把它的返回值转换为数值型的数据，应该使用的函数是（ ）AVal BLenCStr DLog 27、动态数组因为在程序运行前无法确定数组的大小，所以经常根据程序的运行情况，对数组进行重新定义，以下关于VB中动态数组的叙述中不正确的是（ ）A可以用ReDim语句重新定义动态数组，并且可以进行多次重定义B首次用Dim进行动态数组声明的

20、时候，必须指明它的类型和上下界CPreserve为ReDim语句的可选参数，用于保留动态数组原来的内容D当对动态数组使用Erase语句进行释放操作时，将释放其内存 28、VB中的控件也叫做部件或组件，主要包括三类，以下哪一项不属于VB控件的分类（ ）A控件 B可插入对象CADO控件 DActiveX控件 29、表达式4+5 6 * 7 / 8 Mod 9 的值是（ ）A4 B5 C6 D7 30、可以同时删除字符串前导和尾部空白的函数是（ ）ALtrim BRtrim CTrim DMid四、读程序题 1、分析以下程序，写出运行结果。 Private Sub Form_Click() scor

21、e = Int(Rnd * 10) + 80 Select Case score Case Is 60 A$ = F Case 60 To 69 A$ = D Case 70 To 79 A$ = C Case 80 To 89 A$ = B Case Else A$ = A End Select Print A$ End Sub 2、读下面的程序，分析其功能，写出运行结果。在窗体上有一个命令按钮，名称为Command1。然后编写如下程序：Private Sub Command1_Click()For I = 1 To 4For J = 0 To IPrint Chr$(65 + I);Nex

22、t JPrintNext IEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是什么？ 3、阅读下面的程序，分析并写出其功能。Sub insert(a() As Single,ByVal x As Single)Dim m as integer,n as integern=1Do While na(n) n=n+1LoopFor m=20-1 To n Step 1 a(m+1)=a(m)Next ma(n)=xEnd Sub 4、分析以下程序，写出运行结果。Sub subP(b() As Integer)For i =1 To 4b(i)=2*iNext iEnd SubPri

23、vate Sub Commandl_Click()Dim a(1 To 4)As Integera (1)=5a (2)=6a (3)=7a (4)=8subP a()For i =1 To 4Print a(i)Next iEnd Sub运行上面的程序，单击命令按钮，输出结果是什么？ 5、分析以下程序，写出运行结果。Sub sele() Dim n as Integer i=21:n=3 Do While in i=in Loop Print iEnd Sub 6、分析以下程序，写出运行结果。Sub selectPrint()Dim a as IntegerDim b as IntegerD

24、im c as Integera=2:b=5:c=2If(a=b)and(a=c) or (bc) Then Print aa=a+2ElsePrint bEndIfPrint a;b;cEnd Sub 7、分析以下程序，写出运行结果。Sub swap() Dim x as Integer Dim y as Integer Dim z as Integer x=1:y=2:z=0 Print x;y;z x=x+y x=x*z Print x,y,zEnd Sub 8、分析以下程序，写出运行结果。Sub selectPrint() Dim a as Integer Dim b as Integer Dim c as Integer a=3:b=3:c=2 If(a=b)and(ac)Then Print a Print