南京工程学院vb题库套.doc

南京工程学院vb题库。试卷编号：8949所属语言：Visual Basic试卷方案：09-10-2程序设计基础VB模拟试卷总分：100分共有题型：6种一、判断 共5题 （共计10分）第1题 （2.0分）用For循环写的程序不能用While循环来写.答案：N第2题 （2.0分）对象的可见性用enabled属性设置,可用性用visible属性设置.答案：N第3题 （2.0分）数组作为过程参数时,使用的是地址传送方式.答案：Y第4题 （2.0分）控件是对象,而窗体不是对象,它只是控件对象的窗口.答案：N第5题 （2.0分）在窗体模块的声明部分中用Private声明的变量的有效范围是其所在的工程.答案：N二、单项选择 共20题 （共计40分）第1题 （2.0分）若有数组说明语句为:Dim a(10),则数组a包含元素的个数是().A:10B:22C:8D:12答案：B第2题 （2.0分）若要清除列表框的所有内容,可用什么方法实现A:RemoveItemB:ClsC:ClearD:以上均不可以答案：C第3题 （2.0分）在一个语句内写多条语句时,用来分隔每条语句的符号是().A:,B:C:、D:;答案：B第4题 （2.0分）Cls方法可清除窗体或图片框中的信息是 .A:Picture属性设置的背景图案B:在设计时放置的控件C:程序设计时产生的图形和文字D:以上方法都对答案：C第5题 （2.0分）VB窗体文件的扩展名是().A:VBWB:VBPC:FRMD:BAS答案：C第6题 （2.0分）下面关于随机文件的描述正确的是A:文件中的内容是通过随机数产生的B:文件中的记录号通过随机数产生C:可对文件中的记录根据记录号随机地读写D:文件的每条记录的长度是随机的答案：C第7题 （2.0分）下列数据类型中,占用内存最大的是().A:BooleanB:ByteC:IntegerD:Single答案：D第8题 （2.0分）下面是()合法的字符常数.A:ABC$B:ABCC:ABCD:ABC答案：B第9题 （2.0分）能够改变窗体边框线类型的属性是().A:FontStyleB:BorderStyleC:BackStyleD:Border答案：B第10题 （2.0分）下列字符串常量中,最大的是().A:北京B:上海C:天津D:广州答案：C第11题 （2.0分）声明符号常量应该用关键字().A:StaticB:ConstC:PrivateD:V26/ariant答案：B第12题 （2.0分）OPTIONEXPLICIT语句不可以放在().A:窗体模块的声明段中B:标准模块的声明段中C:类模块的声明段中D:任何事件过程中答案：D第13题 （2.0分）字体对话框是调用_方法来实现的.A:ShowOpenB:ShowColorC:ShowCloseD:ShowFont答案：D第14题 （2.0分）在窗体上添加一个命令按钮，编写如下代码：Option Base 1Private Sub Command1_Click Dim a(10) As Integer,p(3)As Integer k=5For i=1 To 10 a(i)=iNext iFor i=1 To 3 p(i)=a(i*i)Next iFor i=1 To 3 k=k+p(i)*2Next iPrint kEnd Sub程序运行后，单击命令按钮，输出结果是A:35B:28C:33D:37答案：C第15题 （2.0分）如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是().A:如果工程中含有SubMain过程,则程序一定首先执行该过程B:不能把标准模块设置为启动模块C:用Hide方法只是隐藏一个窗体,不能从内存中清除该窗体D:任何时刻最多只有一个窗体是活动窗体答案：A第16题 （2.0分）为了把焦点移到某个指定的控件,所使用的方法是().A:SetFocusB:VisibleC:RefreshD:GetFocus答案：A第17题 （2.0分）在逐行运行程序的语句时,可用调试窗口监视表达式和变量的值,其中()窗口是用来显示代码中正在调试的语句所产生的信息,或显示直接在该窗口中键入的命令所请求的信息.A:立即B:监视C:本地D:中断答案：A第18题 （2.0分）下面关于顺序文件的描述正确的是A:每条记录的长度必须相同B:可通过编程对文件中的某条记录方便地修改C:数据只能以ASCII码形式存放在文件中,所以可通过文本编辑软件显示D:文件的组织结构复杂答案：C第19题 （2.0分）在下列说法中,正确的是_.A:通过适当的设置,可以在程序运行期间,让时钟控件显示在窗体上B:在列表框中不能进行多项选择C:在列表框中能够将项目按字母顺序从大到小排列D:框架也有 Click和 DblClick事件答案：D第20题 （2.0分）窗体的Enable属性的属性值是()类型的数据.A:整型B:字符型C:逻辑型D:实型答案：C三、程序填空 共1题 （共计10分）第1题 （10.0分）-【程序填空】-功能：用户界面如图所示，实现左右两个组合框中数据的左移和右移功能。 程序开始运行时，在左边组合框中生成10个由小到大排列的随机三位 正整数 (在设计阶段该组合框的Sorted属性值已设置为True), 现要求完成: （1）单击钮，左边组合框中的10个数全部移动到右边组合框， ，同时使钮能响应，钮不能响应。 （2）单击钮，右边组合框中的10个数全部移到左边的组合框， ，同时使钮能响应，钮不能响应； （3）单击结束按钮，结束程序运行。-Private Sub cmdLeft_Click() Dim i As Integer For i = 0 To comboRight.ListCount - 1 comboLeft.AddItem comboRight.List(i) Next i comboRight.Clear *SPACE* 【?】= False *SPACE* 【?】 = True End SubPrivate Sub cmdRight_Click() Dim i As Integer *SPACE* For i = 0 To 【?】 - 1 comboRight.AddItem comboLeft.List(i) Next i *SPACE* 【?】.Clear cmdRight.Enabled = False cmdLeft.Enabled = TrueEnd SubPrivate Sub Command3_Click() EndEnd SubPrivate Sub Form_Load() Dim i As Integer Label1.Caption = 组合框1 Label2.Caption = 组合框2 cmdRight.Caption = cmdRight.Enabled = True cmdLeft.Caption = cmdLeft.Enabled = False cmdExit.Caption = 结束 comboLeft.Text = For i = 1 To 10 comboLeft.AddItem Int(Rnd * 900) + 100 Next i comboRight.Text = End Sub答案：=(答案1)=cmdLeft.Enabled=(答案2)=cmdRight.Enabled=(答案3)=comboLeft.ListCount=(答案4)=comboLeft四、程序改错 共1题 （共计10分）第1题 （10.0分）-【程序改错】-题目:编程求一个十进制整数n的各位数字之和，设n为小于或等于5位的数。-Option ExplicitPrivate Sub Form_Click() Dim N As Integer, Sum As Integer, S1 As String, S2 As String Dim i As Integer, Ch As String Sum = 0 N = InputBox(输入整数n) S1 = Str(N) *FOUND* S1 = RTrim(S1) For i = 1 To Len(S1) *FOUND* Ch = Mid(N, i, 1) *FOUND* Sum = Val(Ch) Next i Print 该整数的各位数之和是：; SumEnd Sub答案：=(答案1)=S1 = Trim(S1)=或=S1 = lTrim(S1)=(答案2)=Ch = Mid(S1, i, 1)=(答案3)=Sum = Sum + Val(Ch)=或=Sum = Sum + Val(Ch)五、程序设计 共1题 （共计20分）第1题 （20.0分）-【程序设计】-题目：(事件)双击窗体。 (响应)把一元钞票换成一分、二分和五分的硬币 （每种至少有一枚），求出其所有的换法， 把结果输出在窗体上。 将所有的换法的数目存入变量N中-答案：-Dim i, j, k As IntegerFor i = 1 To 100 For j = 1 To 50 For k = 1 To 20 If (i + 2 * j + k * 5) = 100) Then Print (CStr(i) Print (CStr(j) Print (CStr(k) n = n + 1 End If Next NextNext-六、VB窗体设计 共1题 （共计10