VB作业2

VB第二次作业（5～7章）一、选择题（每题2分，共2×20＝40分）1、当在滚动条内拖动滚动块时触发A．KeyUp事件B．KeyPress事件C．Scroll事件D．Change事件2、设已经在"菜单编辑器"中设计了窗体的快捷菜单，其顶级菜单为Bs，取消其"可见"属性，运行时，在以下事件过程中，可以使快捷菜单响应鼠标右键菜单的是A．Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _X As Single, Y As Single)If Button=2 Then PopupMenu Bs, 2End SubB．Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _X As Single, Y As Single)PopupMenu BsEnd SubC．Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _X As Single, Y As Single)PopupMenu Bs,0End SubD．Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _X As Single, Y As Single)If (Button=vbLeftButton) Or (Button=vbRightButton) Then PopupMenu BsEnd Sub3、图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，这个属性是A) Autosize B) StretchC) AutoRedraw D) Appearance4、下列叙述中正确的是A) 在窗体的Form_Load事件过程中定义的变量是全局变量B) 局部变量的作用域可以超出所定义的过程C)在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名，但其作用域只限于该过程D) 在调用过程时，所有局部变量被系统初始化为0或空字符串5、以下叙述中错误的是A) 如果过程被定义为Static类型，则该过程中的局部变量都是Static类型B) Sub过程中不能嵌套定义Sub过程C) Sub过程中可以嵌套调用Sub过程D) 事件过程可以像通用过程一样由用户定义过程名6、以下叙述中错误的是A) 在同一窗体的菜单项中，不允许出现标题相同的菜单项B) 在菜单的标题栏中，“&”所引导的字母指明了访问该菜单项的访问键C) 程序运行过程中，可以重新设置菜单的Visible属性D) 弹出式菜单也在菜单编辑器中定义7、设在菜单编辑器中定义了一个菜单项，名为menu1。

为了在运行时隐藏该菜单项，应使用的语句是A) menu1.Enabled=True B) Munu1.Enabled=FalseC) Menu1.Visible=True D) Menu1.Visible=False8、以下叙述中错误的是A) 在程序运行时，通用对话框控件是不可见的B) 在同一个程序中，用不同的方法(如ShowOpen或ShowSave等）打开的通用对话框具有不同的作用C)调用通用对话框控件的ShowOpen方法，可以直接打开在该通用对话框中指定的文件D) 调用通用对话框控件的ShowColor方法，可以打开颜色对话框9、设有如下的记录类型Type StudentnumberAs stringname As Stringage As IntegerEnd Type则正确引用该记录类型变量的代码是A) Student．name=”张红”B) Dim s As Student＝”张红”C) Dim s As Type Student=”张红”D) Dim s As Types.Dame＝”张红”10、表示滚动条控件取值范围最大值的属性是A)Max B)LargeChange C)Value D)Max—Min11、系统默认的参数传递方式是（）传递。

A、按值B、按地址C、ByValD、按实参12、假定有以下函数过程：Function Fun(S As String) As StringDim s1 As StringFor i=1 To Len(S)s1＝UCase(Mid(S，i，1))十s1Next iFun＝s1End Function在窗体上画一个命令按钮，然后编写如下事件过程：Prlvate Sub Commmldl_Click()Dim Str1 As String，Str2 As StringStrl＝inputbox(”请输入一个字符串”)Str2=Fun(Strl)Print Str2End Sub程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，则单击“确定”按钮后在窗体上的输出结果为A)abcdefg B)ABCDEFG C)gfedcba D)GFEDCBA13、以下叙述中错误的是A)用Shell函数可以调用能够在Windows下运行的应用程序B)用Shell函数可以调用可执行文件，也可以调用VisualBasic的内部函数C)调用Shell函数的格式应为：<变量名>＝Shell(……)D)用Shell函数不能执行DoS命令14、以下关于过程及过程参数的描述中，错误的是A)过程的参数可以是控件名称B)用数组作为过程的参数时，使用的是“传地址”方式c)只有函数过程能够将过程中处理的信息传回到调用的程序中D)窗体可以作为过程的参数15、一个工程中包含两个名称分别为Forml、Form2的窗体，一个名称为mdlFunc的标准模块。

假定在Forml、Form2和mdlFunc中分别建立了自定义过程，其定义格式为：Forml中定义的过程：PriVate Sub frmfunctionl()End SubForm2中定义的过程：Public Sub frmffunction2()End SubmdlFunc中定义的过程：PubliC Sub mdlFunction()End Sub在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是A)上述三个过程都可以在工程中的任何窗体或模块中被调用B)frmfunction2和mdlfunction过程能够在工程中各个窗体或模块中被调用C)上述三个过程都只能在各自被定义的模块中调用D)只有mdlFunction过程能够被工程中各个窗体或模块调用16、在窗体上画一个名称为CommonDialogl的通用对话框，一个名称为Commandl的命令按钮。

要求单击命令按钮时，打开一个保存文件的通用对话框。

该窗口的标题为"Save"，缺省文件名为“SaveFile”，在“文件类型”栏中显示*.txt。

则能够满足上述要求的程序是A)Private Sub Command_C1ick()Commondialogl．“Savefile”Commondialogl.filter＝"All Files|*.*|(*.txt)|*.txt|(*.doc)．|*.doc"CommonDialogl．Filterindex=2CommonDialogl．Dial0g．title＝"Save"CommonDialogl．Action＝2End SubB)Private Sub Commandl—Click()CommonDialogl．＝"SaveFile"CommonDiaLogl．Filter＝"A11 Files|*.*|(*.txt)|*.txt|*．doc|*．doc"C0mmonDialogl．FilterIndex＝1CommonDialogl．DialogTitle＝"Save"CommonDialogl．Action＝2End SubC)Private Sub Cmmandl_C1ick()COmmonDialogl．＝"Save"CommonDialogl．FiLter＝"A11Files|*.*|(*.txt)|*.txt|(*.doc)|*.doc"CommonDialogl．Filterindex＝2C0mmonDialogl．DialogTitle＝"SaveFile"CommonDialogl．Action＝2End SubD)Private Sub Commandl_C1ick()CommonDialogl．＝"SaveFile"CommonDialogl．Filter＝"All Files|*.*|(*.txt)|*.txt|(*.doc)|*.doc"CommonDialogl．FilterIndex=1CommonDialogl．DialogTitle=“Save”CommonDialogl．Action＝1End Sub17、以下关于变量作用域的叙述中，正确的是A) 窗体中凡被声明为Private的变量只能在某个指定的过程中使用B) 全局变量必须在标准模块中声明C) 模块级变量只能用Private关键字声明D) Static类型变量的作用域是它所在的窗体或模块文件18、在以下描述中正确的是A)标准模块中的任何过程都可以在整个工程范围内被调用B) 在一个窗体模块中可以调用在其他窗体中被定义为Public的通用过程C) 如果工程中包含Sub Main过程，则程序将首先执行该过程D) 如果工程中不包含Sub Main过程，则程序一定首先执行第一个建立的窗体19、在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：Private Function f(m As Integer)If m Mod 2 = 0 Thenf = mElsef = 1End IfEnd FunctionPrivate Sub Command1_Click()Dim i As Integers = 0For i = 1 To 5s = s + f(i)NextPrint sEnd Sub程序运行后，单击命令按钮，在窗体上显示的是A) 11 B) 10 C) 9 D) 820、在用菜单编辑器设计菜单时，必须输入的项有（A）快捷键（B）标题（C）索引（D）名称二、填空题（每题2分，共2×15＝30分）1、一个多文档界面的应用程序可以包含三类窗体分别是、、。