VB程序设计综合复习资料一、填空题1. 在VB中工程文件的扩展名是_，窗体文件的扩展名是_，标准模块文件的扩展名是_。2. 一个控件在窗体的位置由_和_属性决定，其大小由_和_属性决定。3. 变量的声明分为两种方法：_和_。4. 使用_方法可在窗体中进行文本的输出，用_方法可画圆，用_方法可画直线。5. 类是具有相同性质的对象的_。6. 利用对象的属性setfocus可获得焦点，对于一个对象，只有其visible属性和_属性为true，才能接受焦点。7. 文件按存取方式及其组成结构可分为_文件、_文件和_文件。8. 在VB中，用_语句设定数组的下界，用_和_语句分别返回数组的上、下界。9. 在窗体上画一个名称为“Command1”、标题为“计算”的命令按钮，再画7个标签，其中5个标签组成名称为Label1的控件数组；名称为Label2的标签用于显示计算结果，其Caption属性的初始值为空；标签Label3的标题为“计算结果”。运行程序时会自动生成5个随机数，分别显示在标签控件数组的各个标签中。单击“计算”按钮，则将标签数组各元素的值累加，然后计算结果显示在Label2中。请填空。Private Sub Command1_Click()Sum = 0 For i=0 To 4 Sum=Sum+_ Next i_=Sum End Sub 10. 在窗体上画两个名称分别为Command1和Command2、标题分别为“初始化”和“求和”的命令按钮。程序运行后，如果单击“初始化”命令按钮，则对数组a的各元素赋值；如果单击“求和”命令按钮，则求出数组a的各元素之和，并在文本框中显示出来。请填空。Option Base 1 Dim a(3,2) As Integer Private Sub Command1_Click() “初始化”命令按钮For i=1 To 3 For j=1 To 2 _=i+j Next j Next iEnd Sub Private Sub Command2_Click() “求和”命令按钮For j=1 To 3 For i=1 To 2 s=s+_ Next i Next j Text1.Text= _ End Sub 11. 语句For j = 3 To 20 Step 3 使循环体执行了_次。12. 若要将窗体Form1隐藏起来，则可通过执行代码_来实现。13. 要将焦点定位到命令按钮Command1上，需要使用代码_。14. 为了使一个Picture控件能自动根据装入的图片调整大小，应设置该控件的_属性为True。15. 要使装入到列表框中的数据项能自动按字母顺序排序，应设置该控件的_属性为_。16. 在Visual Basic中声明静态变量的关键字是_。17. 表达式10 Mod 6 4的值为_。18. 窗体上放置了若干个文本框和命令按钮，当窗体装入后，要将焦点自动定位到文本框Text1上，则在设计时需要将_控件的_属性设置为_。19. 要使一个Picture控件不能自动根据装入的图片调整大小，应设置该控件的AutoSize属性为_。20. 对于正在使用的动态数组Arraya()，要增加一个单元，但不能破坏数组内的数据，则必须在语句ReDim中包括_。21. 函数Abs(x)的功能是_。22. 表达式3/6*5的值是_。23. 表达式chr(Asc(a) + 5)的值为_。24. VB中使用注释有2种方法，即_和_。25. VB中的数据以四种形式存储：常量、_、_和记录。26. 在标签控件中通过编程使文字换行用的代码是_。27. 要使鼠标停留在按钮上显示特殊的鼠标形状，应设置的属性值是_。28. 设某列表框共有10项，按题目要求补齐程序，完成相应的功能。（1）按下命令按钮Command1时将列表框第8项的内容显示在窗体上：Private Sub Command1_Click( )List._(7)=TruePrint List1._End Sub（2）单击列表框某一项时立即将该项打印在窗体上：Private Sub List1_Click( )Print_End Sub（3）按下命令按钮Command1时在窗体上删除第1、3、5、7、9项：Private Sub Command1_Click( )For I=1 To 5List1._Next IEnd Sub（4）在列表框的每一项之后插入一个新的项：Private Sub Command1_Click( )For I=1 to 10X=InputBox(“请输入插入的第” & I & “项内容”)List1.AddItem_Next IEnd Sub29. 设在界面上放置了一个滚动条Hscroll1和一个标签控件Label1，要使每次单击滚动条两端箭头时，或单击滚动条滑块与两端箭头之间的空白区域时，标签内容能够反映滚动条的值，补齐以下代码。Private Sub Hscroll1._( )Label1.Caption = Hscroll1._End Sub要使拖动滚动条滑块时标签内容能够反映滚动条的值，补齐以下代码。Private Sub Hscroll1._( )Label1.Caption = Hscroll1._End Sub30. 生成消息框的命令是_，生成输入框的命令是_。二、选择题1以下叙述中错误的是（ ）A事件过程是响应特定事件的一段程序 B不同的对象可以具有相同名称的方法 C对象的方法是执行指定操作的过程 D对象事件的名称可以由编程者指定 2以下合法的Visual Basic标识符是（ ）AForLoop BConst C9abc Da#x 3当一个复选框被选中时，它的Value属性的值是（ ）A3 B2 C1 D0 4表达式 5 Mod 3+35*2的值是（ ）A0 B2 C4 D6 5设x=4,y=8,z=7，表达式xz) Or zx的值是（ ）A1B-1 CTrue DFalse 6假定有以下程序段： For i=1 to 3For j=5 to 1 Step 1Print i*jNext j,i则语句Print i*j的执行次数是（ ）A15 B16 C17 D187以下叙述中错误的是（ ）A如果过程被定义为Static类型，则该过程中的局部变量都是Static类型BSub过程中不能嵌套定义Sub过程CSub过程中可以嵌套调用Sub过程D事件过程可以像通用过程一样由用户定义过程名8从键盘上输入两个字符串，分别保存在变量str1、str2中。确定第二个字符串在第一个字符串中起始位置的函数是（ ）ALeft BMid CString DInstr9以下能够触发文本框Change事件的操作是（ ）A文本框失去焦点B文本框获得焦点C设置文本框的焦点D改变文本框的内容10假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效（变灰），应使用的语句为（ ）AMenuItem.Enabled=FalseBMenuItem.Enabled=TrueCMenuItem.Visible=TrueDMenuItem.Visible=False11为了使用通用对话框进行打开文件的操作，应将通用对话框的Action属性设定为（ ）A0B1C2D312为了检测到用户按下键盘上的所有键，应该使用的键盘事件为（ ）AKeyPress BMouseDown CKeyDown DMouseUp13用于从内存删除窗体的命令是（ ）AMove BHide CUnload DDelete14用于设置文件列表框控件显示文件类型的属性是（ ）AFilter BPath CPartern DFileName15用于返回窗体可用区域宽度的属性是（ ）AScaleWidth BScaleLeft CScaleHeight DScaleTop三、读程序题1分析以下程序，写出运行结果。 Private Sub Form_Click() score = 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 Sub2读下面的程序，分析其功能，写出运行结果。在窗体上有一个命令按钮，名称为Command1。然后编写如下程序：Private Sub Command1_Click()For I = 1 To 4For J = 0 To IPrint Chr$(65 + I);Next JPrintNext IEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是什么？3阅读下面的程序，写出执行结果。Private Sub Form_load()Form1.showd = 0For a = 1 To 2For b = 1 To aFor c = b To 5d