南京工程学院vb题库1套
VB操作题库
V B操作题库(总184页) -CAL-FENGHAI.-(YICAI)-Company One1-CAL-本页仅作为文档封面，使用请直接删除2013年 VB题库第01套简单应用题（1）在考生文件夹下有一个工程文件，窗体上已经有一个标签Label1，请添加一个单选按钮数组，名称为Op1，含三个单选按钮，它们的Index属性分别为0、1、2，标题依次为"飞机"、"火车"、"汽车"，再添加一个名称为Text1的文本框。
窗体文件中已经给出了Op1的Click事件过程，但不完整，要求去掉程序中的注释符，把程序中的改为正确的内容，使得在程序运行时单击"飞机"或"火车"单选按钮时，在Text1中显示"我坐飞机去"或"我坐火车去"，单击"汽车"单选按钮时，在Text1中显示"我开汽车去"，如图所示。
注意：不能修改程序中的其他部分。
最后将修改后的文件按原文件名存盘。
Private Sub Op1_Click(Index As Integer)Dim a As String, b As String, c As Stringa = "我坐"b = "我开"' Select Case ***** Index *****Case 0= a + (0).Caption + "去"Case 1' =+ (1).Caption + "去" ***** a *****Case 2= b + (2).Caption + "去"End SelectEnd Sub（2）在考生文件夹下有一个工程文件，Form1窗体中有一个文本框，名称为Text1；请在窗体上添加两个框架控件，名称分别为F1、F2，标题分别为"性别"、"身份"；在F1中添加两个单选按钮控件Op1、Op2，标题分别为"男"、"女"；在F2中添加两个单选按钮控件Op3、Op4，标题分别为"学生"、"教师"；再添加一个命令按钮，名称为C1，标题为"确定"。
江苏省计算机vb试题及答案
江苏省计算机vb试题及答案一、选择题1. 下列关于VB的说法中，错误的是：（）A. VB是一种面向过程的编程语言B. VB可以用来开发Windows应用程序C. VB可以实现与数据库的连接和操作D. VB在界面设计方面有很高的灵活性答案：A2. VB是基于哪种编程语言开发而来的？（）A. C#B. JavaC. C++D. BASIC答案：D3. VB中绘制一个按钮的控件是：（）A. TextBoxB. ListBoxC. ComboBoxD. CommandButton答案：D二、填空题1. VB中的注释使用的符号是（）。
答案：'2. VB中用于进行循环操作的关键字是（）。
答案：Loop三、简答题1. VB中的数据类型有哪些？请分别举例说明。
答：VB中的数据类型包括整型、浮点型、字符型、布尔型、日期型等。
例如，整型可以用来存储整数值，语法如下：Dim num As Integernum = 10浮点型可以用来存储带小数点的数值，语法如下：Dim flt As Singleflt = 3.14字符型可以用来存储单个字符或字符串，语法如下：Dim str As Stringstr = "Hello, World!"布尔型可以用来表示真（True）或假（False），语法如下：Dim flag As Booleanflag = True日期型可以用来存储日期和时间，语法如下：Dim dt As Datedt = Now()2. VB中如何实现与数据库的连接和操作？答：VB中可以利用ADO（ActiveX Data Objects）对象来实现与数据库的连接和操作。
ADO是一组用于访问数据的组件，可以通过ADO 连接数据库、执行SQL语句，实现对数据库的增删改查操作。
具体步骤如下：1) 导入ADODB库：在VB中，需要先导入ADODB库，以便使用ADO相关的对象和方法。
2) 建立数据库连接：使用ADODB.Connection对象建立与数据库的连接，并设置连接字符串、用户名和密码等信息。
南京工程施工学院vb试题库8套
南京工程学院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分）在框架控件上放置的控件可以移动到框架控件的外面.答案：N二、单项选择共20题（共计40分）第1题（2.0分）如果没有在列表框中选择项目,且列表框的MultiSelect属性值为默认值(0~None),则执行语名List1.RemoveItemList1.ListIndex的结果是().A:删除列表框的最后一项B:删除列表框的第一项C:出错D:删除列表框中的最后添加的一项答案：C第2题（2.0分）如果将布尔常量值TRUE赋值给一个整型变量,则整型变量的值为(). A:0B:-1C:TrueD:FALSE答案：B第3题（2.0分）若要使标签控件显示时不覆盖其背景内容,要进行设置的属性是(). A: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: …Next xIf i=10 Then GoTo start D:For x=3 To 10 Step 3…Next 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:下拉式菜单和弹出式菜单都用菜单编辑器建立B:如果把一个菜单项的Enabled属性设置为False,则菜单项不可见C:除分隔线外,所有菜单项都能接收Click事件D:内缩符号由4个点组成,它表明菜单项所在的层次答案：B第10题（2.0分）以下叙述中错误的是().A:双击鼠标可以触发DblClick事件B:窗体或控件的事件的名称可以由编程人员确定C:移动鼠标时,会触发MouseMove事件D:控件的名称可以由编程人员设定. 答案：B第11题（2.0分）VB的编程机制是A:可视化B:面向对象C:事件驱动答案：C第12题（2.0分）Cls方法可清除窗体或图片框中的信息是 . A:Picture属性设置的背景图案B:在设计时放置的控件C:程序设计时产生的图形和文字D:以上方法都对答案：C第13题（2.0分）Print #1,STR1$中的Print是______.A:顺序文件的写语句B:在窗体上显示的方法C:子程序名D:打印命令答案：A第14题（2.0分）下列不属于代码窗口的是().A:对象下拉式列表框B:过程下拉式列表框C:代码框D:属性列表框答案：D第15题（2.0分）表达式INT(8*SQR(36)*10^(-2)*10+0.5)/10的值是().A:0.48B:0.048C:.5D:.05答案：C第16题（2.0分）如果要设置窗体的标题栏,应选择以下那种属性().A:NameB:CaptionC:TipsD:Text答案：B第17题（2.0分）要使一个标签透明且不具有边框,则应().A:将其BackStyle属性设置为0,BorderStyle属性设置为0 B:将其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:一个工程文件由若干个窗体文件组成C:不需要编写大量代码来描述图形对象D:所见即所得答案：C第20题（2.0分）将CommandDialog1通用对话框以打开对话框打开,可选以下()方法.A:showopenB:showcolorC:showsaveD:showfont答案：A三、程序填空共1题（共计10分）第1题（10.0分）'-------------------------------------------------------'【程序填空】'-------------------------------------------------------'功能：窗体中有若干控件，单击其中的一个按扭cmdput时，' 执行如下的事件过程，该过程的功能是把数据输出到指定的文件中.'-------------------------------------------------------'**********SPACE**********Private Type 【?】Number As StringName As StringEnd TypePrivate Sub cmdput_click()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$ = "请输入学生名"For i = 1 To 5'**********SPACE**********【?】.Number = InputBox(Str1$, Title$) = InputBox$(str2$, Title$)Put #1, i, stuNext i'**********SPACE**********Close 【?】End Sub答案：=======(答案1)=======Student=======(答案2)=======stu=======(答案3)=======#1四、程序改错共1题（共计10分）第1题（10.0分）'------------------------------------------------'【程序改错】'------------------------------------------------'题目：产生30个小于100的成绩随机数，并统计出优、良' 、中等、及格、不及格数的个数，并计算出成绩属' 于优秀段的成绩平均分。
南工大VB模拟试题
VB大小模拟试题满分：230分姓名：________1、单项选择题(本题共计142分)1、能被对象所识别的动作与可执行的活动分别称为对象的________。
( )A、方法、事件B、事件、方法C、事件、属性D、过程、方法2、VisualBasic是用于开发________环境下的应用程序的工具。
( )A、DOSB、WindowsC、DOS和WindowsD、UNIX3、对象在响应某个事件时，计算机要执行一段程序，以完成相应的操作，这样的程序片段叫做____过程。
( )A、方法B、事件C、调动D、编译4、VisualBasic中的工程文件的扩展名是____________。
( )A、.regB、.frmC、.basD、.vbp5、VisualBasic中的标准模块文件的扩展名是____________。
( )A、.regB、.frmC、.basD、.vbp6、VisualBasic中的窗体文件的扩展名是____________。
( )A、.regB、.frmC、.basD、.vbp7、一只白色的足球踢进球门，则白色、足球、踢、进球门是________。
( )A、属性、对象、方法、事件B、属性、对象、事件、方法C、对象、属性、方法、事件D、对象、属性、事件、方法8、VisualBasic是一种面向________的程序设计语言。
( )A、过程B、用户C、方法D、对象9、用窗体的________属性来设置窗体的标题。
( )A、StyleB、TextC、CaptionD、Name10、如果要在两个菜单命令项之间加一条分隔线，可在标题文本框中键入________。
( )A、-B、+C、&D、#11、在VisualBasic最基本的对象是________，它是应用程序的基石。
( )A、标签B、窗体C、文本框D、命令按钮12、VisualBasic程序设计时常用的Print、Cls属于________。
VB练习题(含答案)
VB单元练习题一一、选择题1、Visual Basic集成开发环境中不包括下列哪些窗口？（D）A. 工具箱窗口B. 工程资源管理器窗口C. 属性窗口D. 命令窗口2、“一辆小客车在正常行进过程中被一辆大型货车撞坏了”，在这句话中，“客车”，“小”，“行进”和“被一辆大型货车撞坏了”分别对象Visual Basic中的哪些术语？（B ）A. 对象、属性、事件、方法B. 对象、属性、方法、事件C. 属性、对象、事件、方法D. 属性、对象、方法、事件3、对象的特征和状态特征称为？（ C ）A. 事件B. 方法C. 属性D. 类4、下面哪一个属性用来标识对象的名称？（D ）A. CaptionB. ValueC. TextD. Name5、下列哪个符号是合法的变量名? （A ）A. VB123B. AbsC. 99JiD. x\y6、数学式子10sin25o写成Visual Basic表达式是？（D）A. 10sin25B. 10*sin(25)C. 10*sin(25o)D. 10*sin(25*3.14/180)7、Visual Basic中不存在下列哪一种数据类型？（D ）A. 字符串类型B. 日期类型C. 逻辑类型D. 指针类型8、表达式Left(“Visual”,3)+Lcase(“AB”)的值是？（C）A. visABB. VisABC. VisabD. ualab9、表达式6+10 Mod 4*2+1的值是？（A）A. 9B. 11C. 1D. 310、把数值型转换为字符串型需要使用下列哪一种函数? （B）A. Val()B. Str()C. Asc()D. Chr()11、VB中窗体文件的扩展名是______。
（B）(A)VBP (B)FRM(对) (C)VBW (D)PDM12、在设计应用程序时，通过______窗口可以查看到应用程序工程中的所有组成部分。
（D）(A)代码窗口(B)窗体设计窗口 (C)属性窗口(D)工程资源管理器窗口(对)13、在VisualBasic中，所有的窗体和控件都必定具有的一个属性是______。
全国计算机VB上机题库及答案(全)
全国计算机等级考试二级VB上机考试新版题库及解析【2013年3月考试专用】考前复习必看资料：PiaoMo整理—1—第一套上机题题干166一、基本操作题请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上建立一个名称为Command1的命令按钮数组，含三个命令按钮，它们的Index 属性分别为0、1、2，标题依次为"是"、"否"、"取消"，每个按钮的高、宽均为300、800。
窗体的标题为"按钮窗口"。
运行后的窗体如图1所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp ，窗体文件名为sjt1.frm 。
图1【操作步骤】步骤1：新建一个"标准EXE"工程，如表1在窗体中用"复制"和"粘贴"画出控件数组并设置属性。
表1(2)在名称为Form1的窗体上画一个名称为Sha1的形状控件，然后建立一个菜单，标题为"形状"，名称为shape0，该菜单有两个子菜单，其标题分别为"正方形"和"圆形"，其名称分别为shape1和shape2，如图2所示，然后编写适当的程序。
程序运行后，如果选择"正方形"菜单项，则形状控件显示为正方形；如果选择"圆形"菜单项，则窗体上的形状控件显示为圆形。
注意：程序中不能使用变量，每个事件过程中只能写一条语句。
保存时必须存放在考生文件夹下，工程文件名为sjt2.vbp ，窗体文件名为sjt2.frm 。
图2【操作步骤】步骤1：新建一个"标准EXE"工程，在窗体Form1中画一个名为Sha1的形状控件。
步骤2：选择【工具】→【菜单编辑器】命令，打开菜单设计器，如表2中的设置建立菜单项。
vb考试题库及答案大一
vb考试题库及答案大一一、选择题（每题2分，共20分）1. 在VB中，以下哪个是正确的变量声明语句？A. Dim a$B. Dim a IntegerC. Dim a As StringD. Dim a As Integer答案：C2. VB中，以下哪个是正确的字符串连接操作符？A. +B. ||C. &D. *答案：C3. 在VB中，以下哪个函数用于将字符串转换为数值？A. Val()B. Str()C. CInt()D. CDbl()答案：A4. 在VB中，以下哪个是正确的条件语句？A. If x > 0 Then Print "Positive"B. If x > 0 Print "Positive"C. If x > 0 Then Print "Positive" Else Print "Negative"D. If x > 0 Then "Positive"答案：C5. 在VB中，以下哪个是正确的循环结构？A. For i = 1 To 10B. For i = 1 To 10 Step -1C. For i = 10 To 1D. All of the above答案：D6. 在VB中，以下哪个是正确的数组声明语句？A. Dim arr(10)B. Dim arr(10) As IntegerC. Dim arr() As IntegerD. Dim arr As Integer(10)答案：B7. 在VB中，以下哪个是正确的函数声明语句？A. Function myFunction() As IntegerB. Function myFunction As IntegerC. Function myFunction() IntegerD. Function myFunction Integer答案：A8. 在VB中，以下哪个是正确的事件处理程序声明？A. Private Sub Form_Click()B. Private Sub Form_Click(ByVal sender As Object, ByVal e As EventArgs)C. Private Sub Form_Click(ByVal sender As Object)D. Private Sub Form_Click(ByVal e As EventArgs)答案：A9. 在VB中，以下哪个是正确的窗体属性？A. CaptionB. TextC. NameD. All of the above答案：D10. 在VB中，以下哪个是正确的控件事件？A. ClickB. DoubleClickC. MouseDownD. All of the above答案：D二、填空题（每题2分，共20分）1. 在VB中，使用___________关键字可以声明一个全局变量。
南京工程学院微机原理练习
南京工程学院微机原理练习附录Ⅴ练习题练习1一、单项选择1）下面关于8086指令队列的叙述，正确的是（）。
A、队列存放已经译码的指令B、8086有4个字节的队列C、队列中的指令不一定被执行D、8086有8个字节的队列2）能保存各逻辑段的起始地址的寄存器称为（）A、段寄存器B、地址寄存器C、数据寄存器D、计数寄存器3）下列寄存器组中在段内寻址时可以提供偏移地址的寄存器组是（）。
A、AX，BX，CX，DXB、BX，BP，SI，DIC、SP，IP，BP，DXD、CS，DS4）8086中IP、SP分别属于（）。
A、EU，EUB、EU，BIUC、BIU，EUD、BIU，BIU5）下列不属于8086EU部分的寄存器是（）。
A、IPB、BPC、DI6）8086 CPU内标志寄存器中的控制标志位占( )A、9位B、6位C、3位D、16位7）8086CPU在进行无符号数比较时，应根据（）标志位来判别。
A、CF，OFB、CF，PFC、CF，ZFD、ZF，OF8）当方向标志DF=0 时，每次操作后使变址寄存器SI和DI（）A、增量B、减量C、保持不变D、地址减19）下列哪一个标志不是8086的状态标志（）。
A、SFB、CFC、DFD、ZF10）8086的一个典型总线周期需要（）个T状态。
A、4B、3C、2D、111）8086的一个总线周期，最多可交换（）字节A、1个B、2个C、4个12）在8086的延长总线周期中，在（）之后插入Tw。
A、T1B、T2C、T3D、T413）在8086存储空间中，用一个总线周期访问一个16位的字数据时，BHE#和A0必须是（）。
A、00B、01C、10D、1114）8086读一个以奇数地址开始的字，需几个总线周期？（）A、1B、2C、3D、415）能使CPU与存储器、协处理器同步的信号分别是（）。
A、HOLD，READYB、TEST#，HOLDC、READY，HOLDD、READY，TEST#16）8086系统中的（）控制信号是与系统中DMA控制器有关的信号。
大学VB考试题库(完整资料).doc
【最新整理，下载后即可编辑】大学VB考试题库一、单项选择题1、与传统的程序设计语言相比,Visual Basic最突出的特点是（）。
A、结构化程序设计B、程序开发环境C、事件驱动编程机制D、程序调试技术2、赋值语句：a=123& MID("123456",3,2)执行后，a变量中的值是（）。
A、"12334"B、123C、12334D、1573、保存一个工程至少应保存两个文件，这两个文件分别是（B）。
A、文本文件和工程文件B、窗体文件和工程文件C、窗体文件和标准模块文件D、类模块文件和工程文件4、以下能在窗体Form1的标题栏中显示"VisualBasic窗体"的语句是（C）。
A、="VisualBasic窗体"B、Form1.Title="VisualBasic窗体"C、Form1.Caption="VisualBasic窗体"D、Form1.Text="VisualBasic窗体"5、为了装入一个VisualBasic应用程序，应当（D）A、只装入窗体文件（.frm）B、只装入工程文件（.vbp）C、分别装入工程文件和标准模块文件（.bas）D、分别装入工程文件、窗体文件和标准模块文件6、赋给一个数组的数据类型一定要（A）。
A、相同B、不相同C、两可D、都不对7、下面正确的赋值语句是（C）。
A、x+y=30B、y=π*r*rC、y=x+30D、3y=x8、VisualBasic 6.0集成环境的主窗口中不包括（C）。
A、标题栏B、菜单栏C、状态栏D、工具栏9、以下叙述中错误的是(C)。
A、Visual Basic 是事件驱动型可视化编程工具B、Visual Basic应用程序不具有明显的开始和结束语句C、Visual Basic工具箱中的所有控件都具有宽度（Width）和高度（Height）属性(计时器)D、Visual Basic中控件的某些属性只能在运行时设置10、要使Print方法在Form_Load事件中起作用，要对窗体的(C)属性进行设置。
南京工程学院试卷B
南京工程学院试卷B一填空题（本题15空，每空1分，共15分）1一信源有六种输出状态{a，b，c，d，e，f}，先验概率分别为P a=0.5，P b=0.25，P c=0.125，P d=Pe=0.05，P f=0.025。
消息“ababba”中所包含的信息量为（）bit，“fddfdf”所包含的信息量为（）bit。
6bit长度的消息序列信息量的期望值为（）bit。
2限失真信源编码定理指出，当信息率R与信息率失真函数R(D)满足（）关系时，只要信源序列长度L（），一定存在一种编码方法，其译码失真≤D+ε。
3一袋中有手感完全相同的3个黑球和3个白球，每次从中随机取一个球，取出的球放回袋中。
用Xi表示第i次取出的球的颜色，i=1,….,6，则H(X1)=（）bit/符号；H(X2)=（）bit/符号；H(X2/X1)=（）bit/符号。
4克劳夫特不等式为（），满足此不等式的变长码不一定是唯一可译码，因此它是唯一可译码的（）条件。
5设以8000样值/秒的速率抽样一个语音信号，每个抽样点以M=28=256级均匀量化。
且抽样值取各量化值的概率相等，且抽样间相互独立，则每抽样的信息熵为（）bit/符号，信源的信息输出率为（）bps。
6如某线性分组码的最小汉明距d min=6，其最大的检错能力为（），最多能纠正（）个错。
则线性分组码的检纠错能力与d min的关系是（）。
二判断题（本题10小题,每小题1分,共10分）（1）对于离散信源而言，条件熵总是小于无条件熵。
（）（2）互信息具有对称性，即I(U;V)=I(V;U)。
（）（3）R(D)函数是D的连续函数，也是关于D的上凸函数。
（）（4）如X可以唯一确定Y，则H(Y/X)=0。
（）（5）完备码是一种监督位得到充分利用的码。
（）（6）单符号离散信源在所有符号等概出现时，其熵值最大。
对于连续信源，也有类似的结论，连续信源均匀分布时具有最大熵。
（）（7）马尔可夫序列的联合概率具有时间推移不变性。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
南京工程学院vb题库。
试卷编号：8947所属语言：Visual Basic试卷方案：09-10-2《程序设计基础—VB》模拟试卷总分：100分共有题型：6种一、判断共5题（共计10分）第1题（2.0分）Single 和Double型用于保存浮点数,在VB中定义单精度浮点8位,双浮点16位.答案：N第2题（2.0分）当窗体的ScaleTop=0,ScaleLeft=0时,这个窗体Top和Left值也是0. 答案：N第3题（2.0分）Frame控件是一种容器控件,因此它可有它自己的坐标系.答案：N第4题（2.0分）同一Form窗体中的各控件可以相互重叠,其显示的上下层次的次序不可以调整.答案：N第5题（2.0分）move方法的一般形式是:对象名.move A,B[,C,D],其中A指Left,C 指width.答案：N二、单项选择共20题（共计40分）第1题（2.0分）下面4项中不属于面向对象系统三要素的是().A:变量B:事件C:属性D:方法答案：A第2题（2.0分）选中复选框控件时,value属性的值,可以是(). A:TrueB:falseC:0D:1答案：D第3题（2.0分）当输入4时,以下程序的输出结果是______.Private Sub Command1_Click()x=InputBox(x)If x^2<15 Then y=1/xIf x^2>15 Then y=x^2+1Print yEnd SubA:4B:17C:18D:25答案：B第4题（2.0分）保存新建的工程时,默认的路径是().A:My DocumentsB:VB98C:\D:Windows答案：B第5题（2.0分）Cls方法可清除窗体或图片框中的信息是 . A:Picture属性设置的背景图案B:在设计时放置的控件C:程序设计时产生的图形和文字D:以上方法都对答案：C第6题（2.0分）以下程序Option Base 1Private Sub Command1 _Click()Dim a%(3,3)For i=1 To 3For j=1 To 3If j＞1 And i＞1 Thena(i,j)=a(a(i-1,j-1),a(i,j-1))+1Elsea(i,j)=i*jEnd IfPrint a(I,j);"";Next jPrintNext iEnd Sub输出结果是A:1 2 32 3 13 2 3B:1 2 31 2 31 2 3C:1 2 32 4 63 6 9D:1 1 12 2 23 3 3答案：A第7题（2.0分）语句PRINT"SGN(-26)=";SGN(-26)的输出结果为().A:SGN(-26)=26B:SGN(-26)=-26C:SGN(-26)=+1D:SGN(-26)=-1答案：D第8题（2.0分）运行下面的程序: CLS LINE (100,100)-(200,50)LINE - (150,150)LINE -(100,100)屏幕上显示的是().A:三条放射形直线B:四条放射形直线C:矩形D:三角形答案：D第9题（2.0分）执行下面程序段后,变量a的值为______.For I=1 To 3For j=1 To IFor k=j To 3a=a+1Next kNext jNext IB:9C:14D:21答案：C第10题（2.0分）设x=8,y=14,z=15,以下表达式的值是x<y And (Not y>z) Or z<xA:1B:-1C:TrueD:False答案：C第11题（2.0分）要想不使用Shift和Ctrl键就能在列表框中同时选择多个项目,则应把该列表框的MultiSelect 属性设置为:A:0B:1C:2D:其他答案：B第12题（2.0分）如果要在菜单中添加一个分隔线,则应将其Caption属性设置为().A:=B:*C:&D:-答案：D第13题（2.0分）以下可以作为VB变量名的是().A:SINC:COS(X)D:X(-1)答案：B第14题（2.0分）在一个语句内写多条语句时,用来分隔每条语句的符号是(). A:,B::C:、D:;答案：B第15题（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: …Next xIf i=10 Then GoTo startD:For x=3 To 10 Step 3…Next m答案：B第16题（2.0分）要使得窗体在出现之前就完成相关的程序设置可在()事件中进行编程.A:linkopenB:KeyPressD:click答案：C第17题（2.0分）如果从数据文件 INPUT.DAT 中读取数据时,以下打开文件方式中,正确的是().A:OPEN INPUT.DAT FOR INPUT AS #1B:OPEN INPUT.DAT FOR OUTPUT AS #1C:OPEN "INPUT.DAT" FOR INPUT AS #1D:OPEN "I", #1 INPUT.DAT答案：C第18题（2.0分）当使用Line方法画直线后,当前坐标在A:(0,0)B:直线起点C:直线终点D:容器的中心答案：C第19题（2.0分）下面是()合法的单精度型变量.A:num!B:sum%C:xinte$D:mm#答案：A第20题（2.0分）如下数组声明语句:Dim a(3,-2 To 2,5),则数组a包含的元素的个数为A:120B:75C:60D:13答案：A三、程序填空共1题（共计10分）第1题（10.0分）Option Explicit'------------------------------------------------------- '【程序填空】'-------------------------------------------------------'功能：本程序实现功能：将顺序文本文件“MYFILE.TXT” 的' 内容一个字符一个字符地读入文本框txtTest中'------------------------------------------------------- Private Sub Form_Click()Dim InputData As String * 1txtTest.Text = ""'**********SPACE**********Open App.Path & "\MYFILE.TXT" For 【?】 As #1'**********SPACE**********Do While 【?】 EOF(1)Input #1, InputData'**********SPACE**********txtTest.Text = txtTest.Text + 【?】LoopClose #1End Sub答案：=======(答案1)=======Input=======(答案2)=======Not=======(答案3)=======InputData四、程序改错共1题（共计10分）第1题（10.0分）'------------------------------------------------ '【程序改错】'------------------------------------------------'题目：随机产生并输出100以内大于50的20个整数，输' 出时每5个数一行。
'------------------------------------------------ Option ExplicitPrivate Sub Form_Click()Randomize TimerDim i As Integer, ma As Integer'**********FOUND**********i = 1'**********FOUND**********Do Until i < 20ma = Rnd() * 100 \ 1If ma > 50 ThenPrint ma;i = i + 1'**********FOUND**********If i \ 5 = 0 ThenPrintEnd IfEnd IfLoopEnd Sub答案：=======(答案1)=======i = 0=======(答案2)=======Do while i < 20=========或=========Do while 20 > i=========或=========Do while i <=19=========或=========Do while 19 > =i=======(答案3)=======If i mod 5 = 0 Then五、程序设计共1题（共计20分）第1题（20.0分）'-------------------------------------------------'【程序设计】'-------------------------------------------------'题目：(事件)双击窗体。
' (响应)求3+6+9+12+15+18+……+300的和，并将结' 果输出到窗体上。
将结果存入变量 SUM中。
'-------------------------------------------------答案：----------------------Dim i As IntegerFor i = 3 To 300If i Mod 3 = 0 Thensum = sum + iEnd IfNextPrint sum----------------------六、VB窗体设计共1题（共计10分）第1题（10.0分）--------------------------------------------------------------------- 【窗体设计】---------------------------------------------------------------------要求：当用户单击窗体时，弹出对话框由用户输入任意整，提示框显示所输入整数的奇、偶性，界面提示信息如图所示。