《南京工程施工学院vb试题库8套》由会员分享，可在线阅读，更多相关《南京工程施工学院vb试题库8套（24页珍藏版）》请在金锄头文库上搜索。
1、南京工程学院vb题库。试卷编号：8954所属语言:Visual Basic试卷方案：09-10-2程序设计基础一VB模拟试卷总分：100分共有题型：6种一、判断共5题（共计10分）第1题（2.0分）所有的VB的变量，都有隐含说明字符和强调声明两种方法来定义.答案：N第2题（2.0分） 框架控件和形状控件都不能响应用户的鼠标的单击事件.答案：Y第3题（2.0分）组合框兼有文本框和列表框两者的功能，用户可以通过键入文 本或选择列表中的项目来进行选择.答案：Y第4题（2.0分）移动框架内的控件时框架内的控件也跟随移动，所以框架内各控 件的Left和Top属性值也将分别随之改变.答案：N第5题（2.0
2、分）在框架控件上放置的控件可以移动到框架控件的外面.答案：N二、单项选择共20题（共计40分） 第1题（2.0分）如果没有在列表框中选择项目，且列表框的MultiSelect属性值为默认值(0None),则执行语名 Listl.RemoveltemListl.Listlndex的结果是().A:删除列表框的最后一项B:删除列表框的第一项C:出错D:删除列表框中的最后添加的一项答案：C第2题(2.0分)如果将布尔常量值TRUE赋值给一个整型变量，则整型变量的值为().A:0B:-1C:TrueD:FALSE答案：B第3题(2.0分)若要使标签控件显示时不覆盖其背景内容，要进行设置的属性是().A
3、:BackColorB:BorderStyleC:ForeColorD:BackStyle答案：D第4题(2.0分)表达式 print Len(trim( abcd )&123)的结果是A:9B:7C:abcdD:123答案：B第5题(2.0分)要使标签能透出窗体的背景，必须设置()属性.A:BackStyleB:BorderStyleC:AppearanceD:BackColor答案：A第6题（2.0分）以下正确的For-Next结构是A:For x = 5 Step 10 Next xB:For x=3 To -3 Step -3 Next xC:For x=1 To 10start:Ne
4、xt xIf i=10 Then GoTo startD:For x=3 To 10 Step 3Next m答案：B第7题（2.0分）下面关于多重窗体的叙述中，正确的是A:作为启动对象的Main子过程只能放在窗体模块内B:如果启动对象是Main子过程，则程序启动时不加载任何窗体，以后由该过程根据不同情况决定是否加载及加载哪一个窗体C:没有启动窗体，程序不能执行D:以上都不对答案：A第8题（2.0分）在Visual Basic中最基本的对象是（）,它是应用程序的基石，是其他控件的容器.A:文本框B:命令按钮C:窗体D标签答案：C第9题（2.0分）以下叙述错误的是：A:下拉式菜单和弹出式菜单都用
5、菜单编辑器建立B:如果把一个菜单项的Enabled属性设置为False,则菜单项不可见C:除分隔线外,所有菜单项都能接收Click事件D:内缩符号由4个点组成，它表明菜单项所在的层次答案：B第10题（2.0分）以下叙述中错误的是（）.双击鼠标可以触发DblClick事件B:窗体或控件的事件的名称可以由编程人员确定C:移动鼠标时,会触发MouseMove事件D:控件的名称可以由编程人员设定答案：B第11题（2.0分）VB的编程机制是A:可视化B:面向对象C:事件驱动答案：C第12题（2.0分）Cls方法可清除窗体或图片框中的信息是A:Picture属性设置的背景图案B:在设计时放置的控件C:程序
6、设计时产生的图形和文字D:以上方法都对答案：C第13题（2.0分）Print #1,STR1$中的 Print 是A:顺序文件的写语句B:在窗体上显示的方法C:子程序名D:打印命令答案：A第14题（2.0分）下列不属于代码窗口的是（）.A:对象下拉式列表框B:过程下拉式列表框C:代码框。:属性列表框答案：D第15题（2.0分） 表达式 INT(8*SQR(36)*10A(-2)*10+0.5)/10 的值是().A:0.48B:0.048C:.5D:.05答案：C第16题(2.0分)如果要设置窗体的标题栏，应选择以下那种属性().A:NameB:CaptionC:TipsD:Text答案：B第
7、17题(2.0分)要使一个标签透明且不具有边框，则应().A:将其BackStyle属性设置为0,BorderStyle属性设置为0B:将其BackStyle属性设置为0,BorderStyle属性设置为1C:将其BackStyle属性设置为1,BorderStyle属性设置为0D:将其BackStyle属性设置为1,BorderStyle属性设置为1答案：B第18题(2.0分)若有数组说明语句为:Dim a(-3 to 8),则数组a包含元素的个数是().A:5B:8C:11D:12答案：D第19题(2.0分)可视化编程的最大优点是().A:具有标准工具箱B: 一个工程文件由若干个窗体文件组
8、成C:不需要编写大量代码来描述图形对象D:所见即所得答案：C第20题（2.0分）将CommandDialogl通用对话框以打开对话框打开，可选以下（）方法.A:showopenB:showcolorC:showsaveD:showfont答案：A三、程序填空共1题（共计10分）第1题（10.0分）【程序填空】功能：窗体中有若干控件，单击其中的一个按扭cmdput时，执行如下的事件过程，该过程的功能是把数据输出到指定的文件中.I*SPACE*Private Type 【？】Number As StringName As StringEnd TypePrivate Sub cmdput_click
9、()Dim Title As StringDim Str1 As StringDim str2 As StringDim stu As StudentDim i As IntegerOpen App.Path & student.dat For Random As #1 Len = Len(stu)Title =写记录到随机文件Str1$ =请输入学生号str2$ =请输入学生名Fori = 1 To 5I*SPACE*? .Number = InputBox(Str1$, Title$)stu.Name = InputBox$(str2$, Title$)Put #1, i, stuNext
10、 i心*SPACE*Close【？】End Sub答案：=（答案 1）=Student=（答案 2）=stu=（答案 3）=#1四、程序改错共1题（共计10分）第1题（10.0分）【程序改错】题目：产生30个小于100的成绩随机数，并统计出优、良、中等、及格、不及格数的个数，并计算出成绩属于优秀段的成绩平均分。Option ExplicitPrivate Sub Form_Click()Dim k%, a%, bjg%, jg%, zd%, lh%, yx As IntegerDim pjf As IntegerRandomizepjf = 0For k = 1 To 30、*FOUND*a
11、= Int(Rnd()Select Case aCase 0 To 59bjg = bjg + 1 不及格Case 60 To 69jg = jg + 1 及格Case 70 To 79zd = zd + 1 中等Case 80 To 89Ih = Ih + 1 良好Case 90 To 100yx = yx + 1 优秀 *FOUND*Pjf = Pjf + 1End SelectNext k*FOUND*If yx 0 Then pjf = pjf / 30Debug.Print 不及格+ Str$(bjg) + 人，及格+ Str$(jg) + 人，中等+ Str$(zd) + 人;De
12、bug.Print 良好+ Str$(lh) + 优秀+ Str$(yx) + 人Debug.Print 优秀分数段成绩平均分& pjfEnd Sub答案:=(答案 1)= a = Int( Rnd() * 100)a = Int（ Rnd * 100）=（答案 2）=Pjf = Pjf + a=（答案 3）=If yx 0 Then pjf = pjf / yx五、程序设计共1题（共计20分）第1题（20.0分）【程序设计】题目：（事件）单击窗体。（响应）已知 s=1 + 1/3!+1/5!+1/7!+1/9!,请将 s 结果值输出到窗体上。使用do while.loop语句完成程序答案:D
13、im i As Integeri = 1p = 1Do While i = 9p = p * iIf i Mod 2 = 1 Thens = s + 1 / pEnd Ifi = i + 1LoopPrint ssum=s六、VB窗体设计共1题（共计10分）第1题（10.0分）【窗体设计】题目：如图所示，启动VB后，新建工程，界面上放5个命令按钮，大小位置体调整好。程序运行后，当分别单击“上”、“下”、“左”、“右”四个按钮时，“移动”按钮随之发生相应移动，请编写程序。各控件属性设置如下表：对象名称Name属性Caption属性窗体默认默认CmdUp上CmdDown下命令按钮CmdLeft左CmdRight右CmdMove移动
