vb试题1.docx

1、vb试题1下列关于 VB 编程的说法中，不正确的是_D_。A.事件是能被对象识别的动作B.方法指示对象的行为C.属性是描述对象特征的数据D.VB程序采用的运行机制是面向对象在 Visual Basic 中最基本的对象是_B_，它是应用程序的基石，是其他控件的容器。A.文本框B.窗体C.标签D.命令按钮VB6.0 的_A_版本，可供专业编程人员开发功能强大的组内分布式应用程序。A.企业版B.学习版 C.专业版D.初级版有说明语句： Dim x! ，则 x 是_B_类型的变量。A.整型B.单精度浮点型C.长整型D.双精度浮点型下面所列符号中，_C_不是数据类型说明符。A. !B. %C. ?D.

2、#为了给 x,y,z 三个变量赋初值 1，下面的赋值语句正确的是_C_。A.x=y=z=1B.xyz=1C.x=1：y=1：z=1D.x=1，y=1，z=1判断整型变量 x 是奇数的表达式是_D_。A.x Mod 2 !=0B.x Mod 2 =0C.x Mod 3=0D.x Mod 20用来确定一个控件在窗体上位置的属性是_D_。A.Width和 HeightB.Width或HeightC.Top或LeftD.Top和Left 在默认情况下，InputBox() 函数返回值的类型为_D_。A.逻辑类型B.变体类型C.数值型D.字符串型在使用 InputBox 时，必须设置的参数是_B_。A.

3、无B.提示C.标题D.缺省以下 Case 语句中错误的是_A_。A.Case Is10 And Is10C.Case Is10D.Case 0 to 10当字符型变量中第三个字符是 C 时，利用 MsgBox 过程显示 Yes，否则显示 No，正确的条件语句是_A_。A.If Mid（c,3,1）=C Then MsgBox Yes Else MsgBox NoB.If Left（c,3,1）=C Then MsgBoxYes Else MsgBox NoC.If Right（c,3,1）=C Then MsgBox Yes Else MsgBox NoD.If string（c,3,1）=C

4、 Then MsgBox Yes Else MsgBox No执行下列程序段输出的结果是_A_。 X%=2 Do While x8 Print *; X=x+2 LoopA.*B.*C.*D.*要使For语句for k=_ To -5 Step -2循环执行20次，循环变量的初值应是_B_。A.35B.33C.32D.31声明一个长度为10个字节的字符串变量 mstr ，应使用_D_。A.Dim mstr As String(10)B.Dim mstr(10) As StringC.Dim mstr As 10D.Dim mstr As String * 10语句 Dim Abc(5) 所定义

5、的数组元素个数是_A_。A.6B.5C.4D.10下面叙述中，错误的是_A_。A.自定义类型只能在窗体模块的通用声明段进行声明B.在窗体模块中定义自定义类型时必须使用Private关键字C.自定义类型中的元素类型可以是系统提供的基本数据类型或已声明的自定义类型D.自定义类型必须在窗体模块或标准模块的通用声明段进行声明由 Array 函数建立的数组，其变量必须是_C_类型。A.字符型B.整型C.变体型D.字符串类型子过程 Sub .End Sub 的形式参数可以是_D_。A.常数、简单变量、数组变量B.常数、简单变量、数组变量和运算式C.简单变量、数组变量和运算式D.简单变量、数组变量编写如下事

6、件过程：Private Sub Form_Click() Dim x$,y$,Z$,i% x=祝你成功 y=1234 For i=1 To 4 Z=Z+Mid(x,i,1)+Right(y,1) Next i Print Z End Sub 程序运行后，单击窗体，则窗体上显示的内容是_B_。A.祝你成功1234B.祝4你4成4功4C.祝1你1成1功1D.1234祝你成功设已定义函数过程 f，它有三个整型数值参数，再设 a, b 和 c 为实型变量，则调用该函数过程使用的语句为_D_。A.f a+b, b+c, c+aB.fC.f(a+b, b+c)D.f(a+b, b+c ,c+a)有如下程序

7、： Private Sub Form_Click（） a=1:b=2:c=3 Call ss(a,b,c) Print a; b; c End Sub Private Sub ss( ByVal x , ByRef y , z ) x=x+1: y=y+1: z=z+1 End Sub程序运行后，单击窗体，则输出的结果是_D_。A.2 2 4B.1 2 3C.1 3 3D.1 3 4在过程的定义中，使用关键字_A_来修饰形式参数，可以使之按地址传递。A.ByRefB.ByValC.ReferenceD.Value以下描述中，正确的是_D_。A.过程的定义和过程的调用均可以嵌套B.过程的定义可以

8、嵌套，但过程的调用不能嵌套C.过程的定义和过程的调用均不能嵌套D.过程的定义不可以嵌套，但过程的调用可以嵌套在 Visual Basic 中，要使一个窗体不可见，但不从内存中释放，应使用的语句是_D_。A.UnLoandB.Show C.Load D.Hide Visual Basic 控件分为3类，它们分别是标准控件、ActiveX 控件和可插入对象 。其中只有_D_是由系统提供的。A.ActiveX控件B.可插入对象C.以上都可以D.标准控件为了装入一个 Visual Basic 应用程序，下列说法中，正确的是_C_。A.分别装入工程文件和标准模块文件(.bas)B.只装入窗体文件(.fr

9、m)C.只装入工程文件(.vbp)D.分别装入工程文件、窗体文件和标准模块文件当组合框的_C_属性值为2时，不允许用户在组合框中输入任何文本。A.TextB.ListC.StyleD.ListCount滚动条的默认属性是_C_。A.NameB.MinC.ValueD.Max在使用多组 Option 控件时，可以选用_C_控件，对这些 Option 控件分组。A.CheckB.LineC.FrameD.Shape下列_D_事件是菜单项可以触发的事件。A.MouseUpB.MouseDownC.KeyPressD.Click用户按下并且释放一个会产生 ASCII 码的键时，被触发的事件是_C_。A

10、.KeyB.KeyUpC.KeyPressD.KeyDown下面所列中，鼠标单击事件名为_D_。A.DblClick B.MouseUpC.MouseDownD.Click程序题（12）Private Sub form_click() s = 0 i = 1 Do While i = 100 If i Mod 10 0 Then s = s + i i = i + 1 Else i = i + 1 End If Loop Print sEnd Sub运行后，输出的结果是_C_A.4000B.4050C.4500D.5050程序题（14）建立并输出10*10的方阵，其中每个数都是随机数且范围是1

11、，9，把下面程序补充完整Private Sub Form_click() Dim a%(1 to 10,1 to 10), i%, j% Randomize For i = 1 To 10 For j = 1 To 10 a(i,j) = _A_ Print Tab(j * 5); a(i, j); Next j Print Next iEnd SubA.Int(Rnd*9)+1B.Int(Rnd*9)C.Int(Rnd)D.Rnd*9程序题（11）Private Sub Form_click() Dim s%, i% s = 0 i = 100 Do While i 0 Then y=7x-

12、1是正确的。F判断题：若要清除列表框的所有项目内容，可以使用Clear方法。T判断题：若有数组说明语句：Dim a()则a被定义为变体型数组。 T判断题：VB中的数组声明时可根据需要声明为定长数组和动态数组。T判断题：不能用于列表框控件的方法是AddItem F判断题：VB中可以同时删除字符串前导和尾部空白的函数是trim()。T判断题：语句Dim B(-1 To 5, 4) As Interger 所定义的数组B的元素个数是25个。F判断题：若使命令按钮Command1重新生效，则使用的赋值语句为Command1.Enabled=false F判断题：日期/时间型常量应使用井号（#）将其括起

13、来。 T一个名为pic2.gif的图形文件，要在运行期间把该文件装入一个图片框（Picturel），应执行的语句是_Picture1.Picture=LoadPicture(pic2.gif)picture1.picture=loadpicture(pic2.gif)_。VB6.0识别对象靠的是对象的_NAME Name name_属性。 组合框有3种不同的类型，这3种类型是下拉式列表框、简单组合框和_下拉式组合框_。如果菜单标题的某个字母前输入一个_&_符号，那么该字母就成了热键字母。如果建立菜单时在标题文本框中输入一个_-_，那么显示时将形成一行分隔符。在窗体上有一个命令按钮，其名称为Co

14、mmand1，然后编写如下程序：Function M(x As Integer, y As Integer) As Integer M = IIf(x y, x, y)End FunctionPrivate Sub command1_Click() Dim a As Integer, b As Integer a = 100 b = 200 Print M(a, b)End Sub结果为：200_。当用_APPENDappendAppend_方式打开文件时，如果对文件进行写操作，则写入的数据附加到原来文件的后面。在程序运行中，要想使用按钮变成看得见但不可操作，则应设置_ENABLEDEnabl

15、edenabled_的属性是False。MsgBox函数的返回值的类型为_数值型_。文本框的默认属性是_TexttextTEXT_。-【程序设计】-题目：(事件)双击窗体。 (响应)求s=1+12+123+12310， 并将结果存到变量S中-Private Sub Form_dblClick()Dim s As Long* Begin *Dim i, j As IntegerDim k As Longk = 1s = 0For i = 1 To 10 For j = 1 To i k = k * j Next s = s + k k = 1NextPrint (CStr(s)* End *Te

16、stFunc (s)End SubPrivate Sub TestFunc(i As Long) Dim OUT As Integer OUT = FreeFile Open App.Path & 7.out For Output As #OUT Print #OUT, i Close #OUTEnd Sub【窗体设计】-题目：请按照题目要求设计指定的窗体。 建立如(图1)所示界面：请按所给窗体的样子设计 窗体，不要求控件的尺寸一样，运行时得到所给 窗体即可。 -【控件】VB.TextBox_Text1标准答案：Name=Text1【控件】VB.TextBox_Text1 标准答案：Text=

17、字体和字形练习【控件】VB.CheckBox_Check4 标准答案：Name=Check4【控件】VB.CheckBox_Check4 标准答案：Caption=下划线【控件】VB.CheckBox_Check3 标准答案：Name=Check3【控件】VB.CheckBox_Check3 标准答案：Caption=删除线【控件】VB.CheckBox_Check2 标准答案：Name=Check2【控件】VB.CheckBox_Check2 标准答案：Caption=倾斜【控件】VB.CheckBox_Check1 标准答案：Name=Check1【控件】VB.CheckBox_Check

18、1 标准答案：Caption=加粗【控件】VB.OptionButton_Option2 标准答案：Name=Option2【控件】VB.OptionButton_Option2 标准答案：Caption=黑体【控件】VB.OptionButton_Option1 标准答案：Name=Option1【控件】VB.OptionButton_Option1 标准答案：Caption=宋体下属选项中，属于 VB 的程序设计方法是_C_。A.面向过程，事件驱动 B.面向对象、顺序驱动 C.面向对象，事件驱动D.面向过程，顺序驱动以下叙述错误的是_A_。A.打开一个窗体文件时，系统自动装入与该窗体有关的

19、工程文件B.事件可以由用户激发，也可由系统激发C.打开一个工程文件时，系统自动装入与该工程有关的窗体等文件D.保存VB应用程序时，应分别保存窗体文件和工程文件表达式 10 8 Mod 9 的值是_B_。A.2B.1C.9D.0要在窗体 Form1 内显示字符串 MyForm，可以使用的语句是_B_。A.Form1. Caption=MyFormB.Form1.Print MyFormC.Form.Caption=MyFormD.Form.Print MyForm下面程序段的功能是求两个数中的大数，其中_B_是不正确的。A.Max = IIf(x y， x， y)B.If y = x Then

20、Max = y: Max = xC.If x y Then Max = x Else Max = yD.Max = x : If y = x Then Max = y执行语句For i=1 to 3:i=i+1:Next i后变量i的值是C_。A.6B.4C.5D.3关于Do.Loop Until循环正确的描述是_C_。A.如果条件表达式的值为真，则一次循环也不执行B.如果条件表达式的值为真，则要继续执行循环体C.不论条件表达式是否为真，至少要执行一次循环体D.如果条件表达式的值为假，则一次循环也不执行语句 Dim Abc(5) 所定义的数组元素个数是_A_。A.6B.5C.4D.10在使用动

21、态数组前，需要对动态数组进行重新定义，使用_B_语句。A.UnloadB.RedimC.LoadD.Dim下列叙述中,错误的说法是_D_。A.使用Redim语句可以改变数组每维数的大小B.使用Redim语句可以对数组的元素初始化C.使用Redim语句可以改变数组的维数D.使用Redim语句可以改变数组的类型在代码中，定义了一个子过程：Sub P(a,b) End Sub下面调用该过程的格式正确的_D_。A.P( )B.P 10,20,30C.P 10D.P 10,20Private Sub Command1_Click() Dim x As String * 1， y As String， i

22、% x = a For i = Asc(x) To Asc(x) + 4 y = y & Chr(i) Next i Print y End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是_D_。A.aB.aaaaC.32D.abcde通用过程可以通过执行工具菜单中的_B_命令来建立。A.通用过程B.添加过程C.添加窗体D.添加模块设有如下两个过程: Private Sub Form1_Click() Dim x$,y% x = 18: y = 10 Call PPP(x), y) Print x,y End Sub Private Sub PPP(a As Single, b As

23、Single) a = a + b Print a,b b = a + b Print a,b End Sub运行程序后, 则输出结果是_A_。A.28 10 28 38 18 38B.28 10 28 38 18 10C.28 10 28 38 28 38D.28 10 28 38 28 10在过程的定义中，使用关键字_A_来修饰形式参数，可以使之按值传递。A.ByValB.ByRefC.ReferenceD.Value下列叙述中，正确的是_C_。A.在调用过程时，所有局部变量被系统初始化为0或空字符串B.在窗体的Form_Load事件过程中定义的变量是全局变量C.在某个Sub过程中定义的局部变量可以与其他事件过程中定义的局部变量同名，但其作用域只限于该过程D.局部变量的作用域可以超出所定义的过程要使窗体在运行时不可改变窗体的大小和没有最