VB模拟试题一

1、VB模拟试题一一、选择题1工程文件的扩展名是（ ）A.vbg B.vbp C.vbw D.vbl2一个窗体中带图片框控件（已装入图像）的VB应用程序从文件上看，至少应该包括的文件有（ ）A窗体文件（.frm）、项目文件（.vbp/vbw）B窗体文件（.frm）、项目文件（.vbp/vbw）和代码文件（.bas）C窗体文件（.frm）、项目文件（.vbp/vbw）和模块文件（.bas）D窗体文件（.frm）、项目文件（.vbp/vbw）和窗体的二进制文件（.frx）3以下关于窗体描述正确的是（ ）A 只有用于启动的窗体可以有菜单B 窗体事件和其中所有控件事件的代码都放在窗体文件中C 窗体的名字和

2、存盘的窗体文件名必须相同D 开始运行时窗体的位置只能是设计阶段时显示的位置4VB中控件主要分为3类，下面哪一种不是VB中的控件类（ ）A标准控件 BActiveX C可插入控件 D外部控件5在VB的基本数据类型中，通用类型(Variant)可以表示任何类型的变量，如果有定义Dim a，则以下变量赋值中正确的是（ ）Aa=”OK” BA$=OK Ca=04/01/2001 Da$=”OK” 6在窗体上添加一个命令按钮和一个文本框，并在命令按钮中编写如下代码：Private Sub Command1_Click( )A=1.2C=Len(Str$(A)+Space(10)Text1.text=CE

3、nd Sub程序运行后，单击命令按钮，在文本框中显示（ ）A3 B8 C14 D107在MsgBox函数中哪一个参数是必须的（ ）Aprompt Bbuttons Ctitle Dcontext8以下语句的输出结果是（ ）Print Format$(1234.5,”00,000.00”)A1234.5 B01,234.50 C01,234.5 D1,234.509有如下语句：Type StudentName As StringAge As IntegerSex As StringEnd TypeDim Stu As StudentWith Stu.Name = 张红.Age = 22.Sex

4、= 女End With执行Print Stu.Age后的结果是（ ）A张红 B22 C“女” DAge10以下控件中可以作为容器控件的是（ ）AImage图像框控件 BPictureBox图片框控件CTextBox文本框控件 DListBox列表框控件11VB提供的选择框（CheckBox）可具有的功能是（ ）A多重选择 B单一选择 C多项选择 D选择一次12以下关于作用范围的描述正确的是（ ）A 所有变量（Public/Global/Static/Private）都可以放到窗体的通用部分定义B 所有变量（Public/Global/Static/Private）都可以放到标准模块中定义C P

5、ublic/Global类的变量只能放在标准模块中定义D 只有Global类的变量必须放在标准模块中定义13建立一个图书资料管理输入界面，要求选择图书的借阅情况、语种（中文/英文/日文/其他）及分类（10类，存在重复分类，台一本图书属于1类，也同时属于2类）。应如何在窗体中利用单选钮和选择框实现（ ）A 用一组16个选择框来实现B 将10种分类用一组10个选择框、借阅情况和语种用6个单选钮实现C 将10种分类用一组10个单选钮、借阅情况和语种用6个选择框实现D 将10种分类用一组10个选择框、借阅情况用2个单选钮、语种用4个单选钮实现14有关列表框的属性和方法的正确描述是（ ）A 列表框的内容

6、由属性Item Data来确定B 当多选属性（MultiSelect）为True时，可通过Text属性获得所有内容C 选中的内容应通过List属性来访问D 选中的内容应通过Text属性来访问，并且每次只能获得一条内容15若要求在文本框中输入密码时文本框中只显示*号，则应在此文本框的属性窗口中设置（ ）AText属性值为* BCaption属性值为*CPassword属性值为空 DPasswordChar属性值为*16以下关于控件的叙述中，错误的是（ ）A VB允许用户乱设计并使用控件B 主窗体中工具条中的工具不是工具箱中包含的常用控件C 若使用系统提供的OCX控件，应先将有关的控件添加到工具箱

7、中D 使用系统提供的OCX控件进行程序调，其编程的方法与工具箱中常用控件的编程有所不同17在菜单设计时，在某菜单项（Caption）中一个字母前加以“&”符号的含义是（ ）A 设置该菜单项的“访问键”，即该字母带有下划线，可以通过键盘操作Ctrl+带下划线的字母选择该菜单项B 设置该菜单项的“访问键”，即该字母带有下划线，可以通过键盘操作Alt+带下划线的字母选择该菜单项C 设置该菜单项的“访问键”，即该字母带有下划线，可以通过键盘操作Shift+带下划线的字母选择该菜单项D 在此菜单项前加上选择标记18VB为命令按钮提供的Cancel属性（ ）A 用来指定命令按钮是否为窗体的“取消”按钮 B

8、 用来指定命令按钮的功能是停止一个程序的运行C 用来指定命令按钮的功能是关闭一个运行程序D 用来指定命令按钮的功能是中断一个程序的运行19有关多文档界面（Multiple documentnbspInterface）的不正确描述是（ ）A 多文档界面（MDI）是指在一个父窗口下面可以同时打开多个子窗口B 子窗口归属于父窗口C 如果父窗口关闭，则所有子窗口全部关闭D 如果所有子窗口全部关闭，则父窗口关闭20文件的基本操作指的是文件的删除、拷贝、移动、改名等，对文件进行改名的操作是（ ）AFileCopy BName CReName DKill21在VB中，按下鼠标键触发事件，正确的程序段是（ ）

9、APrivate Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)End SubBPrivate Sub Form_MouseUP(Button As Integer, Shift As Integer, X As Single, Y As Single)End SubCPrivate Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)End SubDPrivate Su

10、b Form_Load()End Sub22以下能够正确计算1+2+3+10的程序是（ ）APrivate Sub Command1_Click() BPrivate Sub Command1_Click()Sum = 0 Sum = 0,I=1For I = 1 To 10 Do While I=10Sum = Sum + 1 Sum=Sum+I Next I I=I+1Print Sum loop Print SumEnd Sub End SubCPrivate Sub Command1_Click() DPrivate Sub Command1_Click()Sum = 0;I=1 Su

11、m = 0;I=1Do Do Sum = Sum +1 Sum=Sum+I I=I+1 I=I+1Loop While I10 Loop Until I10Print Sum Print SumEnd Sub End Sub23在窗体中添加两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（其Name属性为Command1），然后编写如下程序： Private Sub Command1_Click()X = 0Do While X 10X = (X + 1) * (X + 2)n = n + 1LoopText1.Text = Str(n)Text2.Text = Str(

12、X)End Sub程序运行后，单击命令按钮，在两个文本框Text1和Text2中分别显示的值是（ ）A1和0 B2和12 C2和72 D3和1224在窗体中添加两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name属性为Command1），然后编写如下两个事件过程：Private Sub Command1_Click()a = UCase$(Text1.Text) + Left$(Text2.Text，2)Print aEnd SubPrivate Sub Form_Load()Text1.Text = aBText2.Text = 123456End Sub程序运行

13、后，单击命令按钮，输出结果为（ ）Aab12 BAB12 CAB56 Dab5625在通用声明中定义a，在窗体中添加一个命令按钮Command1，编写如下程序代码：Dim a As IntegerSub test()a = a + 1: b = b + 1: c = c + 1Print “Sub:”;a;b;cEnd SubPrivate Sub Command1_Click()a = 2: b = 3: c = 4Call testCall testEnd Sub程序运行后，单击命令按钮，窗体中将显示（ ）ASub：3，4，5 BSub：2，3，4Sub：4，5，6 Sub：2，3，4CS

14、ub：3，1，1 DSub：1，1，1Sub：4，1，1 Sub：1，1，126在窗体中添加一个命令按钮Command1和一个文本框Text1，并有以下程序：Private Sub Command1_Click()Static a As Varianta = Array(20, 13, 45, -10, 50, 25)End Sub此程序的功能是求数组a的最小元素值，并把最小值放在文本框中。为实现程序的功能，省略号处的程序段应该是（ ）AMin = a(1) BMin = a(0)For i = 2 To 6 For i = 1 To 5If Min a(i) Then If Min a(i)

15、 ThenMin = a(i) Min = a(i)End If End IfNext I Next IText1.Text = Min Text1.Text = Min AMin = a(0) BMin = a(0)For i = 1 To 5 For i = 1 To 5If Min a(i) If Min 2*B OR A=C AND BC OR CD的值是_。2 鼠标的光标在不同的窗口内，其形状是不一样的，光标的形状通过_属性来设置。3 下面程序运行时，内层循环的循环总次数是_。For m = 1 To 3For n = 0 To m - 1Next nNext m4 定义语句Dim A (-3 to 3) as Integer，定义数组的元素个数是_5 执行下面的程序段后，X的值为_。X=5For I=1 to 10 Step 2X=X+I5Next I 6在窗体中添加一个命令按钮，然后编写如下过程： Function fun(ByVal num As Long) As