08级VB6[1]0题库.doc

08级VB6.0题库17一 选择题A 1下列选项中，_属于可视化的面向对象程序设计语言。 A) Visual Basic B) C C) FoxBase D) BasicD 2下列选项中，不属于Visual Basic特点的是 。 A) 可视化编程 B) 事件驱动的编程机制 C) 面向对象的程序设计D) 面向过程的程序设计B 3 Visual Basic 6.0的3个版本，其功能从弱到强的顺序是_。 A) 企业版、学习版、专业版 B) 学习版、专业版、企业版 C) 专业版、企业版、学习版 D) 学习版、企业版、专业版D 4 Visual Basic 6.0集成开发环境主窗口中不包括_。 A) 标题栏 B) 菜单栏 C) 工具栏 D) 状态栏C 5 以下不属于Visual Basic 6.0工作模式的是_。A) 设计模式 B) 运行模式 C) 编译模式 D) 中断模式CC 6系统启动后默认的工具箱中有_个标准控件对象。A) 10 B) 15 C) 20 D) 25B 7在Visual Basic中，不能隐藏的窗口是_。A) 属性窗口 B) 主窗口 C) 窗体窗口 D) 代码窗口D 8代码窗口中_。A) 既无对象列表框，也无过程列表框B) 有对象列表框，无过程列表框C) 无对象列表框，有过程列表框D) 既有对象列表框，又有过程列表框A 9对象的三要素包括_。A) 属性、方法和事件 B) 属性、函数和过程C) 特征、方法和过程 D) 变量、常量和表达式C 10类是同种_的集合与抽象。A) 变量 B) 常量 C) 对象 D) 函数A 11当在窗体上放置一个控件时，就_。A) 将类转换为对象 B) 将对象转换为类C) 将变量转换为对象 D) 将对象转化为变量A 12以下为合法的对象名的是_。A) 姓名 B) name C) 1button D) _nameD 13以下关于对象属性正确的说法是_。A) 在设计模式和运行模式下都不能设置对象的属性B) 对象的属性在设计模式是可以设置，在运行模式下不能设置C) 对象的属性在运行模式下可以设置，在设计模式下不能设置D) 对象的属性既可以在设计模式下设置，也可以在运行模式B 14对象事件过程名格式如下_。A) 事件名_对象名 B) 对象名_事件名C) 对象名_过程名 D) 事件名_过程名C 15在程序代码中设置属性的方法如下_。A) 属性=值 B) 对象属性=值C) 对象.属性=值 D) 属性.对象=值D 16决定一个控件在窗体上位置的属性是_。A) Width或Height B) Width和HeightC) Top或Left D) Top和LeftA 17以下不是窗体主要属性的是_。A) Open B) Name C) Caption D) Top C 18_属性可以设置窗体的标题文字。A) Title B) Name C) Caption D) FontB 19下列选项中，不属于同类的是_。A) Caption B) Click C) Name D) HeightD 20读写文本框控件中的文本应使用_属性。A) Caption B) Title C) Name D) TextC 21下面选项中哪个是算术运算符A) % B) & C) Mod D) AndD 22下面不合法的标识符是_A) Go_To B) Tab1 C) 名称 D) IntB 23 10 Mod 4的值为_A) 1 B) 2 C) 4 D) 10B 24 Len(“武汉大学”)的值是_A) 0 B) 4 C) 8 D) 不能确定D 25下列赋值语句中，正确的是_A) x!=”abc” B) a%=“10e” C) x+1=5 D) s$=100 D 26以下不正确的单行结构条件语句是_A) If xy Then Print(“xy”)B) If x Then t=t*xC) If x Mod 3=2 Then ? xD) If x1Sum=sum+ii=i-1WendPrint sumA) 无显示 B) 显示10 C) 显示54 D) 显示55B 28下面程序段中循环语句的循环次数是_For x=10 to 1 step -3Print xNext xA) 0 B) 4 C) 5 D) 10C 29执行语句 For i=1 to 3 : i=i+1 : Next I 后，变量i的值是_A) 3 B) 4 C) 5 D) 6B 30若在消息框MsgBox中显示“确定（Ok）”和“取消（Cancel）”两个按钮，则buttons参数的设置值是_A) 0 B) 1 C) 2 D) 3C 31双击窗体中的对象后，VB将显示的窗口是_A) 工具箱 B) 项目（工具）窗口 C) 代码窗口 D) 属性窗口B 32窗体标题栏的显示内容由窗体的哪个属性决定_A) Name B) Caption C) BackColoe D) EnabledA 33若使标签框根据所显示内容自动调整其大小，则可以通过设置哪个属性值为True来实现A) AutoSize B) Alignment C) Enabled D) VisibleD 34文本框没有哪个属性A) BackColor B) Enabled C) Visible D) CaptionD 35如果设置文本框最多可以接收的字符数，则可以使用哪个属性A) Length B) Multiline C) Max D) MaxlengthB 36在运行程序时，要使文本框获得焦点，则需使用哪个方法A) Change B) Setfocus C) Gotfocus D) MoveC 37若使命令按钮在屏幕不可见，则可以通过修改哪个属性实现A) Value B) Enabled C) Visible D) CancelD 38改变控件的Tab顺序可以修改哪个属性值A) Visible B) Enabled C) TabStop D) TabIndexC 39若要得到列表框中项目的数目，可以访问哪个属性A) List B) ListIndex C) ListCount D) TextD 40在组合框中选择某一项目内容， 可以通过哪个属性获得A) List B) ListIndex C) ListCount D) TextB 41循环语句用于控制循环体的A) 顺序执行 B) 重复执行 C) 选择执行 D) 不执行A 42For循环语句的循环控制变量用于A) 控制循环次数 B) 求和 C) 计算步长 D) 递增B 43如果在窗体上画一个命令按钮C1，然后，编写如下事件过程：Private Sub C1_Click()x=2For i=1 To 10 Step 2x=x+iNext iPrint xEnd Sub那末，程序运行后，单击命令按钮，其窗体上显示的结果是A) 26 B) 27 C) 38 D) 57C 44如果在窗体上画一个命令按钮C1，然后，编写如下事件过程：Private Sub C1_Click()For n=1 To 20If n Mod 30 Then m=m+n3Next nPrint nEnd Sub那末，程序运行后，单击命令按钮，其窗体上显示的结果是A) 15 B) 18 C) 21 D) 24C 45如果在窗体上画一个命令按钮C1，然后，编写如下事件过程：Private Sub C1_Click()Dim sum, x As Doublesum=0n=0For i=1 To 5x=n/in=n+1sum=sum+xNext i?sumEnd Sub那末，该程序通过For循环计算一个表达式的值，这个表达式是B 46如果在窗体上画一个命令按钮C1，然后，编写如下事件过程：Private Sub C1_Click()Dim num As Integernum=1Do Until num 6? num;num=num+2.4LoopEnd Sub那末，程序运行后，单击命令按钮，其窗体上显示的结果是A) 1 3.4 5.8 B) 1 3D 47如果在窗体上画一个命令按钮C1，然后，编写如下事件过程：Private Sub C1_Click()Dim a, s As Integera=8s=1Dos=s+aa=a-1Loop while a=0Print s;aEnd Sub那末，程序运行后，单击命令按钮，其窗体上显示的结果是A) 7 9 B) 3A 48设有以下循环结构：DoLoop while 则以下叙述错误的是A) 若“条件”是一个为0的常数,则一次也不执行循环体B) “条件”可以是关系表达式、逻辑表达式和常数C) 循环体中可以使用Exit Do语句D) 若“条件”总是为True，则死循环B 49如果在窗体上画一个命令按钮C1和一个标签L1，然后，编写如下事件过程：Private Sub C1_Click()c=0For i=1 To 4For j=6 To 1 Step -2c=c+1Next jNext iL1.Caption=Str(c)End Sub那末，程序运行后，单击命令按钮，标签中显示的结C 50如果在窗体上画一个命令按钮C1和一个文本框T1，然后，编写如下事件过程：Private Sub C1_Click()Dim i As IntegerFor i=0 To 50i=i+3n=n+1if i10 Then Exit ForNext iT1.Text=nEnd Sub那末，程序运行后，单击命令按钮，文本框中显D 51如果在窗体上画一个命令按钮C1，然后，编写如下事件过程：Private Sub C1_Click()a=0For i=1 To 2For j=1 To 4If j Mod 20 Thena=a-1End Ifa=a+1Next jNext i?aEnd Sub那末，程序运行后，单击命令按D 52如果在窗体上画一个命令按钮C1和两个标签L1和L2，然后，编写如下事件过程：Private Sub C1_Click()a=0For i=1 To 10a=a+1b=0For j=1 To 10a=a+1b=b+2Next jNext iL1.Caption=Str(a)L2.Caption=Str(b)End SuA 53窗体的单击事件过程如下：Private Sub Form_Click()Dim x, n As Integerx=1n=0Do While x28x=x*3n=n+1LoopPrint x,nEnd Sub程序运行后，单击窗体，窗体上显示的结果是A) 81 4 B) 56 3 C) 28 1 D) 243 5D 54窗体的单击事件过程如下：Private Sub Form_Click()Dim check,countercheck=truecounter=0DoDo While counter Sqr(i) Then Print iNextB 56如果在窗体上画一个命令按钮Command1，然后，编+xx=x+2Next i?x,yEnd Sub那末，程序运行后，单击命令按钮，窗体上显示的结果是A) 4 2 B) 12写如下事件过程：Private Sub Command1_Click()Static x As IntegerClsFor i=1 To 2y=yA 57如果在窗体上画一个命令按钮Command1，然后，编写如下事件过程：Private Sub Command1_Click()Dim i, x As IntegerFor i=1 To 6If i=1 Then x=iIf i0If dc Thenc=c+1End Ifd=InputBox(请输入一个整数)LoopD 60如果在窗体上画一个命令按钮Command1，然后，编写如下事件过程：Private Sub Command1_Click()Dim i, NumRandomizeDoFor i=1 To 1000Num = Int(Rnd*100)Print Num;Select Case NumCase 12Exit ForCase 58A 61一个工程必须包含的文件的类型是A) *.vbp *.frm *.frx B) *.vbp *.cls *.basC) *.bas *.ocx *.res D) *.frm *.cls *.basD 62下列各选项说法错误的一项是A) 文件对话框可分为两种，即打开(Open) 文件对话框和保存(Save As) 文件对话框B) 通用对话框的Name属性的默认值为CommonDialogX，此外，每种对话框都有自己的默认标题C) 打开文件对话框可以让用户指定一个文件，由程序使用；而用保存文件对D 63资源文件的扩展名是A) .bas B) .cls C) .frm D) .resD 64在Visual Basic中按文件的访问方式不同，可将文件分为A) ASCII文件和二进制文件 B) 文本文件和数据文件C) 数据文件和可执行文件 D) 顺序文件和随机文件D 65假定在窗体(名称为Form1) 的代码窗口中定义如下记录类型：Private Type animalanimalName As String *20aColor As String *10End Type在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim rec As animalC 66以下各项中，Visual Basic不能接收的图形文件是A) .ico文件 B) .jpg文件 C) .psd文件 D) .bmp文件B 67要使文件列表框中的文件随目录列表框中所选择的当前目录的不同而发生变化，应该A) 在File1中的Change事件中，输入File1.PathDir1.PathB) 在Dir1中的Change事件中，输入File1.PathDir1.PathC) 在File1中的Change事件中，输入Dir1.PathFile1.PathD) 在Dir1中的ChA 68在窗体上画一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮，要求单击命令按钮时，打开一个保存文件的对话框，该窗口的标题为Save，缺省文件名称为SaveFile，在文件类型栏中显示*txt，则能够满足上述要求的程序是 A) Private Sub Command1_Click(C 69如果在窗体上添加一个通用对话框控件DBT，那么语句DBT.Action=4的作用是A) 显示打开文件 对话框 B) 显示保存文件对话框C) 显示字体对话框 D) 显示打印对话框D 70下列说明中，不属于随机文件特点的是A) 可以随意读取随机文件中任一记录的数据B) 随机文件没有只读或只写的操作方式，随机文件只要一打开，就既可读又可写C) 随机文件的操作是以记录为单位进行的D) 随机文件的读、写操作语句与顺序文件的读写操作语句一样C 71对话框在关闭之前，不能继续执行其他操作，这种对话框属于A) 输入对话框 B) 输出对话框C) 模式(模态) 对话框 D) 无模式对话框D 72下面叙述不正确的是A) 对顺序文件中的数据操作只能按一定的顺序操作B) 顺序文件结构简单C) 顺序文件的数据以字符(ASCII码) 形式存储D) 能同时对顺序文件进行读写操作A 73在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程：Private Sub Command1_Click()CommonDialog1.Flags=vbOFNHideReadOnlyCommonDialog1.Filter= All Files(*.*) |*.*|Text Files(*.*) |*.txt| _C 74在Visual Basic中按文件的编码方式不同，可将文件分为A) 顺序文件和随机文件 B) 文本文件和数据文件C) ASCII文件和二进制文件 D) 数据文件和可执行文件B 75下列各选项说法错误的一项是A) 文件对话框可分为两种即打开(Open) 文件对话框和保存(Save As) 文件对话框B) DefaultEXT属性和DialogTitle属性都是打开对话框的属性，但非保存对话框的属性C) 打开文件对话框可以让用户指定一个文件，由程序使用；而用保存文件对话框可以A 76在Visual Basic中按文件的数据性质不同，可将文件分为A) 数据文件和程序文件 B) 文本文件和数据文件C) 顺序文件和随机文件 D) ASCII文件和二进制文件C 77在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框，一个名称为File1的文件列表框，两个名称分虽为Label1、Label2，标题分别为空白和共有文件的标签。编写程序，使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化，并且在标签Label1中显C 78在窗体上画一个通用对话框，其Name属性为Cont，再画一个命令按钮，Name属性为Command1，然后编写如下事件过程：Private Sub Command1_Click()Cont.FileName=Cont.Flags=vbOFNFileMustExistCont.Filter=All Files|*.*Cont.FilterIndex=3Cont.DC 79下面叙述不正确的是A) 对顺序文件中的数据操作只能按一定的顺序操作B) 顺序文件结构简单C) 能同时对顺序文件进行读写操作D) 顺序文件中只能知道第一个记录的位置B 80假定一个Visual Basic应用程序由一个窗体模块和一个标准模块构成。为了保存该应用程序，以下正确的操作是A) 只保存窗体模块文件B) 分别保存窗体模块、标准模块和工程文件C) 只保存窗体模块和标准模块文件D) 只保存工程文件正确答案:C 81以下叙述中错误的是A) 打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件B) 当程序运行时，双击一个窗体，则触发该窗体的DblClick事件C) Visual Basic应用程序只能以解释方式执行D) 事件可以由用户引发，也可以由系统引发C 82假定通用对话框的名称为CommonDialog1，命令按钮的名称为Command1，则单击命令按钮后，能使打开的对话框的标题为“New Title”的事件过程是A) Private Sub Command1_Click() CommonDialog1.DialogTitle = New Title CommonDialog1.ShowPrinterEnd SubA 83假定在工程文件中有一个标准模块，其中定义了如下记录类型 Type Books Name As String * 10 TelNum As String * 20 End Type 要求当执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是A) PB 84目录列表框的Path属性的作用是A) 显示当前驱动器或指定驱动器上的某目录下的文件名B) 显示当前驱动器或指定驱动器上的目录结构C) 显示根目录下的文件名D) 显示指定路径下的文件A 85下列对象能作为容器使用的对象是_。A) 图片框 B) 图像框 C) 标签 D) 文本框B 86使控件能自动按图形大小而改变的控件大小的是_。A) 图像框 B) 图片框 C) 文本框 D) 框架D 87以下属性和方法中，_可以重新定义坐标系统。A) drawstyle B) drawwidth C) scalemode D) scaleD 88设CurrentX=200,CurrentY=400,执行指令“Line(100,250)-(350,500),B”后，CurrentX=_A) 200 B) 100 C) 550 D) 350A 89若图片框（PictureBox）的大小能随图像的大小而变化，要定义图片框的_属性为True。A) autosize B) visible C) stretch D) pictureB 90要使图像框可以自动调整图形的大小，则需设置_属性。A) autosize B) stretch C) autoredraw D) appearanceC 91在visual basic中坐标轴的默认刻度单位是_。A) 像素 B) 字符 C) 缇 D) 磅A 92在visual basic中坐标轴的默认的原点在窗口的_。A) 左上角 B) 左下角 C) 中心 D) 底部中点D 93通过设置形状控件的_属性可以画出圆、椭圆和矩形等形状。A) height B) index C) visible D) shapeD 94下列放置在窗体上的_控件对象不能用move方法移动。A) 命令按钮(command button) B) 图片框(image)C) 框架(frame) D) 直线(line)A 95语句“line(100,100)-(500,500),BF”的功能是_。A) 使用窗体的前景色绘制一个矩形B) 使用窗体的前景色绘制一条直线C) 使用窗体的背景色绘制一个矩形D) 使用窗体的背景色绘制一条直线C 96命令“circle(4,1.5),1,-0.5,-2.1”将绘制一个_。A) 圆 B) 椭圆 C) 扇形 D) 圆弧C 97对象的边框类型由_属性设置。A) drawwidth B) drawstyle C) borderstyle D) scalemodeB 98设currentX=400,currentY=200,执行指令“line-(300,500),BF”后，currentY=_。A) 400 B) 500 C) 300 D) 700A 99下面选项中，不能将图像载入图片框和图像框的方法是_。A) 在界面设计时，手工在图片框和图像框中绘制图像B) 在界面设计时，利用剪贴板把图像粘贴上C) 在界面设计时，通过picture属性载入D) 在程序运行时，用loadpicture函数把图形文件装入C 100cls可以清除窗体或图片框中的_内容。A) picture属性设置的背景图案 B) 在界面设计时放置的控件C) 程序运行时产生的图案和文字 D) 以上都是C 101设currentX=200,currentY=350,执行指令“line -step(300,600),B”后，currentX=_。A) 200 B) 600 C) 500 D) 300C 102用于在窗体、图片框或打印机的指定位置上绘制点的绘图方法是_。A) line B) circle C) pset D) pointD 103用于设置形状控件边框颜色的属性是_。A) fillcolor B) backcolor C) forecolor D) bordercolorB 104使用以下属性或方法的_不能改变窗体光标的水平位置。A) currentX属性 B) currentY属性C) print方法 D) cls方法D 105circle方法所画边框线的粗细由_属性设置。A) borderwidth B) borderstyleC) drawstyle D) drawwidthC 106RGB(red,green,blue)函数设置颜色，其中自变量的取值范围是_。A) 08 B) 015 C) 0255 D) 都不对B 107程序运行时，在image控件内装入图片的函数是_。A) picture B) loadpicture C) image D) loadimageB 108当使用line方法时，参数B与F可组合使用，下列组合中错误的是_。A) BF B) F C) B D) 不使用B与FA 109在visual basic提供的绘图方法中，_可以返回指定点的颜色值。A) point B) pset C) line D) circleD 110如果在窗体上画一个命令按钮Command1，然后，编写如下事件过程：Private Sub Command1_Click() Dim i, Num Randomize 语句Randomize：初始化随机数产生器 Do For i=1 To 1000 Num = Int(Rnd*100) 内部函数Rnd：产生一个大于0且小于1的随机数 Print Num; Select Case Num Case 12 Exit For Case 58 Exit Do Case 65,68,92 End End Select Next i LoopEnd Sub那末，上列事件过程执行后，下列描述中正确的是 A)Do循环执行的次数为1000次. B)在For循环中产生的随机数小于或等于100。C)当所产生的随机数为12时结束所有循环。D)当所产生的随机数为65、68或92时窗体关闭，程序结束。B 111 如果在窗体上画一个命令按钮C1，然后，编写如下事件过程：Private Sub C1_Click() x=2 For i=1 To 10 Step 2 x=x+i Next i Print xEnd Sub那末，程序运行后，单击命令按钮，其窗体上显示的结果是 A)26 B)27 C)38 D)57 C 112如果在窗体上画一个命令按钮C1，然后，编写如下事件过程：Private Sub C1_Click() For n=1 To 20 If n Mod 30 Then m=m+n3 Next n Print nEnd Sub那末，程序运行后，单击命令按钮，其窗体上显示的结果是 A)15 B)18 C)21 D)24 B 113如果在窗体上画一个命令按钮C1，然后，编写如下事件过程：Private Sub C1_Click() Dim num As Integer num=1 Do Until num 6 ? num; num=num+2.4 LoopEnd Sub那末，程序运行后，单击命令按钮，其窗体上显示的结果是A)1 3.4 5.8 B)1 3 5 C)1 4 7 D)无数据输出D 114如果在窗体上画一个命令按钮C1，然后，编写如下事件过程：Private Sub C1_Click() Dim a, s As Integer a=8 s=1 Do s=s+a a=a-1 Loop while a10 Then Exit For Next i T1.Text=nEnd Sub那末，程序运行后，单击命令按钮，文本框中显示的结果是 A)5 B)4 C)3 D)2 D 117如果在窗体上画一个命令按钮C1，然后，编写如下事件过程：Private Sub C1_Click() a=0 For i=1 To 2 For j=1 To 4 If j Mod 20 Then a=a-1 End If a=a+1 Next j Next i ?aEnd Sub那末，程序运行后，单击命令按钮，窗体上显示的结果是 A)0 B)2 C)3 D)4 D 118如果在窗体上画一个命令按钮C1和两个标签L1和L2，然后，编写如下事件过程：Private Sub C1_Click() a=0 For i=1 To 10 a=a+1 (1) b=0 For j=1 To 10 a=a+1 (2) b=b+2 Next j Next i L1.Caption=Str(a) L2.Caption=Str(b)End Sub那末，程序运行后，单击命令按钮，标签L1和L2显示的结果分别是 A)10 和 20 B)20 和 110 C)200 和 110 D)110 和 20 A 119 窗体的单击事件过程如下：Private Sub Form_Click() Dim x, n As Integer x=1 n=0 Do While xx Then Print a(i); Next iEnd Sub程序运行后，单击命令按钮，在窗体上显示的内容是A）1 2 B） 1 2 3 C) 3 4 5 D） 4 5B 123在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程：Private Sub Form_Load() List1.AddItem Item 1 List1.AddItem Item 2 List1.AddItem Item 3End SubPrivate Sub Command1_Click() List1.List(List1.ListCount) = AAAAEnd Sub程序运行后，单击命令按钮，其结果为A）把字符串“AAAA”添加到列表框中，但位置不能确定B）把字符串“AAAA”添加到列表框的最后（即“Item 3”的后面）C）把列表框中原有的最后一项改为“AAAA”D）把字符串“AAAA”插入到列表框的最前面（即“Item 1”的前面）A 124在窗体上画一个命令按钮，然后编写如下事件过程：Option Base 1Private Sub Command1_Click() Dim a(5) As String For i = 1 To 5 a(i) = Chr(Asc(A) + (i - 1) Next i For Each b In a Print b; NextEnd Sub程序运行后，单击命令按钮，输出结果是A）ABCDE B）1 2 3 4 5 C）a