计算机vb模拟试题
- 格式:doc
- 大小:72.50 KB
- 文档页数:5
⼀、选择题(每题2分,共计70分)1.数据的存储结构是指____。
A、存储在外存中的数据B、数据所占的存储空间C、数据在计算机中的顺序存储⽅式D、数据的逻辑结构在计算机中的表⽰A B C D2.下列关于栈的描述中错误的是:____。
A、栈是先进后出的线性表B、栈只能顺序存储C、栈具有记忆作⽤D、对栈的插⼊与删除操作中,不需要改变栈底指针A B C D3.对于长度为n的线性表,在最坏情况下,下列各排序法所对应的⽐较次数中正确的是____。
A、冒泡排序为n/2B、冒泡排序为nC、快速排序为nD、快速排序为n(n-1)/2A B C D4.对长度为n的线性表进⾏顺序查找,在最坏情况下所需要的⽐较次数为____。
A、log2nB、n/2C、nD、n+1A B C D5.下列对于线性链表的描述中正确的是____。
A、存储空间不⼀定是连续,且各元素的存储顺序是任意的B、存储空间不⼀定是连续,且前件元素⼀定存储在后件元素的前⾯C、存储空间必须连续,且前件元素⼀定存储在后件元素的前⾯D、存储空间必须连续,且各元素的存储顺序是任意的A B C D6.下列对于软件测试的描述中正确的是____。
A、软件测试的⽬的是证明程序是否正确B、软件测试的⽬的是使程序运⾏结果正确C、软件测试的⽬的是尽可能多地发现程序中的错误D、软件测试的⽬的是使程序符合结构化原则A B C D7.为了使模块尽可能独⽴,要求____。
A、模块的内聚程度要尽量⾼,且各模块间的耦合程度要尽量强B、模块的内聚程度要尽量⾼,且各模块间的耦合程度要尽量弱C、模块的内聚程度要尽量低,且各模块间的耦合程度要尽量弱D、模块的内聚程度要尽量低,且各模块间的耦合程度要尽量强A B C D8.下列描述中正确的是____。
A、程序就是软件B、软件开发不受计算机系统的限制C、软件既是逻辑实体,⼜是物理实体D、软件是程序、数据与相关⽂档的集合A B C D9.数据独⽴性是数据技术的重要特点之⼀。
vb模拟试题及答案1. 以下哪个选项是Visual Basic(VB)的编程语言?A. C++B. JavaC. PythonD. 答案:D2. 在中,以下哪个关键字用于声明一个类?A. FunctionB. ClassC. SubD. Module答案:B3. 在中,以下哪个属性用于获取或设置一个窗体的标题?A. TextB. TitleC. CaptionD. Label答案:C4. 在中,以下哪个方法用于启动一个新的线程?A. StartB. BeginInvokeC. ThreadD. Run答案:A5. 在中,以下哪个数据类型用于表示布尔值?A. BooleanB. StringC. IntegerD. Double答案:A6. 在中,以下哪个选项用于创建一个数组?A. Dim arr(5) As IntegerB. Dim arr As New Integer(5)C. Dim arr As Integer = 5D. Dim arr As Integer(5)答案:A7. 在中,以下哪个关键字用于实现继承?A. InheritsB. ImplementsC. InheritsFromD. Base答案:A8. 在中,以下哪个关键字用于捕获异常?A. TryB. CatchC. FinallyD. All of the above答案:D9. 在中,以下哪个方法用于将一个字符串转换为小写?A. ToLowerB. ToLowercaseC. LowerD. ConvertToLower答案:A10. 在中,以下哪个方法用于将一个字符串转换为大写?A. ToUpperB. ToUppercaseC. UpperD. ConvertToUpper答案:A。
VB机试模拟试卷127(题后含答案及解析)题型有:1. 基本操作题 2. 简单应用题 3. 综合应用题基本操作题(30分)1.请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。
(1)在名称为Forml的窗体上画两个文本框,其名称分别为Tcxtl和Text2,它们的高、宽分别为300、2400和1200、2400。
窗体的标题为“窗口”。
请通过属性窗口设置适当的属性满足以下要求:①Text2可以显示多行文本,且有垂直和水平两个滚动条;②运行时在Textl中输入的字符都显示为“*”。
运行后的窗体如图1-166所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。
(2)在名称为Forml的窗体上画一个图像框,名称为tmagcl,其高、宽分别为1900、1700,通过属性窗口把考生文件夹下的图像文件picl.bmp 装入图像框;再画两个命令按钮,名称分别为Cl、C2,标题分别为“放大”、“缩小”,如图1-167所示。
要求:①请编写适当的事件过程,程序运行后,如果单击“放大”按钮,则把图像框的高度、宽度均增加100;单击“缩小”按钮,则把图像框的高度、宽度均减少100。
要求程序中不得使用任何变量。
②通过属性窗口设置图像框的适当属性,使得在放大、缩小图像框时,其中的图像也自动放大、缩小。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
正确答案:第1小题【操作步骤】步骤l:新建一个“标准EXE”工程,在窗体Forml中画两个文本框,并分别设置它们的相关属性,其属性及值如表2-94所示。
步骤2:按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1:新建一个“标准EXE”工程,如表2-95在窗体中画出控件并设置其相关属性。
步骤2:打开代码编辑窗口,编写两个命令按钮的Click 事件过程。
参考代码:PriVate Sub C1_Click( ) Imagel.Width=Imagel.Width+100 Imagel.Height=Imagel.Hei.ght+100 End Sub PriVate Sub C2_Click( ) Imagel.Width=Imagel.Width一100 Imagel.Height=Imagel.Hei.ght-100 End Sub 步骤3:按要求将文件保存至考生文件夹中。
附录2 Visual Basic上机模拟试题(1~10套)上机模拟试题 1一、调试程序(程序存盘文件名Test11.frm、Test11.vbp)(40分)在磁盘上有一名为“test11.vbp”的文件(程序界面如图1所示)。
其功能为:单击图片框后,则在图片框Picture1中输出如下所示的图形。
图1该程序中存在多处错误,请调试并改正之(注意:在程序调试过程中,不能删除整个语句,添加语句也不得超过2条。
)二、编程(程序存盘文件名Test12.frm、Test12.vbp)(60分)建立一个窗体,界面如图2所示。
程序功能要求如下:1、单击“查找”按钮后,查找所有四位数中满足条件“奇数位之和与偶数位之和均为素数”的数,并显示列表框list1中。
2、统计找到的满足条件的数的个数。
3、单击“存盘”按钮,将找到的数据存入数据文件“test12out.txt”中。
4、要求编写函数来判断是否是素数。
图2上机模拟试题2一、调试程序(程序存盘文件Test21.frm、Test21.vbp)(40分)在磁盘上有一名为“test21.vbp”的文件(程序界面如图1所示)。
其功能为:当在text1中输入行数和在text2中输入起始字母后,单击命令按钮command1,则在picture1中输出图形如图1所示。
要求:在text2中只能输入一个英文字母字符(大小写均可以),否则,提示错误信息,如图2所示。
图1 图2 该程序中存在多处错误,请调试并改正之(注意:在程序调试过程中,不能删除整个语句,添加语句也不得超过2条。
)二、编程(程序存盘文件名Test22.frm、Test22.vbp)(60分)建立一个成绩查询窗体,界面如图3所示。
程序功能要求如下:图31、在Form1_Load时,打开磁盘文件“test22in.txt”读取数据,并将读入的学号和姓名分别添加进两个列表框中,同时将三门课程的考试成绩读入c,d,e三个数组中(每个数组可定义为200个元素);并默认选中第一名学生。
模拟试题一一、单选题1. VB6.0是一种面向的编程环境。
(A) 机器(B) 对象欢迎使用本资料,祝您身体健康、万事如意,阖家欢乐。
愿同学们健康快乐的成长。
早日为祖国的繁荣昌盛奉献自己的力量(C) 过程(D) 应用2. 以下关于窗体的Name属性的叙述正确的是。
欢迎使用本资料,祝您身体健康、万事如意,阖家欢乐。
愿同学们健康快乐的成长。
早日为祖国的繁荣昌盛奉献自己的力量(A) 窗体的Name属性可以为空(B) 窗体的Name属性是显示在窗体标题栏中的文本(C) 可以在运行期间改变窗体的Name属性欢迎使用本资料,祝您身体健康、万事如意,阖家欢乐。
愿同学们健康快乐的成长。
早日为祖国的繁荣昌盛奉献自己的力量(D) 窗体的Name属性指定窗体的名称,用来标识一个窗体3. 若要使命令按钮不可操作,要对属性进行设置。
(A) EnabIed (B)Visible(C) Backcolor (D)Caption4. 如果在窗体上已经创建了一个文本框对象TextI,可以通过事件获得输入键值的ASCII码。
(A) Change (B) LostFocus(C) KeyPress (D) GotFocus5. 下面是合法的变量名。
(A) pi (B)π(C) print (D) a+k6. 表达式Int(10*Rnd)产生的随机数的范围是。
(A) [1,9] (B) [1,10](C) [0,10] (D) [0,9]7. 为了给x、y、z三个变量赋初值1,下面正确的赋值语句是。
(A) x=1:y=1:z=1 (B) x=1,y=1,z=1(C) x=y=z=1 (D) xyz=18. VB提供了结构化程序设计的三种基本结构,三种基本结构是。
(A)递归结构、选择结构、循环结构(B)选择结构、过程结构、顺序结构(C)过程结构、输入输出结构、转向结构(D)选择结构、循环结构、顺序结构9. 当VB执行下面语句后,变量a的值为。
VB笔试模拟试卷190(题后含答案及解析)题型有:1. 选择题 2. 填空题选择题(每小题2分,共70分)下列各题A、B、C、D四个选项中,只有一个选项是正确的,请将正确选项涂写在答题卡相应位置上。
1.启动Visual Basic后,就意味着要建立一个新( )。
A.窗体B.程序C.工程D.文件正确答案:C2.Visual Basic集成环境的大部分窗口都可以从主菜单项( )的下拉菜单中找到相应的打开命令。
A.编辑B.视图C.格式D.调式正确答案:B3.下列程序段的执行结果为( )。
x=1:y=2 z=x=y Print x;y;zA.1 1 2B.1 1 1C.False FalseD.1 2 False正确答案:D4.货币型数据需( )字节内存容量。
A.2B.4C.6D.8正确答案:D5.有关VB应用程序中过程的说法正确的是( )。
A.过程的定义可以嵌套,但过程的调用不能嵌套B.过程的定义不可以嵌套,但过程的调用可以嵌套C.过程的定义和调用都可能嵌套D.过程的定义和调用都不能嵌套正确答案:B6.下列程序段的执行结果为( )。
a=0:b=1 Do a=a+b b=b+1 Loop Whilea<10 Print a;bA.105B.abC.01D.1030正确答案:A7.表达式12000+”129”&200的值是( )。
A.12329B.12129200C.12000129200D.12329正确答案:B8.将任意一个正的两位数N的个位数与十位数对换的表达式为( )。
A.(N-Int(N/10)*10)*10+Int(N/10)B.N-Int(N)/10*10+Int(N)/10C.Int(N/10)+(N-Int(N/10))D.(N-Int(N/10)*10+Int(N/10)正确答案:A9.使标签所在处显示背景,应把BackStyle属性设置为( )。
A.0B.1C.TreeD.False正确答案:A10.表达式X+1>X是( )。
一、选择题1.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()For n = 1 To 20If n Mod 3<> 0 Then m = m + n \ 3Next nPrint nEnd Sub程序运行后,如果单击命令按钮,则窗体上显示的内容是______。
A.18B.15C.21D.242. 假定一个Visual Basic应用程序由一个窗体模块和一个标准模块构成。
为了保存该应用程序,以下正确的操作是。
A. 只保存工程文件B. 分别保存窗体模块、标准模块和工程文件C. 只保存窗体模块和标准模块文件D. 只保存窗体模块文件3. 以下关于图片框控件的说法中,错误的是______。
A. 图片框控件可以作为容器使用B. 清空图片框控件中图形的方法之一是加载一个空图形C. 可以通过Print方法在图片框中输出文本D. 用Stretch属性可以自动调整图片框中图形的大小4. 下列程序段的执行结果为______。
A = 0:B = 0For I = -1 To -2 Step -1For J = 1 To 2B = B + 1Next JA = A + 1Next IPrint A; BA. -2 2B. 2 3C. 2 4D. 4 25. 设置复选框中或单选按钮的标题对齐方式的属性是______。
A. AlignmentB. StyleC. SortedD. Align6. 通过以下______窗口可以在设计时直观的调整窗体在屏幕上的位置。
A. 代码窗口B. 属性窗口C. 窗体设计窗口D. 窗体布局窗口7. 在窗体上画2个命令按钮,名称分别为Command1、Command2,并编写如下程序Const n=5,m=4Dim a(m,n)Private Sub Command1_Click()k=1For i=1 To mFor j=1 To na(i,j)=kk=k+1Next jNext iEnd SubPrivate Sub Command2_Click()summ=0For i=1 To mFor j=1 To nIf i=1 Or i=m Thensumm=summ+a(i,j)ElseIf j=1 Or j=n Thensumm=summ+a(i,j)End IfEnd IfNext jNext iPrint summEnd Sub过程Command1_Click()的作用是在二维数组a中存放1个m行n列的矩阵;过程Command2_Click()的作用是______。
全国计算机二级VB模拟试题及答案全国计算机二级VB模拟试题及答案计算机二级考试是全国计算机等级考试(National Computer Rank Examination,简称NCRE)四个等级中的一个等级,考核计算机基础知识和使用一种高级计算机语言编写程序以及上机调试的基本技能。
那么全国计算机二级VB考试怎么考?以下仅供参考!1.在待排序的元素序列基本有序的前提下,效率最高的排序方法是(C)A)冒泡排序B)选择排序C)快速排序D)归并排序2.非空的循环单链表head的尾结点(由p所指向),满足(A)A)p->next==NULLB)p==NULLC)p->next=headD)p=head3.线性表的顺序存储结构和线性表的链式存储结构分别是(C)A)顺序存取的存储结构、顺序存取的存储结构B)随机存取的存储结构、顺序存取的存储结构C)随机存取的存储结构、随机存取的存储结构D)任意存取的存储结构、任意存取的存储结构4.结构化程序设计所规定的三种基本控制结构是(D)A)输入、处理、输出B)树形、网形、环形C)顺序、选择、循环D)主程序、子程序、函数5.下列不属于软件调试技术的是(D)A)强行排错法B)集成测试法C)回溯法D)原因排除法6.软件生命周期中花费时间最多的阶段是(B)A)详细设计B)软件编码C)软件测试D)软件维护7.软件设计中,有利于提高模块独立性的一个准则是(A)A)低内聚低耦合B)低内聚高耦合C)高内聚低耦合D)高内聚高耦合8.数据库的故障恢复一般是由(D)A)数据流图完成的B)数据字典完成的C)DBA完成的D)PAD图完成的9.下列关系运算的叙述中,正确的是(B)A)投影、选择、连接是从二维表行的方向进行的运算B)并、交、差是从二维表的列的方向来进行运算C)投影、选择、连接是从二维表列的方向进行的运算D)以上3种说法都不对10.在关系数据库中,对一个关系做投影操作后,新关系的元组个数将(A)A)等于原来关系中的'元组个数B)大于原来关系中的元组个数C)小于原来关系中的元组个数D)不能确定元组个数11.以下不具有Picture属性的对象是(B)A)窗体B)图片框C)图像框D)文本框12.双击窗体中的对象后,Visual Basic将显示的窗口是(D)A)项目(工程)窗口B)工具箱C)代码窗口D)属性窗口13.若要将窗体从内存中卸载,其实现的方法是(A)A)ShowB)UnLoadC)LoadD)Hide14.要使目录列表框(名称为Dirl)中的目录随着驱动器列表框(名称为Drivel)中所选择的当前驱动器的不同而同时发生变化,则应:(A)A)在Dirl中的Change事件中,书写语句 Dirl.Drive=Drivel.DriveB)在Dirl中的Change事件中,书写语句 Dirl.Path=Drivel.DriveC)在Drivel中的Change事件中,书写语句Dirl.Path=Drivel.DriveD)在Drivel中的Change事件中,书写语句Dirl.Drive=Drivel.Drive15.设有如下声明:Dim x As Integer如果Sgn(x)的值为-1,则表示x的值是(A)A)整数B)大于0的整数C)等于0的整数D)小于0的数16.下述说法不正确的是(B)A)变量名的长度不能超过255个字符B)变量名可以包含小数点或者内嵌的类型声明字符C)变量名不能使用关键字D)变量名的第一个字符必须是字母17.下列可作为Visual Basic变量名的是(A)A)FilenameB)A(A+B)C)A%DD)Print18.语句Print Sgn(-6^2)+Abs(-6^2)+Int(-6^2)的输出结果是(BD)A)-36B)1C)-1D)-7219.下面说法中,不正确的是(D)A)Cls清除由Print方法显示的文本或在图片框中显示的图形,并把光标移到对象的左上角(0,0)B)当前窗体是用Picture属性装入的图形时,也可以用Cls方法清除C)Move方法用来移动窗体和控件,并改变其大小D)Cls方法中的对象,可以是窗体或图片框,如果省略则清除当前窗体中显示的内容20.假定在图片框Picturel中装入了一个图形,为了清除该图形(注意,清除图形,而不是删除图片框),应采用的正确方法是(D)A)选择图片框,然后按Del键B)执行语句 Picturel.picture=LoadPicture("")C)执行语句 Picturel.picture=""D)选择图片框,在属性窗口中选择Picture属性条,然后按回车键21.线性表L=(a1,a2,a3,…ai,…an),下列说法正确的是(D)A)每个元素都有一个直接前件和直接后件B)线性表中至少要有一个元素C)表中诸元素的排列顺序必须是由小到大或由大到小D)除第一个元素和最后一个元素外,其余每个元素都有一个且只有一个直接前件和直接后件22.设树T的度为4,其中度为1,2,3,4的结点个数分别为4,2,1,1。
模拟试题二一、单选题1. 以下关于Visual Basic 特点的叙述中,错误的是 。
(A) 构成Visual Basic 程序的多个过程没有固定的执行顺序 (B) Visual Basic 程序只能编译运行(C) Visual Basic 是采用事件驱动编程机制的语言(D) Visual Basic 是结构化程序,具备结构化程序的三种基本结构 2. 有程序代码如下:Tex1.Text=" Tex1.Text "则Tex1、Text 、" Tex1.Text "分别代表 。
(A) 对象、值、属性 (B) 对象、方法、属性(C) 对象、属性、值 (D) 属性、对象、值 3. 下面关于对象的描述中, 是错误的。
(A) 在Visual Basic 中,对象所能响应的事件是由系统定义的(B) 对象的任何属性既可以通过“属性”窗口设定,也可以通过程序语句设定 (C) Visual Basic 中允许不同对象具有相同属性和方法 (D) Visual Basic 中的对象具有自己的属性和方法 4. 任何控件共同具有的是 属性。
(A) Text (B) Name (C) ForeColor (D) Caption5. 与数学表达式cd ab3对应 ,不正确的VB 算术表达式是 。
(A) a*b/(3*c*d) (B) a/3*b/c/d (C) a*b/3/c/d (D) a*b/3*c*d 6. InputBox 函数返回值的类型是 。
(A) 整型数值 (B) 字符串 (C) 变体 (D ) 数值或字符串 7. 下面正确的赋值语句是 。
(A) x+y=30 (B) y= *r*r (C) y=x+30 (D) 3y=x 8. 下面程序段运行后,显示的结果是 。
Dim x If x Then Print x Else Print x+1(A)l (B)O (C)-1 (D)显示出错信息9. 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程,程序运行后,如果在“输入”对话框中输入3,则窗体上显示的是 。
Vb答案第一套1 在名称为FORM1 的窗体上放置一个名为TEXT1 的文本框控件和一个名为TIMER1的计时器控件,请设置计时器的适当属性并且编写适当的事件过程,使得程序运行后,文本框中显示的是当前的时间,而且每一秒文本框中所显示的时间都会随时间的变化而改变。
(如示例所示)*****注意:程序中不得使用任何变量,只能写一条语句;保存时必须存放在考生文件夹下,窗体文件名为SJT1.FRM,工程文件名为SJT1.VBP。
Private Sub Timer1_Timer()Text1.Text = TimeEnd Sub2 在窗体FORM1上画一个组合框,名称为CBO1,有“长跑”、“游泳”、“跳远”三个可供选择项。
再画一个命令按钮,名称为CMD1,标题为“确定”。
编写适当的事件过程,使得程序运行时,选择组合框中的某项,单击命令按钮后,就会弹出一个消息框,内容为“您选择了(某项)”如[示例]。
注意:1)程序中不得使用任何变量。
2)保存时必须存放在考生文件夹下,窗体文件名为SJT2.FRM,工程文件名为SJT2.VBPPrivate Sub Cmd1_Click()MsgBox "您选择了" & CBO1.TextEnd Sub3 在考生文件夹中有文件SJT3.VBP及其窗体文件SJT3.FRM,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即'号),但不能修改其它部分。
存盘时不得改变文件名和文件夹。
本题描述如下:在窗体上画一个名称为TEXT1的文本框,小四号字,再画两个名称分别为CH1和CH2,标题分别为"C 程序设计"和"VB程序设计"的复选框,小四号字,一个名称为C1,标题为"确定"的命令按钮。
编写适当的事件过程,要求程序运行后,如果只选中CH1,然后单击"确定"命令按钮,则在文本框中显示"学习C程序设计";如果只选中CH2,然后单击"确定"命令按钮,则在文本框中显示"学习VB程序设计";如果同时选中CH1和CH2,然后单击"确定"命令按钮,则在文本框中显示"学习C程序设计VB程序设计"。
一、单选题(本大题共25题,每题2分,共50分)1、不属于VB三种工作模式的是()。
A.设计模式B.运行模式C.调试模式D.中断模式2、窗体的前景颜色由()属性设置。
A.BorderStyleB.BackColorC.ForeColorD.FillStyle3、当窗体被启动时,()事件将会发生。
A.LoadB.UnloadC.QueryUnoadD.CLs4、每个窗体对应一个窗体文件,窗体文件的扩展名是()。
A..basB.clsC.frmD.vbp5、可用来清除窗体内容的方法是()。
A.PrintB.InputBoxC.ClsD.Clear6、下列语句有语法错误的是()。
A.a=5B.b=aC.b=“a”D.5=a7、表达式1+((2+3)*2)*2的值是()。
A.26B.22C.21D.248、产生大于等于10且小于20的随机整数的表达式为()。
A.Int(Rnd(10)+10)B.Int(Rnd*10+10)C.Int(Rnd*10+11)D.Int(Rnd*20-10)9、求字符串长度的函数是()。
A.LenB.longC.LengthD.Val10、若要使定时器暂停,应将其()属性设置值设为False。
A.IntervalB.ValueC.TextD.Enabled11、下列可作为Visual Basic的变量名的是()。
A.AbtB.TAC.IFD.A[B]T12、VB中可用()语句产生一消息框。
A. InputBoxB.ShiftC. BothD.MsgBox13、以下程序段的输出结果是()Print Format(12345.6,"0.00E+00")A.1.23E+04B.1.23E+4C.1.23456E+04D.1.23456E+414、执行下面的语句后,所产生的信息框的标题是()。
a = MsgBox("AAAA", "BBBB", "", 5)A.BBBBB.空C.AAAAD.出错,不能产生信息框15、以下程序段的输出结果是()。
Print 1;2;Print 3A.1 2 3B.1 23C.123D.12 316、下列关于Do While …Loop和Do…Loop Until循环执行循环次数的描述正确的是()。
A.Do While …Loop循环和Do…Loop Until循环至少都执行一次B.Do While …Loop循环和Do…Loop Until循环可能都不执行C.Do While …Loop循环至少执行一次和Do…Loop Until循环可能不执行循环D.Do While …Loop循环可能不执行和Do…Loop Until循环至少执行一次17、默认条件下,语句Dim a(3,4,5)定义的数组中所包含的数组元素的个数是()。
A. 12B.60C.120D.34518、数学关系3≤x<10对应的Visual Basic表达式是()。
A. 3<=x<10B.3<=x AND x<10C.x>=3 OR x<10D. 3<=x AND <1019、设a=5,则执行x=IIf(a>6,-1,0)后,x的值为()。
A.5B.6C.0D.-120、在运行时,若要获得文本框中所选的文本的起始位置,可通过访问()属性来实现。
A.SelStartB.SelLengthC.TextD.SelText21、以下关于数组的说法,不正确的是()。
A.数组是一种特殊的数据类型B.一个数组中可存放多种类型的数组C.数组是一组相同类型的变量的集合D.运行时可改变动态数组或静态数组的大小22、已知A(1)=1,A(2)=2,A(3)=3,则A(A(3)-A(1))=( )。
A.0B.1C.2D.323、以下程序段的输出结果是()。
N=13: a=2m=n mod 10Select Case mCase is<0: a= -1Case is=0: a=0Case is>0: a=1End selectPrint aA.-1B.0C.1D.224、假定有以下程序段AFor I=1 to 3For j=5 to 1 step –1Print I*jNext j,I则语句Print I*j的执行次数是()。
A.15B.16C.17D.1825、关于条件语句,下列说法错误的是()。
A.条件语句中的“条件”可以是逻辑表达式或关系表达式B.条件语句中的“条件”可以是数值表达式,非0值表示true,0值表示falseC.在块结构条件语句中,“语句块”中的语句不能与then在同一行上D.块结构的条件语句和单行结构的条件语句都必须以End if结束二、填空题(本大题共8题,每题2分,共16分)1、具有特殊属性和行为方法的一个可视化实体称为()。
2、设x=4,y=8,z=7,表达式x<y And (Not y>z) Or z<x的值是()。
3、欲使某命令按钮失效,应修改命令按钮的( )属性。
4、声明单精度常量P1代表3.14159的语句为()。
5、执行下列程序段,x的值为()。
x=5For i=1 to 20 Step 2x=x+i\56、已知文本框的内容为“ABCDE”,若文本框Selstart=4,Sellength=2,则SelText为()。
7、表示x是5的倍数或是9的倍数的逻辑表达式为( )。
8、End Sub设x的初值为-5,则由下列循环语句控制的循环次数是()。
Do While x>=5x=x-1Loop三、程序填空题(本大题共2题,每题4分,共8分)1、输入某班45名同学的数学成绩,并计算该班数学成绩的总分,平均分。
Private Sub Command1_Click( )Dim score(1 To 45) As SingleDim i As Integer, sum As SingleDim aver As Single, str1 As Stringsum = 0For i = 1 To 45str1 = "请输入第" + Str(i) + "个同学的成绩:"score(i) = ( )(InputBox(str1, "输入成绩"))sum = ( )Next iaver = sum / 45Label1.Caption = Label1.Caption + Str(sum)Label2.Caption = Label2.Caption + Str(aver)End Sub2、如果我国工农业生产值每年以12%增长率递增,问多少年后产值翻一番?Dim x As IntegerDim y As Singlex = 0: y = 1Doy = y * 1.12( )Loop Until ( )Print x; "年后产值翻一番"四、程序阅读(本大题共2题,每题3分,共6分)1、有3*3的矩阵,写出下列程序的功能。
s = 0For i = 1 To 3For j = 1 To 3If i = j Thens = s + a(i, j)End IfNext jNext iPrint s2、在窗体上有一个文本框控件,名称为TxtTime;一个计时器控件,名称为Timer1。
程序如下,写出程序Private Sub Timer1_Timer ()TxtTime.text=Now()End Sub五、编程题(本大题共3题,共20分)1、求n!,n由键盘输入。
n值由text1文本框输入,结果由text2文本框输出。
(6分)2、输出九九乘法表。
(7分)3、设计一个口令检测程序,界面如下图,当用户输入的口令正确时,显示“恭喜!,您已成功进入本系统”,否则,显示,“口令错!,请重新输入”。
如果连续两次输入了错误口令,在第三次输入完口令后则显示一个消息框,提示“对不起,您不能使用本系统”,然后退出整个应用程序。
(7分)一、单选题(本大题共25题,每题2分,共50分)1、C2、C3、A4、C5、C6、D7、C8、B9、A 10、D11、A 12、D 13、A 14、D 15、A16、D 17、C 18、D 19、C 20、A21、D 22、C 23、C 24、A 25、D二、填空题(本大题共8题,每题2分,共16分)1、对象2、FALSE3、Enabled4、Const PI=3.141595、216、DE7、x mod 5=0 OR x mod 9=0 8、0三、程序填空题(本大题共2题,每题4分,共8分)1、Val sum + score(i)2、x = x + 1 y >= 2四、程序阅读(本大题共2题,每题3分,共6分)1、输出对角线上的元素之和。
2、每一秒钟在文本框中显示一次当前的时间。
五、编程题(本大题共3题,共20分)1、求n!,n由键盘输入。
n值由text1文本框输入,结果由text2文本框输出。
(6分)Private Sub command1_click()Dim n as integer,f as long 1分n=text1.text 1分f=1 1分for I=1 to n 1分f=f*I 1分next Itext2.text=f 1分end sub2、输出九九乘法表。
(7分)Private Sub Command1_Click()For I = 1 To 9For j = 1 To IPrint I & "*" & j & "="; I * j;Next jPrintNext IEnd Sub3、(7分)Private Sub Text1_KeyUp(KeyCode As Integer, _ Shift As Integer)Static I As Integer ' 保存输入错误口令的次数If KeyCode = 13 Then ' 如果按下的键为回车键If UCase(Text1.Text) = "HELLO" ThenLabel2.Caption = "恭喜!,您已成功进入本系统"ElseIf I = 0 Or I = 1 ThenI = I + 1Label2.Caption = "口令错!,请重新输入"Text1.SelStart = 0Text1.SelLength = Len(Text1.Text)ElseMsgBox "对不起,您不能使用本系统": EndEnd IfEnd IfEnd Sub。