【在线】电子科大17春《VB程序设计》在线作业2.doc

谋学网一、单选题（共 20 道试题，共 100 分。） V 1. 以下能判断是否到达文件尾的函数是（ ）。A. BOFB. LOCC. LOFD. EOF2. 下列列表框属性中哪一项不是数组（ ）。A. SelectedB. ListCountC. ListD. Index3. 在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程： Private Sub Command1_Click() S = 0 For i = 1 To 15 x=2*i-1 if x Mod 3=0 Then s=s+1 Next i Label1.Caption=s End Sub 程序运行后，单击命令按钮，则标签中显示的内容是（ ）。A. 1B. 5C. 27D. 454. 在窗体上创建一个名称为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text= Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer, X As Single, Y As Single) Print 程序设计 End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print Visual Basic; End Sub 程序运行后，如果按A键，然后单击窗体，则在窗体上显示的内容是（ ）。A. Visual BasicB. “程序设计”C. “A程序设计”D. “Visual Basic程序设计”5. ADO数据控件的RecordSoure属性是表示（ ）。A. 与ADO数据控件连接的数据库B. 与数据库的连接方式C. 数据库类型D. ADO数据控件可访问的数据来源6. 使文本框获得焦点的方法是（ ）。A. GotFocusB. ChangeC. ListFocusD. SetFocus7. 窗体的MouseDown事件过程如下： Form_MouseDown(Button As Integer,Shift As Integer, X As Single, Y As Single) 其中有4个参数，关于这些参数，正确的描述是（ ）。A. 通过Button参数判定当前按下的是哪一个鼠标键B. Shift参数只能用来确定是否按下Shift键C. Shift参数只能用来确定是否按下Alt键和Ctrl键D. 参数x、y用来设置鼠标当前位置的坐标8. 代码Command1.Caption=”退出”,其中Command1是（ ），Caption是（ ）,“退出”是（ ）。请选择一个标准答案（ ）。A. 方法，事件，属性B. 对象，属性，值C. 对象，方法，值D. 方法，对象，值9. 设有如下程序： Option Base 0 Private Sub Form_Click() Dim a Dim I As Integer a=Array(1,2,3,4,5,6,7,8,9) For I=0 To 3 Print a(5 - I); Next I End Sub 程序运行后，单击窗体，则在窗体上显示的是（ ）。A. 4321B. 5432C. 6543D. 765410. 能够触发文本框Chang事件的操作是（ ）。A. 文本框失去焦点B. 文本框获得焦点C. 设置文本框的焦点D. 改变文本框的内容11. 下列哪些方法不属于通用对话框（ ）。A. ShowColorB. ShowFontC. ShowPrintD. ShowList12. 在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（ ）。A. 工程资源管理器窗口B. 工具箱窗口C. 代码窗口D. 属性窗口13. 设有如下通用过程： Public Sub Fun(a(),ByVal x As Integer) For i = 1 To 5 x = x + a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程 Private Sub Command1_Click() Dim arr(5) As Variant For i = 1 To 5 arr(i) = i Next n = 10 Call Fun(arr(), n) Text1.Text = n End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）。A. 10B. 15C. 25D. 2414. 在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程： Private Sub Command1_Click() n = Text1.Text Select Case n Case 1 To 20 x = 10 Case 2,4,6 x = 20 Case Is10 x = 30 Case 10 x = 40 End Select Text2.Text = x End Sub 程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是（ ）。A. 10B. 20C. 30D. 4015. 下列控件哪一个具有Align属性（ ）。A. 图像框B. 图片框C. 标签D. 列表框16. 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Move 500,500 End Sub 程序运行后，单击命令按钮，执行的操作为（ ）。A. 命令按钮移动到距窗体左边界、上边界各500的位置B. 窗体移动到距屏幕左边界、上边界各500的位置C. 命令按钮向左、上方向各移动500D. 窗体向左、上方向各移动50017. 设在菜单编辑器中定义了一个菜单项，名为Menu1,为了在运行时隐藏该菜单项应使用的语句是（ ）。A. Menu1.Enabled=TrueB. Menu1.Enabled=FalseC. Menu1.Visible=TrueD. Menu1.Visible=False18. 图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，该属性是（ ）。A. AutosizeB. StretchC. AutoredrawD. Appearance19. 在窗体上有一个文本框控件，名称为TxtTime；一个计时器控件，名称为Timer1，要求每一秒钟在文本框中显示一次当前的时间，程序为： Private Sub