【vb】大一期末考试试题vb[1]

合集下载

VB(1)期末考试内容

VB(1)期末考试内容

VB(1)期末考试内容原题⾼⼆年级VB期末试卷⼀、单选题1、可以在窗体上输出数据的⽅法的是()A、PrintB、ClsC、ShowD、Hide2、下列说法中错误的是()A、对象是具有某些特性的具体事物的抽象B、在VB程序中,窗体(Form)不是对象C、属性是对象所具有的特征D、事件是发⽣在对象上且能被对象识别的动作3、数据:“abcde”是()数据A、整型B、长整型C、字符型D、⽇期型4、以下各项中,可以作为VB变量名的是()A、13B、 Stu23C、22abD、cj98.35、以下各项中,不能作为VB变量名的是()A、A52BB、ifC、Y_5D、Pi6、InputBox函数返回值的类型为()A、数值B、字符串C、变体D、数值或字符串(视输⼊的数据⽽定)7、表达式5 <> 2 Or 6<7的值是()A、TureB、FalseC、-1D、18、数学式sin30°写成VB表达式是()A、Sin30B、Sin(30)C、Sin(30°)D、Sin(30*3.14/180)9、决定控件上⽂字的字体、字形、⼤⼩、效果的属性是()A、TextB、CaptionC、NameD、Font10、设a、b、c为整型变量,其值分别为1、2、3,以下语句的输出结果是() Print a;b;cA.1 2 3B.2 3 1C.3 2 1D.2 3 211、Visual Basic程序中的注释所使⽤的字符是()A、'B、:C、\D、_12、若要求从⽂本框中输⼊密码时在⽂本框中只显⽰ * 号,则应在此⽂本框的属性窗⼝中设置()。

A、Text 属性值为 *B、Caption 属性值为 *C、Password 属性值为空D、Passwordchar 属性值为 *13、表达式“XYZ” + “487”的值是()A、“XYZ487”B、“XYZ”C、“487”D、“487XYZ”14、下⾯语句中,正确的是()A、If x<3*y And x>y Then y=x^3B、If x<3*y And x>y Then y=3xC、If x<3*y : x>3 Then y=x^3 C、If x<3*y : x>y Then y=x**315、下列程序段的执⾏结果为()X=2Y=5If X*Y<1 Then Y=Y-1 Else Y=-1Print Y-X>0A、TureB、FalseC、-1D、116、下列关于visual basic特点的描述,哪个是正确的()A、⾯向对象B、可视化C、事件驱动D、以上都是17、为了使标签中的内容靠右显⽰,应将alignment属性设置为()A、0B、1C、2D、3⼆、填空题(2分×9,共18分)1、布尔型数据只有________和________两个值。

计算机程序设计-VisualBasic【VB】考试试题(1)

计算机程序设计-VisualBasic【VB】考试试题(1)

A、 AutoSize B、 Visible C、 Enabled D、 WordWrap 正确答案: A 解析:
42、当文本框的 MaxLength 属性值取________时,该文本框能容纳的字符数最多。
A、 256 B、 512 C、 0 D、 -1 正确答案: C 解析:
43、在一行语句内写多条语句时,每个语句之间用_____ ___符号分隔。
A、 ; B、 : C、 , D、 、 正确答案: B 解析:
44、结构化程序由三种基本结构组成,下面术语中是三种基本结构之一的是______ _。
A、 递归结构 B、 选择结构 C、 输入输出结构 D、 过程结构 正确答案: B 解析:
45、在默认情况下,InputBox() 函数返回值的类型为______ __。
8、下列关于 VB 编程的说法中,不正确的是( )。
A、 事件是能被对象识别的动作 B、 方法指示对象的行为 C、 属性是描述对象特征的数据 D、 VB 程序采用的运行机制是面向对象 正确答案: D 解析:
9、下面所列符号中,_________不是数据类型说明符。
A、 !
B、 % C、 ? D、 # 正确答案: C 解析:
A、 0.01*Int(100*(x+0.005)) B、 0.01*Int(x+0.005) C、 0.01*Int(100*(x+0.05)) D、 0.01*Int(x+0.05) 正确答案: A 解析:
24、从字符串变量 Cstr 中取左边 4 个字符,应使用________。
A、 Left(Cstr,4) B、 Left(Cstr,1,4) C、 Mid(Cstr,3,4) D、 Mid(Cstr,4,3) 正确答案: A 解析:

VB选择题

VB选择题

《VB》期末考试选择题复习(共180题)1. Visual Basic集成开发环境中不包括下列哪些窗口( )。

A、工具箱窗口B、工程资源管理器窗口C、属性窗口D、命令窗口参考答案是:D2. 在设计应用程序时,通过( )窗口可以查看到应用程序工程中的所有组成部分。

A、代码窗口B、窗体设计窗口C、属性窗口D、工程资源管理器窗口参考答案是:D3. 在正常安装Visual Basic6.0后,可以通过多种方式启动Visual Basic。

以下方式中不能启动Visual Basic的是:( )。

A、通过“开始”菜单中的“程序”命令B、通过“我的电脑”找到vb6.exe,双击该文件名C、通过“开始”菜单中的“运行”命令D、进入DOS方式,执行vb6.exe文件参考答案是:D4. Visual Basic 6.0工程文件的扩展名是( )。

A、.vbpB、.frmC、.basD、.cls参考答案是:A5. Visual Basic6.0是面向( )的程序设计语言。

A、过程B、工程C、事件D、对象参考答案是:D6. 下列关于 Visual Basic编程特点的叙述中,错误的是( )。

A、Visual Basic 是采用事件驱动编程机制的语言B、构成 Visual Basic 程序的多个过程没有固定的执行顺序C、Visual Basic 程序既可以编译运行,也可以解释运行D、Visual Basic 程序不是结构化程序,不具备结构化程序的 3 种基本结构参考答案是:D7. Visual Basic 6.0集成开发环境有三种工作状态,不属于三种工作状态之一的是( )。

A、设计状态B、编写代码状态C、运行状态D、运行状态参考答案是:B8. 在Visual Basic 6.0中要获取上下文相关帮助,只需将光标定位在相应位置,再按( )键即可。

A、F1B、F2C、F3D、F4参考答案是:A9. Visual Basic 6.0集成开发环境的主窗口中不包括( )。

大学VB期末考试题库终极版绝对全

大学VB期末考试题库终极版绝对全

一、单项选择题1、与传统的程序设计语言相比,Visual Basic最突出的特点是(C)。

A、结构化程序设计B、程序开发环境C、事件驱动编程机制D、程序调试技术2、赋值语句:a=123 & MID("123456",3,2)执行后,a变量中的值是(C)。

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、为了装入一个Visual Basic应用程序,应当(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、Visual Basic 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)属性进行设置。

vb期末考试题和答案

vb期末考试题和答案

vb期末考试题和答案1.在代码中引用一个控件时,应使用控件的( b )属性。

A.Caption B.Name C.Text D.Index2.设变量x = 4,y = -1,a = 7,b = -8,下面表达式( a )的值为“假”。

A.x+a<= b-y B. x> 0 AND y < 0C.a = b OR x>y D.x+y>a+b AND NOT (y < b)3.表达式Int(Rnd*71)+10产生的随机整数范围是( c )。

A.(10,80) B.(10,81) C.[10,80] D.[10,81]4.函数Sgn(3.1416)的返回值是( c )。

A.-1 B.0 C.1 D.以上都不对5.67890属于( d )类型数据。

A.整型 B.单精度浮点数 C.货币型 D.长整型6.下列变量名中正确的是( d )。

A.3S B.Print C.Select My Name D.Select_17.下列赋值语句( a )是有效的。

A.sum = sum-sum B.x+2 = x + 2 C.x + y =sum D.last = y / 08.以下的控件或方法具有输入和输出双重功能的为( b )。

A.Print B.Textbox C.Optionbutton D.Checkbox 9.若要获得列表框中被选中的列表项的内容,可以通过访问( d )属性来实现。

A.Name B.ListIndex C.ListCount D.Text10.下列代码的运行结果为( b )。

Private Sub command1_click()Dim m(10)For k = 1 To 10m(k) = 11 - kNext kx = 5Print m(2 + m(x))End SubA.2 B.3 C.4 D.5二、填空题(10分)1.写出整数n能同时被13和17整除的Basic表达式: n Mod 13=0 And n Mod17=0 。

VB试题(选择、填空)

VB试题(选择、填空)

一,选择题1、如果VB环境中缺少某个窗口,一般应从主菜单__C____的下拉菜单中找到相应的激活命令。

(1分)A、编辑B、文件C、视图D、调试2、启动Visual Basic后,VB为用户建立的第一个窗体是__B____。

(1分)A、FormB、Form1C、窗体1D、窗体3、不属于一个工程文件(*.vbp)里的文件是____A__。

(1分)A、*.txt文件B、*.bas文件C、*.cls文件D、*.frm文件4、与传统的程序设计语言相比较,Visual Basic最突出的特点是__C____。

(1分)A、结构化的程序设计B、数据处理C、面向对象的可视化编程D、中文支持5、文本框中的ScrollBars属性已设置为3-Both,但却没有水平和垂直滚动条的效果,原因可能是___B___。

(1分)A、文本框中没有内容B、文本框的MultiLine属性为FalseC、文本框的MaxLength属性为0D、文本框的Locked属性是True6、能够盛放其他控件,而且是最基本的对象是___A___。

(1分)A、窗体B、图像C、标签D、文本7、任何控件都具有的属性是____C__。

(1分)A、PictureB、CaptionC、NameD、AutoSize8、窗体上有一个标签Label1和一个命名按钮Command1,当程序运行时每单击一次命令按钮,标签就向右移动一定距离。

在Command1_Click()中能完成这个功能的命令为___D___。

(1分)A、Label1.Left = 100B、Label1.Left = Label1.Left - 100C、Label1.Move 100D、Label1.Move Label1.Left + 1009、要把一个Image控件对象设置成隐藏,应设置的属性是___A___。

(1分)A、VisibleB、EnabledC、DefaultD、Cancel10、以下___B___是正确的For …Next结构。

VB考试1选择题

VB考试1选择题

VB考试1选择题1.以下程序段运⾏的结果是:__35____。

Dim a(-1 To 5) As BooleanDim flag As Booleanflag = FalseDim i As IntegerDim j As IntegerDo Until flag = TrueFor i = -1 To 5j = j + 1If a(i) = False Thena(i) = TrueExit ForEnd IfIf i = 5 Thenflag = TrueEnd IfNextLoopPrint j2.在窗体上画⼀个命令按钮(名称为Command1),编写如下事件过程:Private Sub Command1_Click()b = 5c = 6Print a = b + cEnd Sub程序运⾏后,单击命令按钮,输出的结果是:_false_____。

3.表达式4+5\6*7/8 Mod 9的值是___5___。

4下列可作为Visual Basic变量名的是___contA___。

5.在窗体上画⼀个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()x=InputBox("Input")Select Case xCase 1,3Print "分⽀ 1"Case Is >4Print "分⽀ 2"Case ElsePrint "Else 分⽀"End SelectEnd Sub程序运⾏后,如果在输⼊对话框中输⼊2,则窗体上显⽰的是_Else 分⽀_____。

6.执⾏如下语句:a = InputBox("Today","Tomorrow","Yesterday",,,"Day before yesterday",5)将显⽰⼀个对话框,在对话框的输⼊区中a显⽰的信息是__ Yesterday ____。

VB程序设计考试(1)

VB程序设计考试(1)

VB程序设计考试(1)一、单选题(每题1分,共50题)1.Visual Basic 6.0集成环境的主窗口中不包括( C )。

正确A.标题栏B.菜单栏C.状态栏D.工具栏2.以下不属于Visual basic的工作模式的是()模式。

正确答案:AA.编译B.设计C.运行D.中断3.如果文本框的Enabled属性被设置为False,则运行时()。

正确答案:AA.文本框中的文本将变成灰色,并且此时用户不能将光标置于文本框上B.文本框中的文本将变成灰色,用户仍然能将光标置于文本框上,但是不能改变文本框中的内容C.文本框中的文本将变成灰色,用户仍然能改变文本框中的内容D.文本框的文本正常显示,用户能将光标置于文本框上,但是不能改变文本框中的内容4.控制名称都是系统的默认控件名,下列语句错误是()。

正确答案:Dmand1.Caption=List1.Text;bel1.Caption=List1.List(1);C.List1.List(2)=List1.Text+Str(List1.ListIndex);D.Text1.Text=+Text1.Caption。

5.以下叙述中正确的是()。

正确答案:A属性用来标识对象B.窗体Name属性值显示在标题栏中C.运行时对象Name属性可变D.对象的Name属性值可以为空6.Abc%,abc!,abc$,abc#分别声明abc是()。

正确答案:AA.整型、单精度、字符串、双精度变量B.整型、整型、字符串、双精度变量C.单精度、整型、字符串、双精度变量D.整型、双精度、字符串、双精度变量7.Visual Basic的逻辑类型数据占( A )字节内存。

正确A.2B.4C.8D.168.如果逻辑与(AnD)运算的结果为真,与它所连接的两个条件必须是( C )。

正确A.前一个为真,后一个为假B.前一个为假,后一个也为假C.前一个为真,后一个也为真D.前一个为假,后一个为真9.设a=6,则执行 x=iif(a>5,-1,0)后,x 的值为( D )。

VB期末考试试卷及答案

VB期末考试试卷及答案

VB期末考试试卷及答案一·选择题1。

Visual Basic是一种面向对象的程序设计语言,构成对象的三要素是(B ) A属性、控件和方法B属性、事件和方法C窗体、控件和过程 D控件、过程和模块2。

所有控件都有一个共同的属性,这个属性是(C )A textB fontC nameD caption3。

下列叙述中错误的是(A )A 工程文件扩展名是。

vbgB 标准模块文件的扩展名是.basC 窗体模块的扩展名是.frmD 类模块的扩展名是.cls4. 当要编写一个新的Visual Basic程序时,所做的第一件事是(A )A 新建一个工程B 编写代码C 设置属性D 添加Active X控件5. 下面控件中,没有caption属性的是(B )A 框架B 组合框C 命令按钮D 复选按钮6。

在文件框中输入字符时,若只显示某个字符,如(*),应设置属性是(B )A MultiLineB PasswordCharC TextD selText7。

若要将窗体从内存中卸载出去,其实现的方法是( D )A ShowB HideC LoadD UnLoad8. 下列关于过程叙述不正确的是(D )A 过程的传值调用是将实参的具体值传值传递给形参B 过程的传址调用是将实参在内存的地址传递给形参C 过程的传值调用参数是单向传递的,过程的传址调用参数是双向传递的D 无论过程传值调用还是传地址调用,参数传递都是双向的9. 某人创建1个工程,其中的窗体名为Form1,之后又添加了1个名为Form2的窗体,并希望程序执行时先显示Form2窗体,那么,他需要做的工作是(C )A 在Form1的Load事件过程中加入语句Load Form2B 在Form2的Load事件过程中加入语句Form2.ShowC 在“过程属性”对话框中把“启动对象”设置为Form2D 在Form2的TabIndex属性设置为1,把Form1的TabIndex属性设置为210。

vb考题 (1)

vb考题 (1)

VB 期末复习一、选择题(1) 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Move 500,500End Sub程序运行后,单击命令按钮,执行的操作为A) 命令按钮移动到距窗体左边界、上边界各500的位置B) 窗体移动到距屏幕左边界、上边界各500的位置C) 命令按钮向左、上方向各移动500D) 窗体向左、上方向各移动500(1) B(2) 在窗体上有若干控件,其中有一个名称为Text1的文本框。

影响Text1的Tab 顺序的属性是A) TabStop B)Enabled C) Visible D)TabIndex(2) D(3) 下列语句合法的是_____A x + y = 2B x > 2 = yC x = y > 2D x = y++参考答案: C(4) 在窗体上画一个名称为List1的列表框,为了对列表框中的每个项目都能进行处理,应使用的循环语句为A) For i=0 To List1.ListCount-1 …… Next C) For i=1 To List1.listCount…… Next (4) A(5) 以下Case 语句中错误的是A) Case 0 To 10 B) Case Is>10 C) Case Is>10 And Is<50 D) Case 3,5,Is>10(5) C(6) 以下关于图片框控件的说法中,错误的是A) 可以通过Print 方法在图片框中输出文本B) For i=0 To ListCount-1 …… Next D) For i=1 To ListCount …… NextB) 清空图片框控件中图形的方法之一是加载一个空图形C) 图片框控件可以作为容器使用D) 用Stretch属性可以自动调整图片框中图形的大小(6) D(7) 执行语句s=Len(Mid("VisualBasic",1,6))后,s的值是A) Visual B) Basic C) 6 D) 11(7) C(8) 以下叙述中错误的是A) 下拉式菜单和弹出式菜单都用菜单编辑器建立B) 在多窗体程序中,每个窗体都可以建立自己的菜单系统C) 除分隔线外,所有菜单项都能接收Click事件D) 如果把一个菜单项的Enabled属性设置为False,则该菜单项不可见(8) D(9) 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click()a = 12345Print Format$(a, "000.00")End Sub程序运行后,单击命令按钮,窗体上显示的是A) 123.45 B) 12345.00 C) 12345 D)00123.45(9) B(10) 以下叙述中错误的是A) 一个工程可以包括多种类型的文件B) Visual Basic应用程序既能以编译方式执行,也能以解释方式执行C) 程序运行后,在内存中只能驻留一个窗体D) 对于事件驱动型应用程序,每次运行时的执行顺序可以不一样(10) C(11) 以下关于函数过程的叙述中,正确的是A) 函数过程形参的类型与函数返回值的类型没有关系B) 在函数过程中,过程的返回值可以有多个C) 当数组作为函数过程的参数时,既能以传值方式传递,也能以传址方式传递D) 如果不指明函数过程参数的类型,则该参数没有数据类型(11) A(12) 以下关于变量作用域的叙述中,正确的是A) 窗体中凡被声明为Private的变量只能在某个指定的过程中使用B) 全局变量必须在标准模块中声明C) 模块级变量只能用Private关键字声明D) Static类型变量的作用域是它所在的窗体或模块文件(12) B(13) 确定一个控件在窗体上的位置的属性是A) Width和Height B) Width或Height C) Top和Left D) Top或Left(13) C(14) 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程Private Sub Command1_Click()Text1.Text = "Visual"Me.Text1 = "Basic"Text1 = "Program"End Sub程序运行后,如果单击命令按钮,则在文本框中显示的是A) Visual B) Basic C) Program D) 出错(14) D(15) 以下关系表达式中,其值为False的是A) "ABC">"AbC" B) "the"<>"they" C) "VISUAL"=UCase("Visual") D) "Integer">"Int"(15) A(16) 语句Print 5/4*6\5 Mod 2的输出结果是A) 0 B) 1 C) 2 D) 3(16) B(17) 在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和Command1,然后编写如下两个事件过程:Private Sub Command1_Click()strText = InputBox("请输入")Text1.Text = strTextEnd SubPrivate Sub Text1_Change()Label1.Caption = Right(Trim(Text1.Text), 3)End Sub程序运行后,单击命令按钮,如果在输入对话框中输入abcdef,则在标签中显示的内容是A)空 B) abcdef C) abc D) def(17) D(18) 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()x = -5If Sgn(x) Theny = Sgn(x ^ 2)Elsey = Sgn(x)End IfPrint yEnd Sub程序运行后,单击命令按钮,窗体上显示的是A) -5 B) 25 C) 1 D) -1(18) C(19) 一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Form1中有语句Pubilc X As Integer,在Model1中有语句Pubilc Y As Integer,则以下叙述中正确的是A) 变量X、Y的作用域相同 B) Y的作用域是Model1C) 在Form1中可以直接使用X D) 在Form2中可以直接使用X和Y(19) C(20) 在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框。

《VB程序设计》期末考试

《VB程序设计》期末考试

《VB程序设计》期末考试注意事项:(1)题型:选择题40道,判断题10道,每题2分,满分100分。

(2)答题时间:60分钟。

(3)请在规定时间内作答并提交。

1、VB程序设计语言是一种()。

[单选题] *A.汇编语言B.机器语言C.高级语言(正确答案)D.数据库语言2、VisualBasic最突出的特点是()。

[单选题] *A.结构化程序设计B.程序开发环境C.程序调试技术D.事件驱动编程机制(正确答案)3、VB中,.frm是()文件的扩展名。

[单选题] *A.工程文件B.可执行文件C.窗体文件(正确答案)D.标准模块文件4、VB中,.vbp是()文件的扩展名。

[单选题] *A. 工程文件(正确答案)B. 可执行文件C. 窗体文件D. 标准模块文件5、在设计窗体时,双击窗体的任何地方,可以打开的窗口是()。

[单选题] *A. 代码窗口(正确答案)B. 属性窗口C. 工程管理窗口D. 以上3个选项都不对6、VB是一种面向对象的程序设计语言,下面()不是面向对象包含的三要素。

[单选题] *A. 变量(正确答案)B. 事件C. 属性D. 方法7、不论任何控件,共同具有的是()属性。

[单选题] *A. TextB. CaptionC. BackColorD. Name(正确答案)8、要使Form1窗体的标题栏显示“欢迎使用Visual Basic 6.0! ”,以下()语句是正确的。

[单选题] *A. Form1.Caption =" 欢迎使用Visual Basic 6.0! "(正确答案)B. Form1.Caption =’欢迎使用Visual Basic 6.0! ’C. Form.Caption = " 欢迎使用Visual Basic 6.0! "D. Form.Caption = ’欢迎使用Visual Basic 6.0! ’9、有下面的程序代码:Command1.Caption ="确定",则Command1,Caption和"确定"分别代表()。

大一VB语言程序期末考试题及答案

大一VB语言程序期末考试题及答案

大一VB语言程序设计期末考试题一、选择题1 下列常量中,是Integer类型常量的是 C ;A、123&B、-38844C、123%D、327682 下面选项中是字符连接运算符. AA、&B、AndC、%D、Mod3 下面关于VB的集成开发环境IDE的叙述中,不正确的是 B ;A、IDE是设计、调试、运行VB程序的工具;B、用户不能随意关闭IDE中的窗口;C、"窗体设计" 窗口是用来设计应用程序界面窗体的;D、打开 / 关闭各窗口的命令主要在IDE的"视图"菜单中;4 len“vb程序设计”= C ;A、 5B、2C、 6D、105 表达式 15 Mod 4 + 13 \ 5 2 的值是 DA、7B、0C、2D、46 赋值语句A=123 + Mid$ “123456”,3,2 执行后,A= A ;A、157B、12334C、123D、"12334"7 在一个语句内写多条语句时,用来分隔每条语句的符号是C.A、,B、;C、:D、、8 将逻辑型数据转换成整型数据时,转换规则是 D ;A、将True转换为 1 ,将False转换为 0B、将True转换为 1 ,将False转换为 -1C、将True转换为 0 ,将False转换为 -1D、将True转换为 -1 ,将False转换为 09 表达式2+34^5-SINX+1/2中最先进行的运算是D.A、SINB、4^5C、34D、x+110 如果x=2,则表达式x+1>2 Or sinx> And 3>x+3的值 B ;A、不能计算B、 TrueC、5D、False11 随机产生 10,50 之间整数的正确表达式是 D ;A、Round Rnd50B、 IntRnd40+10C、Round Rnd51D、 10+IntRnd4112 每建立一个窗体,工程管理器窗口中就会增加一个C.A、类模块文件B、工程文件C、窗体文件D、程序模块文件13 INT100RND1产生的随机整数的闭区间是B.A、1,100B、0,99C、0,100D、1,9914 下列数据类型中,占用内存最小的是D.A、IntegerB、SingleC、BooleanD、Byte15 VisualBasic是一种程序设计语言.BA、过程式B、非过程式C、机器D、低级16 函数Int10Rnd是在A范围内的整数.A、0,9D、1,1017 以下合法的一组Visual Basic用户标识符是 CA、Sum 和 8abcB、ax 和 PiC、ForLoop 和 TotalD、Const 和 DoWhile18 函数LenStrVal""的值为B.A、5B、6C、8D、1119 Int100+/100的值为BA、B、C、200D、19820 以下各表达式中, 计算结果为0的是A.A、FIX+FIXB、CINT+CINTC、INT+INTD、FIX+FIX21 MsgBox的正确语法是 D ;A、 MsgBox标题 ,提示信息 ,按钮类型B、 MsgBox提示信息,标题 ,按钮类型C、MsgBox标题 ,按钮类型 ,提示信息D、 MsgBox提示信息 ,按钮类型 ,标题22 3>8-3 OR 10+2 <=34 AND 5=2+3的结果是C.A、10B、-3C、TrueD、False23 表达式4+5 \ 6 7 / 8 Mod 9 的值是D.A、7B、4C、6D、524 设a=6,则执行x=IIfa>5,-1,0后,x的值为D.A、5B、025 下面关于VB的叙述中,不正确的是 A ;A、用VB编写的程序可以在任何操作系统环境中运行;B、VB是面向对象的可视化的软件开发工具;C、VB是在20世纪60年代美国Dartmouth学院开发的Basic语言基础上发展而形成的;D、VB是由美国Microsoft微软公司开发程序设计语言;26 表达式16 / 4-2^58 / 4 Mod 5 \ 2 = A ;A、4B、0C、-2D、 -627 声明符号常量应该用关键字B.A、PrivateB、ConstC、StaticD、V26/ariant28 下列数据类型中,占用内存最大的是D.A、BooleanB、IntegerC、ByteD、Single29 下列VB数据类型中,占用内存最少的是 D ;A、CurrencyB、IntegerC、BooleanD、Byte30 RGB 函数通过红.绿.蓝三基色混合产生某种颜色,某语法为RGB红.绿.蓝,括号中红、绿、蓝三基色的成分使用0~255之间的整数.若使用三个滚动条分别输入三种基色,为保证输入数值有效,则应设置B属性.A、Scroll和ChangeB、Max和MinC、Smallchange和 LargeChangeD、Value31 k= ,len str k = B ;A、 4B、5C、 3D、 232 表达式Abs-55\5/5的值是 DA、1B、5C、-25D、2533 产生10,37之间的随机整数的VisualBasic表达式是C.A、IntRnd127+11B、IntRnd128+11C、IntRnd128+10D、In tRnd127+1034 工具栏中的"启动"按钮的作用是B.A、工程管理窗口B、运行一个应用程序C、打开被选中对象的代码窗口D、运行一个窗体35 不需要编译,计算机便可直接执行的程序是 B ;A、C语言程序B、机器语言程序C、汇编语言程序D、 Visual Basic语言程序36 Val “123ab”= D ;A、0B、不能转换C、1230D、12337 表达式16/4-2^58/4MOD5\2的值为 AA、4B、2C、14D、2038 删除字符串前导和尾随空格的函数是D.A、RtrimB、LtrimC、LcaseD、Trim39 下列表达式中,其值为0的是C.A、15 mod 9B、7/9C、7\9D、7 mod 1540 表达式Len"123程序设计ABC"的值是 BA、17B、10C、14D、2041 Int+round =________C_________;A、-8B、-6C、-9D、-742 \、/、Mod、等4个算术运算符中,优先级最低的是A.A、ModB、/C、D、\43 下面正确的赋值语句是 D ;A、x=y=1B、x+2=y^2+2C、x+y=1D、x=y+z144 Len"实践应用能力"的值是A.A、6B、4C、不能确定D、845 表达式Mid"SHANGHAI",6,3的值是C.A、ANGHB、SHAC、HAID、SHANGH46 表达式25\3 mod 3 Int的值为B.A、1B、8C、4D、547 下面变量名称正确的是 C ;A、x □1B、integerC、 x_1_yD、 x , y48 不能正确表示条件"两个整型变量A和B之一为0,但不能同时为0" 的布尔表达式D.A、AB=0ANDA<>BB、A=0ORB=0ANDA<>BC、A=0ANDB<>0ORA<>0AND B=0D、AB=0ANDA=0ORB=049 如果X是一个正的实数,将千分位四舍五入,保留两位小数的表达式是C.A、int100x+B、intx+C、int100x+D、intx+50 表达式X+1>X是D.A、非法表达式B、字符表达式C、算术表达式D、关系表达式51.VisualBasic的编程机制是B.A、面向图形B、事件驱动C、面向对象D、可视化52 下面4项中合法的变量名是A.A、X_yzB、X-YC、123abcD、integer53 以下可以作为VB变量名的是C.A、COSXB、X-1C、CO1D、SIN54 表达式7\3+118\5-1的值是B.A、B、6C、D、55 下列哪个变量名的取法是不正确的C.A、sTmeB、T_12C、T12%D、T_Temp56 可以同时删除字符串前导和尾部空白的函数是B.A、LtrimB、TrimC、MidD、Rtrim57 VB窗体文件的扩展名是A.A、FRMB、VBWD、BAS58 一个具有图形用户界面的“标准EXE”工程必须包含的文件是 A ;A、工程文件和窗体文件;B、窗体文件和标准模块文件;C、工程文件和资源文件;D、工程文件和标准模块文件;59 数学式3≤X<5写成VB表达式是 A ;A、3<=X and X<5B、X>=3 and 5<XC、3<=X or X<5D、3<=X<560 表达式INT8SQR3610^-210+/10的值是A.A、.5B、C、.05D、61 变量未赋值时,数值型变量的值为C.A、空B、无任何值C、0D、162 正确的变量名是 A ;A、xy_01B、sa t01C、3xyD、integer63 当Ucase$C$>”A” and Ucase$C$<”Z”为true时,则C$是__A______;A、字母B、大写字母C、小写字母D、不一定64 表达式-1Sgn-100+IntRnd100的值是A.A、1B、-1C、随机数D、065 表达式print Lentrim" abcd "&"123"的结果是 DA、abcdB、9C、123D、766 Rnd函数不可能产生的值.BA、0B、1C、D、.0000567 下面变量名称不正确的是 B ;A、x1B、1xC、 x1y68 下列哪个变量名的取法是不正确的B.A、T_TempB、T32C、T32D、TName69 选中复选框控件时,value属性的值,可以是C.A、TrueB、falseC、1D、070 程序运行时,如果复选框被用户选中,那么其Value属性值为 A ;A、1B、FalseC、 TrueD、 071 程序运行时,如果单选框被用户选中,那么其Value属性值为 D ;A、0B、1C、FalseD、True72 下列是窗体文件的扩展名.AA、frmB、clsC、dllD、bas73要使标签能透出窗体的背景,必须设置C属性.A、AppearanceB、BorderStyleC、BackStyleD、BackColor74 当窗体被关闭时,系统自动执行该窗体的 A 事件过程;A、UnloadB、LoadC、LostFocusD、Click75 要使窗体运行时充满整个屏幕,应设置其 D 属性;A、AutoRedrawB、WidthC、 HeightD、WindowState76 要使得窗体一开始运行就充满整个屏幕则须设置属性. AA、windowstateB、borderstyleC、appearanceD、drawmode77 要使一个文本框具有水平和垂直滚动条,则应先将其MultiLine属性设置为True,然后再将ScrollBar属性设置为A.A、3B、0C、1D、278 决定控件上文字的字体、字形、大小及效果的属性是C.A、TEXTB、CAPTIONC、FONTD、NAME79 在窗体设计器窗口双击窗体的任何地方,可以打开的窗口是A.A、代码窗口B、以上3个选项都不对C、工程管理窗口D、属性窗口80 下列关于属性设置的叙述错误的是D.A、一个控件具有什么属性是VB预先设计好的,用户可以改变B、一个控件的属性即可以在属性窗口中设置,也可以用程序代码设置C、一个控件的属性在属性窗口中设置,还可以利用程序代码为其设置新值D、一个控件具有什么属性是VB预先设计好的,用户不能改变81 MaxLength属性可以设置文本框可以输入与显示的最多字符个数,当其值为0时表示D.A、不允许输入字符B、以上都不正确C、不允许输入任何字符,但显示不限制D、输入的字符长度不限82 下面C控件不具有Caption属性.A、标签框B、命令按钮C、文本框D、单选钮83 要使标签能够显示所需要的东西,则在程序中应设置其哪一属性的值D.A、NameB、TextC、AutoSizeD、Caption84 程序运行时,要限制文本框的输入长度,那么应设置 A ;A、MaxLengthB、EnabledC、LockedD、MultiLine85 事件的名称D.A、是不固定的B、有的由用户定义,有的由系统定义C、都要由用户定义D、都是由系统预先定义86若设置窗体的BorderStyle=1,则在程序运行时窗体的行为是A ;A、窗体没有最大化和最小化按钮,窗体可以移动,但不能改变大小;B、窗体有最大化和最小化按钮,窗体既可以移动,也可以改变大小;C、窗体没有最大化和最小化按钮,窗体既不能移动,也不能改变大小;D、窗体有最大化和最小化按钮,窗体可以移动,但不能改变大小;87 如果要设置窗体的标题栏,应选择以下那种属性D.A、TipsB、NameC、TextD、Caption88 要把一个命令按钮设置成无效,应设置其哪一属性值D.A、VisibleB、DefaultC、CancelD、Enabled89 将焦点主动设置到指定的控件或窗体上,应采用C方法.A、SetTextB、GetGataC、SetFocusD、SetData90 要使标签控件的大小随Caption 属性值而自动调整,应设置其 B 属性;A、AlignmentB、AutoSizeC、WidthD、Caption91 能够改变窗体边框线类型的属性是C.A、FontStyleB、BorderC、BorderStyleD、BackStyle92 要使Form1窗体的标题栏显示"欢迎使用VB",以下语句正确的是A.A、=〞欢迎使用VB〞B、="欢迎使用VB"C、=欢迎使用VBD、=ˊ欢迎使用VBˊ93 文本框所没有的属性是D.A、VisibleB、BackColorC、EnabledD、Caption94 在VB环境中,工程文件的扩展名是D.A、.frxB、.basC、.frmD、.vbp95 如果要在命令按钮上显示图形文件,应设置命令按钮的B.A、Style属性和Graphics属性B、Style属性和Picture属性C、Picture属性D、Graphics属性96 要使鼠标指向“命令按钮”时,出现一个提示文本,应设置其A 属性;A、ToolTipTextB、StyleC、PictureD、Caption97不论何控件,共同具有的属性是B.A、ForeColorB、NameC、CaptionD、Text98 要使标签控件标题内容居中显示,应设置其 B 属性;A、 ToolTipTextB、 AlignmentC、 BackStyleD、 Appearance99 使命令按钮获得“焦点”的方法是 A ;A、SetFocusB、MoveC、RefreshD、LinkSend100 改变控件在窗体中的上下位置应修改控件的属性. CA、HeightB、WideC、TopD、Left101、语句PRINT"SGN-26=";SGN-26的输出结果为CA、SGN-26=-26B、SGN-26=26C、SGN-26=-1D、SGN-26=+1102、若要使得文本框的初始值为空,则应更改文本框的属性是 AA、textB、indexC、nameD、caption103、要使得标签能自动扩充以满足字体大小则可对其 C属性进行设置.A、tagB、alignmentC、autosizeD、usemnemonic104、为了把焦点移到某个指定的控件,所使用指定的控件的 C 方法.A、VisibleB、RefreshC、SetFocusD、GetFocus105、如果要给字体加删除线,可以选择下列那种属性 C.A、FontSizeB、FontNameC、FontStrikethruD、FontUnderLine106、要设置标签控件字体的大小,应设置其 A 属性;A、FontB、HeightC、WidthD、Caption107、每个窗体对应一个窗体文件,窗体文件的扩展名是 A .A、.frmB、.vbpC、.basD、.cls108、标签控件最重要的属性是A.A、captionB、textC、nameD、width109、A对象不具有Caption属性.A、TimerB、FormC、OptionD、Label110、一个窗体上有三个文本框,按放置顺序分别是:Text1,Text2,Text3 ,若使程序运行时Text3首先获得“焦点”,那么,应设置其 B 属性值为 0 ;A、IndexB、TabindexC、TagD、Top111、如果要改变窗体的标题,则需要设置的属性是 D .A、BorderStyleB、NameC、BackColorD、Caption112、欲使某命令按钮失效,应修改命令按钮的C属性.A、EnableB、CaptionC、EnabledD、Visible113、为使文本框显示滚动条,必须首先设置的属性是D.A、AutosizeB、ScrollbarsC、AlignmentD、Mulitiline114、改变控件在窗体中的左右位置应修改该控件的B属性.A、RightB、LeftC、WidthD、Top115、要使标签中显示的文本靠右显示,则应将其Alignment属性设置为A.A、1B、3C、2D、0116、当设置文本框的ScrollBars=Both 而文本框确没有显示出滚动条,原因是A ;A、文本框的MultiLine=FalseB、文本框中没有内容C、文本框的MultiLine=TrueD、文本框的Locked=True117、要使文本框获得输入焦点,则应采用文本框控件的哪个方法D.A、KeyPressB、LostFocusC、GodFocusD、SetFocus118、假设窗体上有一个标签控件Label1和一个时钟控件Timer,要想每隔1秒钟,在标签Label1上显示一次系统当前时间,应在 A 事件过程中编写实现该功能的程序;A、Private Sub Timer1_TimerB、Private Sub Label1_DblClickC、Private Sub Label1_ChangeD、Private Sub Label1_Click119、如果设计时在属性窗口将命令按钮的B属性设置为False,则运行时按钮从窗体上消失.A、DisabledPictureB、VisibleC、DefaultD、Enabled120、一个窗体上有两个文本框,按放置顺序分别是:Text1,Text2 ,要想在Text1中按“回车”键,“焦点”自动转到Text2上,应在 D 事件过程中编写程序;A、Private Sub Text1_ClickB、Private Sub Text2_GotFocusC、Private Sub Text1_LostFocusD、Private Sub Text1_KeyPressKeyAscii As Integer121、文本框中选定的内容,由下列 A 属性反映.A、SeltextB、CaptionC、sellenghtD、Text122、下面4项中不属于面向对象系统三要素的是 A .A、变量B、事件C、方法D、属性123、若要使命令按钮不可操作,要设置的属性是 A .A、EnabledB、VisibleC、CaptionD、BackColor124、文本框控件中将Text的内容全部显示为所定义的字符的属性项是D.A、PasswordB、以上都不是C、需要编程来实现D、PasswordChar125、如果Print方法在窗体的Load事件过程中不起作用,原因是 A 属性值为false;A、AutoRedrawB、ControlBoxC、MoveableD、MaxButton126、inputBox函数返回值的类型为C.A、变体B、数值C、字符串D、数值或字符串视输入的数据而定127、窗体的Caption属性的作用是B.A、确定窗体的边界类型B、确定窗体的标题C、确定窗体的名称D、确定窗体的字体128、欲使标签的内容自动换行,必须设置属性A.A、WordWrapB、AutoSizeC、AlignmentD、left129、用来设置粗体字的属性是DA、FontItalicB、FontSizeC、FontNameD、FontBold130、Text1控件在运行时不可见,是设置下列B属性的结果.A、CancelB、VisibleC、ControlBoxD、Enabled131、若要使标签控件显示时,不覆盖其背景内容,应设置标签控件的D属性.A、BORDERSTYLEB、BACKCOLORC、FORECOLORD、BACKSTYLE132、要使“命令按钮”在程序运行时不可见,可以将其 C 属性设置为False;A、CancelB、DefaultC、VisibleD、Enabled133、下列赋值语句正确的是D.A、=+B、=+C、=+D、=+134、不具有输入数据功能的控件是C控件.A、列表框B、选项按钮C、窗体D、文本框135、程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是A.A、LoadB、ClickC、MouseDownD、MouseUp136、列表框和组合框的 B 属性的值,表示其列表中项目的个数;A、 ListIndexB、 ListCountC、ListD、Text137、在定义静态数组时,关于下标的叙述中,正确的是 A ;A、省略下界,一般系统默认为:下界是 0B、下标可以是字符型C、下标下界最小为:-32768 ,下标上界最大为:32767D、下标可以是变量;138、下列程序:Private Sub Textl _ChangePrint Textl;End Sub当在文本框输入"1234"这4个字符时,窗体上显示的是 DA、1234B、1 12 123 1234C、1 2 3 4D、139、下面对象在运行时一定不可见. CA、LineB、OptionC、TimerD、Text140、若要清除列表框的所有内容,可用什么方法实现 CA、以上均不可以B、ClsC、ClearD、RemoveItem141、要使时钟控件Timer1的Timer事件不起作用,以下正确的语句是 AA、=FalseB、=0C、=1000D、=False142、为使计时器控件每隔5秒钟产生一个计时器事件Timer事件,则应将其Interval属性值设置为 D.A、300B、5C、500D、5000143、将数据项"China"添加到列表框List1中成为第一项应使用的语句是 A;A、〞China〞,0B、〞China〞,1C、 0, 〞China〞D、 1,〞China〞144、在程序代码中修改滚动条的value 属性时将激发滚动条的 D事件.A、scrollB、dragdropC、gotfocusD、change145、循环结构For I%= -1 to -17 Step -2 共执行 C次.A、6B、5C、9D、8146、执行下面的程序段后,x 的值为 Dx=5For i=1 To 20 Step 2x=x+i\5Next iA、24B、23C、22D、21147、由For k=10 to 0 step 3:next k循环语句控制的循环次数是 D. A、-11C、-10D、0148、下列方法中可用于列表框动态添加数据的是 D.A、removeitemB、addlistC、addD、additem149、组合框控件是将组合成一个控件. AA、列表框控件和文本框控件B、复选框控件和选项按钮控件C、标签控件和列表框控件D、标签控件和文本框控件150、下面程序段输出的结果是 DPrivate Sub Command1_Clickx = 8For i = 0 To 20 Step 5x = x + iNextPrint "X="; xEnd SubA、X=50B、X=218C、X=210D、X=58151、定时器的Interval属性以为单位指定Timer事件之间的时间间隔. CA、分B、微秒C、毫秒D、秒152、由For k=35 to 0 step 3:next k循环语句控制的循环次数是. AA、0B、-10C、12D、-11153、在列表框中当前被选中的列表项的序号是由下列哪个属性表示. CA、ListB、IndexC、ListIndexD、TabIndex154、设计动画通常使用时钟控件来控制动画速度. CA、EnabledB、TimerC、IntervalD、Move155、为了能在列表框中利用Ctrl和Shift键进行多个列表项的选择,则应将列表框的Multiselect属性设置为. CA、1B、3C、2D、0156、引用列表框的最后一项应使用. DA、ListCount-1B、C、ListCount157、列表框控件中的列表内容是通过属性设置的. AA、ListB、CaptionC、NameD、Text填空1.在窗体上已建立多个控件,如Text1,Label1,Command1,若要使程序一运行焦点就定位在Command1控件上,应对Command1控件的__tabindex___属性设置为_TabIndex____;2.日期表达式 2/24/02 - 2/12/02 的值为_12____;3 .已知a=,b=,c=,d=True,则表达式:a>=0 AND a+c>b+3 OR NOT d的值是_false____;4.表示x是5的倍数或是9的倍数的逻辑表达式为__x mod 5 = 0 OR x mod 9 = 0___;5.在刚建立工程时,使窗体上的所有控件具有相同的字体格式,就对__font___的属性进行设置;、Int、Fix、Fix的值分别是_-3____、___2__、__-2___、____3_;和TextBox控件用来显示和输入文本,如果仅需要让应用程序在窗体中显示文本信息,可使用_label___控件;若允许用户输入文本,则应使用_Textbox____控件;8.若命令按钮的名称为Cmdopen,程序要求单击该命令按钮时,打开一个窗口frm1,请对以下事件过程填空;Private Sub Cmdopen_Click_____end sub9.表达式93 \ 7 Mod 2 ^ 2 的值是__1___;10.表达式UcaseMid“abcdefgh”,3,4的值是__CDEF___;11.当程序运行时,要求窗体中的文本框呈现空白,则在设计时,应当在此文本框的__属性___窗口中,把此文本框的__text___属性设置成空白;12.已知a=3,b=4,c=5,表达式a>b and Not c>a Or c>b And c<a+b的值是__true___;表达式c>a And Not b<c的值是__false___;程序设计1.'------------------------------------------------'程序改错'------------------------------------------------'题目:程序功能:求1+2+3……,直到其和超出3000为' 止,并输出结果;'------------------------------------------------Option ExplicitPrivate Sub Form_ClickClsDim i As IntegerDim s As Singlei =0s = 1Do'ERRORi = i + 2s = s + i'ERRORLoop s > 3000Print "从1 到:"; i; "的和是"; sEnd Sub答案学生答案i = i + 2参考答案i=i+12. '------------------------------------------------'程序改错'------------------------------------------------862'题目:以下程序段用于输出100-300的所有素数'------------------------------------------------Option ExplicitPrivate Sub Form_ClickDim n As Integer, k As Integer, i As Integer, swit As Integer For n = 101 To 300 Step 2k = IntSqrni = 2'ERRORswit = 1'ERRORWhile swit = 0If n Mod i = 0 Thenswit = 1Else'ERRORi = i - 1End IfWendIf swit = 0 ThenPrint n;End IfNext n答案学生答案swit = 1参考答案swit=0学生答案While swit = 0参考答案While i<=k And swit =0While k>=i And swit=0While swit=0 And i<=kWhile swit=0 And k>=i学生答案i = i - 1参考答案i=i+1ExplicitPrivate Sub Form_ClickDim i As Integer, j As Integer, k As Integer Print Tab30; "99 table"Print: PrintPrint " ";For i = 1 To 9'ERRORPrint Tabi 6; iNext iPrintFor j = 1 To 9Print j; " ";For k = 1 To jPrint Tabk 6; j k; " ";'ERRORNext jPrint'ERRORNext k答案学生答案Print Tabi 6; i参考答案Print Tabi 6; i;学生答案Next j参考答案Next k学生答案Next k参考答案Next j4.'------------------------------------------------ '程序改错'------------------------------------------------ '题目:以下程序段用于计算5的N次方;'------------------------------------------------ Option ExplicitPrivate Sub Form_ClickDim n As Integer, k As Integer, s As Long n = InputBox" Input n "'ERRORk = 0'ERRORs = 0Do While k <= ns = s 5k = k + 1'ERRORNextPrint "5的"; "n次方是"; sEnd Sub答案学生答案k = 0参考答案k=1学生答案s = 0参考答案s=1学生答案Next参考答案loop'------------------------------------------------ 5.'程序改错'------------------------------------------------ '题目:以下程序段用于打印如图1所示的九九乘法表:'------------------------------------------------ Option ExplicitPrivate Sub Form_ClickDim i As Integer, j As Integer, k As IntegerPrint Tab30; "99 table"Print: PrintPrint " ";For i = 1 To 9'ERRORPrint Tabi 6; iNext iPrintFor j = 1 To 9Print j; " ";'ERRORFor k = 1 To 9'ERRORPrint Tabj 6; j k; " ";Next kPrintNext jEnd Sub答案学生答案Print Tabi 6; i参考答案Print Tabi6;i;学生答案For k = 1 To 9参考答案For k = 1 To j学生答案Print Tabj 6; j k; " ";参考答案Print Tabk6;jk;" ";6.'程序改错'------------------------------------------------ '题目:下面程序可输出如下图形:''''''------------------------------------------------Option ExplicitPrivate Sub Form_ClickDim m As Integer, n As Integer, s As String, i As Integer, j As Integer n = 4m = 1s = ""For i = 5 To 1 Step -1'ERRORPrint SpcnFor j = 1 To 2 m - 1Print s;Next jPrint'ERRORn = n + 1'ERRORm = m - 1Next i答案学生答案Print Spcn参考答案Print Spcn;Print Spci;Spcn;Spci;学生答案n = n + 1参考答案n=n-1n=-1+n学生答案m = m - 1参考答案m=m+17.'题目:以下程序段用于输出100-300的所有素数'------------------------------------------------Option ExplicitPrivate Sub Form_ClickDim n As Integer, k As Integer, i As Integer, swit As Integer For i = 101 To 299k = IntSqriFor n = 2 To kIf i Mod n = 0 Then'ERRORExitEnd IfNext n'ERRORIf n < k ThenPrint i;End If'ERRORNext n'Print i答案学生答案Exit参考答案exit for学生答案If n < k Then参考答案If n>k ThenIf k<n Then学生答案Next n参考答案next iNext i程序填空1.'从键盘输入三个整数,从其中找出最大值并输出到窗口Private Sub Form_ClickDim a%, b%, c%, max%a = ValInputBox"请输入一个整数"b = ValInputBox"请输入一个整数"c = ValInputBox"请输入一个整数"max=a'FILLIf ______Thenmax=bEnd IfIf max < c Then'FILL________End If'FILLPrint a; "、"; b; "、"; c; "中最大值是";______End Sub答案学生答案If ______Then参考答案max<bmax<=bb>maxb>=max学生答案________参考答案max=c学生答案Print a; "、"; b; "、"; c; "中最大值是";______参考答案max2.以下程序的功能;'Private Sub Form_ClickDim a%, b%, c%, dDim x1, x2Dim p, q, ra = InputBox"请输入a的值"b = InputBox"请输入b的值"c = InputBox"请输入c的值"d = b b - 4 a cp = -b / 2 aIf d >= 0 Then'FILLIf _____ Thenr = Sqrd / 2 ax1 = p + rx2 = p - rElsex1 = px2 = p'FILL_____Print "x1="; x1, "x2="; x2'FILL_____q = Sqr-d / 2 aPrint "x1="; p; "+"; q; "i", "x2="; p; "-"; q; "i" End If答案学生答案If _____ Then参考答案d>0学生答案_____参考答案End ifEnd Ifend if学生答案_____参考答案elseElseELSE3.'从键盘输入学生分数,统计学生总人数和各分数段人数, '即优秀90-100、良好80-89、中等70-79、' 及格60-69、不及格60以下的人数;Private Sub Form_ClickDim score%, n1%, n2%, n3%, n4%, n5%msg = "请输入分数-1结束"msgtitile = "输入数据"score = ValInputBoxmsg, msgtitle'FILLWhile _____total = total + 1'FILLSelect Case _____Case Is >= 90n1 = n1 + 1Case Is >= 80n2 = n2 + 1Case Is >= 70n3 = n3 + 1Case Is >= 60n4 = n4 + 1Case Elsen5 = n5 + 1'FILL_____score = ValInputBoxmsg, msgtitleWendPrint n1, n2, n3, n4, n5, totalEnd Sub答案学生答案While _____参考答案score>=0 and score<=100score>=0 and score<=100score<>-1学生答案Select Case _____参考答案score学生答案_____参考答案End Select4.以下程序段用于实现:输入两个正整数m和n,求其最大'公因数和最小公倍数;Private Sub Form_ClickDim a%, b%, num1%, num2%, tempnum1 = InputBox"请输入一个正整数"num2 = InputBox"请输入一个正整数"'FILLIf _____ Thentemp = num1: num1 = num2: num2 = tempEnd Ifa = num1b = num2Do While _____temp = a Mod ba = b'FILL_____LoopPrint "最大公因数为:"; aPrint "最小公倍数为:"; num1 num2 / a答案学生答案If _____ Then参考答案num1<num2num2>num1学生答案Do While _____参考答案b<>0b>00<btemp<>0temp>00<tempNot b=0Not 0=b学生答案_____参考答案b=temp5.'以下程序用于判断一个正整数≥3是否为素数;' Private Sub Form_Clickn = InputBox"请输入一个正整数≥3"k = IntSqrni = 2swit = 0'FILLDo While i <= k And _____'FILLIf _____ Thenswit = 1Else_____End IfLoopIf swit = 0 ThenPrint n; "是一个素数"ElsePrint n; "不是素数"End IfEnd Sub答案学生答案Do While i <= k And _____参考答案swit=0学生答案If _____ Then参考答案n Mod i = 0n \ i = n / in / i = int n / i学生答案_____参考答案i = i + 16.题目:从键盘上输入一串字符,以""结束,统计输入字符中的' 大、小写字母和数字的个数;Private Sub Form_ClickDim ch$, n1%, n2%, n3%n1 = 0n2 = 0n3 = 0ch = InputBox"请输入一个字符"'FILLDo While _____Select Case chCase "a" To "z"n1 = n1 + 1'FILLCase _____n2 = n2 + 1Case "0" To "9"n3 = n3 + 1End Selectch = InputBox"请输入一个字符"'FILL_____Print n1, n2, n3答案学生答案Do While _____参考答案do while ch<>""Do While ch<>""学生答案Case _____参考答案case "A" to "Z"Case "A" to "Z"学生答案_____参考答案loopLoop窗体设计1 在名称为Form1的窗体上画一个文本框,名称为Txt1;再画一个命令按钮,名称为C1,标题为"移动",如图1所示;请编写适当的事件过程,使得在运行时,单击"移动"按钮,文本框水平移动到窗体的最左端如图2所示;程序中不得使用任何变量;注意:完成题目后,必须保存工程后再关闭;控件标准答案:Name=C1学生答案:Name=控件属性评分错误控件标准答案:Caption=移动学生答案:Caption=控件属性评分错误控件标准答案:Name=Txt1学生答案:Name=事件评分错误事件Private Sub C1_Click标准答案: = 0学生答案:二 1、利用 VB设计上面的程序界面;窗体的标题为"字体修改";其中包括一名称为Label1,标题为"请输入文字"的标签;一名称为Text1,内容为空的文本框;名称为Command1,标题为"隶书",名称为Command2,标题为"黑体"的两个命令按钮;2、程序功能:单击"隶书"命令按钮时,文本框的字体设为"隶书";单击"黑体"命令按钮时,文本框的字体设置为"黑体";提示:不能使用任何变量事件Private Sub Command2_Click标准答案: = "黑体"学生答案:控件属性评分错误控件标准答案:Caption=隶书学生答案:Caption=事件评分错误事件Private Sub Command1_Click标准答案: = "隶书"学生答案:控件属性评分错误控件标准答案:Caption=请输入文字学生答案:Caption=三在名称为Form1的窗体上建立一个名称为List1的列表框;要求:在程序运行后,通过Form_Load事件过程加载窗体时,执行语句 "AAA",每当单击某个列表项时,都执行语句一次,如图所示;事件Private Sub Form_Load标准答案: "AAA"学生答案:事件评分错误事件Private Sub List1_Click标准答案:四在名称为Form1的窗体上建立一个水平滚动条,名称为HS1,其最大值为100,最小值为0;要求程序运行后,每次移动滚动框时,都执行语句 ,如图所示程序中不能使用任何变量事件Private Sub HS1_Scroll标准答案: Print学生答案:控件属性评分错误控件标准答案:Name=HS1学生答案:Name=控件属性评分错误控件标准答案:Max=100五 1、在名称为Form1的窗体上建立一个名称为l1的标签,并设置他不可见;两个名称为cmd1和cmd2,标题分别为"显示1"和"显示2"的命令按钮;2、编写适当的事件过程,要求程序运行后,如果单击"显示1"命令按钮,则标签可见并显示字符串"aaa";如果单击"显示2"命令按钮,则标签可见并显示字符串"bbb";程序中不能使用任何变量,直接显示字符串;不能使用默认属性;程序开始运行时界面如图1所示标准答案:Caption=显示1学生答案:Caption=控件属性评分错误控件标准答案:Visible=0 'False学生答案:Visible=控件属性评分错误控件标准答案:Name=l1学生答案:Name=控件属性评分错误控件标准答案:Name=cmd2学生答案:Name=控件属性评分错误控件标准答案:Name=cmd1学生答案:Name=事件评分错误事件Private Sub cmd1_Click标准答案: = True= "aaa"学生答案:事件评分错误事件Private Sub cmd2_Click标准答案: = "bbb"六 1、在名称为Form1的窗体上画一个文本框,名称为Text1,且不可见;再画两个命令按钮,名称分别为c1和c2,标题分别为"隐藏"和"显示";2、请编写适当的事件过程,使得在运行时,如果单击"隐藏"按钮,则文本框消失;如果单击"显示"按钮,则文本框显示出来,如图1和图2所示;程序中不得使用任何变量;控件属性评分错误控件标准答案:Name=c2学生答案:Name=控件属性评分错误控件标准答案:Caption=显示学生答案:Caption=控件属性评分错误控件标准答案:Name=c1学生答案:Name=控件属性评分错误控件标准答案:Caption=隐藏学生答案:Caption=控件属性评分错误控件标准答案:Visible=0 'False学生答案:Visible=事件评分错误事件Private Sub c2_Click标准答案: = True学生答案:事件评分错误事件Private Sub c1_Click标准答案: = False学生答案:七标题为"输出"的命令按钮,如图1-12所示;要求程序运行后,在文本框输入几个字符,单击"输出"按钮,则在窗体上显示文本框中的文字;注意:在程序中不能使用任何变量,不能使用默认属性;控件属性评分错误控件标准答案:Name=Cmd1学生答案:Name=控件属性评分错误控件标准答案:Caption=输出学生答案:Caption=事件评分错误事件Private Sub Cmd1_Click标准答案: Print学生答案:八在名为Form1的窗体上画一个框架,名称为Frm1,标题为"框架",高度为2500,宽度为4000,框架内建立一文本框,距左边框600,距框架的上边框1200,文本框中的初始内容设置为"文本框",如图所示;注意:完成试题后,必须保存,然后关闭窗口;控件属性评分错误控件标准答案:Name=Frm1学生答案:Name=控件属性评分错误控件标准答案:Height=2500学生答案:Height=控件属性评分错误控件标准答案:Width=4000学生答案:Width=控件属性评分错误控件标准答案:Left=600学生答案:Left=控件属性评分错误控件标准答案:Text=文本框学生答案:Text=控件属性评分错误控件标准答案:Top=1200学生答案:Top=九 2、界面中窗体的标题为:密码的显示;3、窗体中包括两个文本框,他们的名称分别为p asstxt和showtxt,其中:passtxt用于密码输入,当在其中输入信息时,显示为"";4、showtxt文本框,在程序运行时不能用,只能显示密码;5、具体功能:程序运行时,当在文本框passtxt中输入密码时,showtxt中同时将输入的内容原样显示;提示:不能使用任何变量,不能使用默认属性窗体属性评分错误窗体标准答案:Caption=密码的显示学生答案:Caption=Form1控件属性评分错误控件标准答案:Name=showtxt学生答案:Name=控件属性评分错误控件标准答案:Enabled=0 'False学生答案:Enabled=。

VB期末测试题答案

VB期末测试题答案

VB期末测试题一、填空题:(10 * 2 = 20)1、VB中的整型数在计算机中占个字节,表示数的范围是。

2、变量命名规则要求变量名必须以开头,其后可由字母、数字、下划线组成,长度不超过个字符。

3、CHR(ASC(“ABCD”))的值是LOG(EXP (3))的值是4、RND函数产生的随机数区间是5、逻辑运算符中,运算级别最高的是6、语句X=X+1的含义是7、Print方法具有和功能。

8、语句X = 5 = 3中,第一个“=”是号,第二个“=”是号9、要定义一个单精度符号常量PI,其值为3.1416应该使用的语句是:10、有如下语句:Dim x as Integer,y ,z as String * 8,则声明的变量x,y,z的类型分别是型、型和型。

二、选择题()3. 以下程序的输出结果是______。

8Private Sub Command1_Click()a=100Dos=s+aa=a+1Loop Until a>100print aEnd SubA.100B.120C.201D.101√4. 以下程序的循环次数是______。

11Private Sub Command1_Click()For j=8 To 35 Step 3Print j;Next jEnd SubA.10 ‘int(35-8)/3+1√B.9C.27D.285. 执行下面程序段后,变量a的值为______。

20For I=1 To 3For j=1 To IFor k=j To 3a=a+1Next kNext jNext IA.3B.9C.14√D.216. 执行下面程序段后,变量x的值为______。

20x=5For I=1 To 20 step 2x=x+I\5Next IA.21√B.22C.23D.247. 当输入4时,以下程序的输出结果是______。

7Private 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.17√C.18D.0.258. 运行下面程序后,在弹出的消息窗口中显示的是______。

期末VB练习题含答案

期末VB练习题含答案

计算机与程序设计基础(VB)练习题一.单选题(每小题1分,共27分)1.根据冯·诺依曼1946年提出的计算机的程序存储原理而设计了现代的计算机。

下面的说法正确的是_________。

A.计算机能够智能地自动编制好程序,并执行B.计算机内的程序和数据,都是用十进制数表示C.计算机内的程序和数据,都是用二进制表示的D.笔记本电脑不是冯•诺依曼结构的计算机2.计算机硬件主要由运算器、_________、存储器、输入设备及输出设备等构成。

A.屏幕B.控制器C.键盘D.打印机3.断电会使存储数据丢失的存储器是_________。

A.ROM B.U盘C.硬盘D.RAM4.下列存储器中读写速度最快的存储器是_________。

A.光盘B.内存储器C.硬盘D.高速缓冲存储器5.1MB = _________。

A.1000B B.1024B C.1000KB D.1024KB6.下列设备中,属于计算机输入设备的是_________。

A.鼠标B.音箱C.打印机D.显示器7.下面的_________不是操作系统。

A.Java B.Mac OS C.Linux D.Windows8.下面4个不同进制的数中,最小的是_________。

A.(200)10B.(11000111)2C.(306)8D.(C9)169.十进制数125所对应的八进制数为_________。

A.177 B.157 C.161 D.17510.二进制数10110110所对应的十六进制数为_________。

A.C6 B.D6 C.B6 D.E611.下面不属于对象的基本特征的是_________。

A.属性B.事件C.方法D.函数12.以下能在窗体的标题栏显示“窗体”的语句是_________。

A. = "窗体" B.Form1.Title = "窗体"C.Form1.Text = "窗体" D.Form1.Caption = "窗体"13.下列可作为变量名的是_________。

大一的vb期末考试题和答案

大一的vb期末考试题和答案

VB期末考试试题一、填空题1、VB程序设计的主要特点是(1)和(2) .2、在VB中,最主要的两种对象是(3)和(4)。

“““”””3、工程是构成应用程序文件的(5) .4、方法是VB提供的一种(6),用来完成一定的操作.5、浮点类型数据包括单精度型和___(7)__数据。

6、事件是窗体或控件对象识别的___(8)____.7、可用窗体的___(9)_ 方法在窗体中显示文字。

8、复选框控件Value属性指示复选框处于____(10)___或禁止状态(暗淡的)中的某一种。

9、在VB中,修改窗体的(11)和(12) 属性值,可改变窗体的大小。

10、双击工具箱中的控件图标,可在窗体的(13)出现一个尺寸为缺省值的控件.11、在MsgBox函数中,如果缺省title参数,则使用(14)作为消息框的标题。

12、设x=34.58,语句Print Format(x,“000。

0")的输出结果是(15) .13、在VB 中,数值型变量的初值为(16),Varant型变量的初值为(17) ,布尔型变量的初值为(18)。

14、设置窗体的(19) 属性,可在窗体上显示图片。

15、程序运行工程中,清除MP图片框中的图片应使用语句(20)。

二、选择题1、菜单控件只包括一个事件,即(1),当用鼠标单击或键盘选中后按“回车”键时触发该事件,除分隔条以外的所有菜单控件都能识别该事件。

A、GotFocusB、LoadC、ClickD、KeyDown2、滚动条控件(如图所示)的Max属性所设置的是(2) 。

A、滚动框处于最右位置时,一个滚动条位置的Value属性最大设置值B、单击滚动条和滚动箭头之间的区域时,滚动条中滚动块的最大移动量C、单击滚动条的箭头区域时,滚动条中滚动块的最大移动量D、滚动条控件无该属性3、SQL 语句Select *Form student 中的*表示(3) .A、所有记录B、所有字段C、所有表D、都不对4、以下选项中,不属于标签的属性是(4) 。

vb考题 (1)

vb考题 (1)

VB 期末复习一、选择题(1) 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Move 500,500End Sub程序运行后,单击命令按钮,执行的操作为A) 命令按钮移动到距窗体左边界、上边界各500的位置B) 窗体移动到距屏幕左边界、上边界各500的位置C) 命令按钮向左、上方向各移动500D) 窗体向左、上方向各移动500(1) B(2) 在窗体上有若干控件,其中有一个名称为Text1的文本框。

影响Text1的Tab 顺序的属性是A) TabStop B)Enabled C) Visible D)TabIndex(2) D(3) 下列语句合法的是_____A x + y = 2B x > 2 = yC x = y > 2D x = y++参考答案: C(4) 在窗体上画一个名称为List1的列表框,为了对列表框中的每个项目都能进行处理,应使用的循环语句为A) For i=0 To List1.ListCount-1 …… Next C) For i=1 To List1.listCount…… Next (4) A(5) 以下Case 语句中错误的是A) Case 0 To 10 B) Case Is>10 C) Case Is>10 And Is<50 D) Case 3,5,Is>10(5) CB) For i=0 To ListCount-1 …… Next D) For i=1 To ListCount …… Next(6) 以下关于图片框控件的说法中,错误的是A) 可以通过Print方法在图片框中输出文本B) 清空图片框控件中图形的方法之一是加载一个空图形C) 图片框控件可以作为容器使用D) 用Stretch属性可以自动调整图片框中图形的大小(6) D(7) 执行语句s=Len(Mid("VisualBasic",1,6))后,s的值是A) Visual B) Basic C) 6 D) 11(7) C(8) 以下叙述中错误的是A) 下拉式菜单和弹出式菜单都用菜单编辑器建立B) 在多窗体程序中,每个窗体都可以建立自己的菜单系统C) 除分隔线外,所有菜单项都能接收Click事件D) 如果把一个菜单项的Enabled属性设置为False,则该菜单项不可见(8) D(9) 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click()a = 12345Print Format$(a, "000.00")End Sub程序运行后,单击命令按钮,窗体上显示的是A) 123.45 B) 12345.00 C) 12345 D)00123.45(9) B(10) 以下叙述中错误的是A) 一个工程可以包括多种类型的文件B) Visual Basic应用程序既能以编译方式执行,也能以解释方式执行C) 程序运行后,在内存中只能驻留一个窗体D) 对于事件驱动型应用程序,每次运行时的执行顺序可以不一样(10) C(11) 以下关于函数过程的叙述中,正确的是A) 函数过程形参的类型与函数返回值的类型没有关系B) 在函数过程中,过程的返回值可以有多个C) 当数组作为函数过程的参数时,既能以传值方式传递,也能以传址方式传递D) 如果不指明函数过程参数的类型,则该参数没有数据类型(11) A(12) 以下关于变量作用域的叙述中,正确的是A) 窗体中凡被声明为Private的变量只能在某个指定的过程中使用B) 全局变量必须在标准模块中声明C) 模块级变量只能用Private关键字声明D) Static类型变量的作用域是它所在的窗体或模块文件(12) B(13) 确定一个控件在窗体上的位置的属性是A) Width和Height B) Width或Height C) Top和Left D) Top或Left(13) C(14) 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程Private Sub Command1_Click()Text1.Text = "Visual"Me.Text1 = "Basic"Text1 = "Program"End Sub程序运行后,如果单击命令按钮,则在文本框中显示的是A) Visual B) Basic C) Program D) 出错(14) D(15) 以下关系表达式中,其值为False的是A) "ABC">"AbC" B) "the"<>"they" C) "VISUAL"=UCase("Visual") D) "Integer">"Int"(15) A(16) 语句Print 5/4*6\5 Mod 2的输出结果是A) 0 B) 1 C) 2 D) 3(16) B(17) 在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和Command1,然后编写如下两个事件过程:Private Sub Command1_Click()strText = InputBox("请输入")Text1.Text = strTextEnd SubPrivate Sub Text1_Change()Label1.Caption = Right(Trim(Text1.Text), 3)End Sub程序运行后,单击命令按钮,如果在输入对话框中输入abcdef,则在标签中显示的内容是A)空 B) abcdef C) abc D) def(17) D(18) 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()x = -5If Sgn(x) Theny = Sgn(x ^ 2)Elsey = Sgn(x)End IfPrint yEnd Sub程序运行后,单击命令按钮,窗体上显示的是A) -5 B) 25 C) 1 D) -1(18) C(19) 一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Form1中有语句Pubilc X As Integer,在Model1中有语句Pubilc Y As Integer,则以下叙述中正确的是A) 变量X、Y的作用域相同 B) Y的作用域是Model1C) 在Form1中可以直接使用X D) 在Form2中可以直接使用X和Y(19) C(20) 在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框。

vb考试试题及答案

vb考试试题及答案

vb考试试题及答案一、选择题(每题2分,共20分)1. 在Visual Basic中,以下哪个不是基本数据类型?A. IntegerB. StringC. ObjectD. Array答案:D2. 下面哪个语句用于在Visual Basic中声明一个变量?A. DimB. DeclareC. DefineD. Set答案:A3. 在Visual Basic中,以下哪个是正确的循环结构?A. LoopB. WhileC. DoD. Repeat答案:C4. 以下哪个属性用于设置控件的可见性?A. VisibleB. ShowC. HideD. Display答案:A5. Visual Basic中的事件通常与哪个关键字一起使用?A. SubB. FunctionC. EventD. Procedure答案:A6. 在Visual Basic中,以下哪个不是控件的属性?A. NameB. CaptionC. TypeD. Left答案:C7. 下列哪个不是Visual Basic的内置函数?A. LenB. UBoundC. SqrtD. Max答案:D8. 在Visual Basic中,以下哪个不是数组的声明方式?A. Dim arr(1 To 10)B. Dim arr() As IntegerC. ReDim arr(1 To 10)D. Dim arr As Variant答案:D9. 在Visual Basic中,以下哪个不是条件语句?A. IfB. Select CaseC. WhileD. Do答案:C10. Visual Basic中,以下哪个不是错误处理的关键字?A. On Error GoToB. On Error Resume NextC. On Error GoTo 0D. On Error Exit Sub答案:D二、填空题(每题2分,共10分)1. 在Visual Basic中,使用________关键字可以声明一个变量。

VB期末考试试题(A、B卷)

VB期末考试试题(A、B卷)

VB期末考试试题(A卷)一、选择题1。

要改变控件的宽度,应修改该控件的( B )属性。

A、TOPB、widthC、LeftD、Height2。

将命令按钮Command1设置为不可见,应修改该命令按钮的(A)属性。

A、VisibleB、ValueC、CaptionD、Enabled3.单机滚动条两端的任何一个滚动箭头,将触发该滚动条的( C )事件。

A、Scroll B 、KeyDown C、change D、Dragver 4。

( D )对象具有clear方法。

A、图片框B、窗体C、复选框D、列表框5.中心定义图片框控件的坐标系统,可采用该图片框的( A )A、scaleB、Scale XC、scale YD、setFocus 6。

将通过对话框CommdDialog1的类型设置成另存为对话框,可调用该控件的( B)方法。

A、ShowopenB、ShowsaveC、ShowColorD、ShowFont7。

形状控件所显示的图形不可能是( D )A、圆B、椭圆C、圆角正方形D、等边三角形8.由Fro K=10 TO oslept 3:next K循环语句控件的循环次数是( B )A、12B、0C、—11D、—109。

下列数据类型中,占用内存最大值是( D )A、BoolwanB、ByteC、LntegerD、Single 10。

如果在图片框上使用绘图方法绘制一个实心圆,则图片框的( C )属性决定了该图片的颜色。

A、BackColroB、ForelklorC、FillcolorD、Dlawstyle一、选择题1。

要在垂直位置上移动控件,应利用控件的( C )属性。

A、LeftB、WidthC、TopD、Height2。

要在文本框中的文本显示掩码(密码)符,在属性设置时,首先必须设置( D)属性为False。

A、TxetB、EnabledC、VisibleD、Multline 3。

用键盘的光标键选中某一菜单项,并按回车触发菜单的( C )的事件.A、KeyPressB、KeyDownC、ClickD、Keyllp4.一下( D )对象不具有Clear方法.A、列表框B、组合框C、剪贴框D、图片框5.软件列表中设定“文件列表”显示文件类型应改该控件的( D )属性。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

一、单项选择题(共10分)1.在代码中引用一个控件时,应使用控件的()属性。

A.C a p t i o n B.N a m e C.T e x t D.I n d e x 2.设变量x = 4,y = -1,a = 7,b = -8,下面表达式()的值为“假”。

A.x+a <= b-y B.x > 0 AND y < 0C.a = b OR x>y D.x+y > a+b AND NOT (y < b) 3.表达式Int(Rnd*71)+10产生的随机整数范围是()。

A.(10,80)B.(10,81)C.[10,80] D.[10,81]4.函数Sgn(3.1416)的返回值是()。

A.-1 B.0 C.1 D.以上都不对5.67890属于()类型数据。

A.整型B.单精度浮点数C.货币型D.长整型6.下列变量名中正确的是()。

A.3S B.Print C.Select My Name D.Select_17.下列赋值语句()是有效的。

A.sum = sum -sum B.x+2 = x + 2 C.x + y = sumD.last = y / 08.以下的控件或方法具有输入和输出双重功能的为()。

A.Print B.Textbox C.Optionbutton D.Checkbox9.若要获得列表框中被选中的列表项的内容,可以通过访问()属性来实现。

A.Name B.ListIndex C.ListCount D.Text10.下列代码的运行结果为()。

Private Sub command1_click()Dim m(10)For k = 1 To 10m(k) = 11 - kNext kx = 5Print m(2 + m(x))End SubA.2 B.3 C.4 D.5二、填空题(10分)1.写出整数n能同时被13和17整除的Basic表达式。

2.代码窗口中有两个下拉列表框:左侧是列表框,右侧是过程列表框。

3.写出在字符串”Visual Basic 6.0” 中截取”Visual” 的Basic表达式。

4.函数Len(“abcdef”)的返回值是。

5.设a = 2,b = 5,c = -2,d = 100,则a > b >= c AND a < b >= d的值为。

6.要使标签的大小自动与所显示的文本相适应,可以通过设置属性为True来实现。

7.若要在一行书写多条语句,则各语句间应加分隔符,Visual Basic的语句分隔符为。

8.要强制显式声明变量,使用__________语句完成。

9.在VB中,用户定义常量使用语句,声明变量使用语句。

三、将下列数学表达式转换为VB表达式。

(6分)1.a2+2ab+b2 __________________________2.__________________________3.8exln10 __________________________4.2sin(450)cos(450) _______________________________5.___________________________________________6.___________________________________________四、判断题,正确打“√”,错误打“×”(10分)1.在VB中,控件的事件只能通过用户的操作触发。

()2.字符型数据以双引号作为定界符,输出时双引号本身不会显示在屏幕上。

()3.保存工程时,窗体文件和工程文件的文件名不能相同。

()4.改变控件的大小,可以使用鼠标和键盘,还可以通过修改代码。

()5.同一过程中,数组和简单变量可以同名。

()6.VB函数中的参数可以是常量、变量、表达式,还可以是另一个函数。

()7.代码Const Number1=15:Number1=10合法。

()8.允许将块If-Then语句结构中的所有语句都写在一行上()9.定义数组语句Dim a(b) As Integer 是正确的()10.在过程调用中,“实参表”和“形参表”中对应的变量名不必相同,但是变量的个数必须相等,而且实际参数的类型必须与相应形式参数的类型相符。

()五、根据题意,将下列程序补充完整。

(16分)1.产生20个[10,100] 之间的随机整数,每行输出10个数据。

Private Sub command1_click()Dim a(1 To 20) As IntegerRandomizei = 0Do While i < 20i = i + 1a(i) = ( )If ()ThenPrint a(i);End IfIf i = 10 Then Print a(i)If i > 10 Then Print a(i);LoopEnd Sub2.打印九九乘法表Private Sub command1_click()For i = 1 To 9For j = 1 To 9Print ()Next jPrint()End Sub3.判断一个数是否素数Private Sub command1_click()x = InputBox("请输入一个整数")flag = 1For i = 2 To ()If x Mod i = 0 Thenflag = 0End IfNext iIf ()Then Print x; "是素数" Else Print x; "不是素数"End Sub4.利用数组输出Fibonacci数列的前15项。

该数列的第1项和第2项为1,其余各项均为其前两项之和。

Private Sub Command1_Click()()f(1) = 1 : f(2) = 1List1.AddItem f(1) : List1.AddItem f(2)For i = 3 To 15f(i) = ()List1.AddItem f(i)Next iEnd Sub六、写出下面程序的输出结果。

(每题3分,共18分)1.Private Sub command1_click()x = InputBox("enter x") ' x 的输入值为-8Select Case Sgn(x) + 2Case 1Print "y="; x ^ 2 + 1Case 2Print "y="; x - 4Case 3Print "y="; x ^ 3 + 100End SelectEnd Sub2.Private Sub command1_click()Dim a, b, c, d, e As Stringa = "Zheng Zhou"b = "Zhong Yuan Gong Xue Yuan"c = a + " " + bd = Left(a, 1) + Mid(a, 7, 1)e = Left(b, 1) + Mid(b, 12, 1)Print cPrint d; eEnd Sub3.设有Sub过程:Private Sub p1(x As Integer, ByVal y As Integer) x = 4 :y = 5 :z = 6End Sub则如下程序段的运行结果是:Private Sub Command1_Click()Dim x As Integer, y As Integerx = 1: y = 2: z = 3Print x, y, zCall p1(x, y)Print x, y, zEnd Sub4.Private Sub command1_click()k = 0For i = 1 To 3k = k + 1a = i * i * kPrint a;Next iEnd Sub5.Private Sub command1_click() Dim a(5, 5) As IntegerFor i = 1 To 5For j = 1 To 5a(i, j) = i * 2 + jPrint a(i, j);Next jPrintNext iEnd Sub6.设有Function过程:Private Function f1(b, a)a = a * a:b = b * bf1 = a - bEnd Function则如下程序段的运行结果是什么?Private Sub command1_click()a = 4:b = 3a = f1(a, b)Print aEnd Sub七.编程题(共30分)注意:艺术类学生(环艺、装潢、表演、服设)做第1、2、5、6小题;其他学生做第1、2、3、4 小题。

1.给出一个百分制的成绩,要求输出成绩的相应等级。

(7分)90分以上为“A”,80~89分为“B”,70~79分为“C”,60~69分为“D”,60分以下为“E”。

2.求n!,n由键盘输入。

(7分)3.产生20个[0,99] 之间的随机整数,并按从小到大的顺序输出。

(8分)4.产生并输出一个6×6的二维数组A:(8分)(1)两条对角线上元素的值为1,其余元素为小于30的随机整数。

(2)计算各行元素的平均值,输出平均值最大和平均值最小的行号。

5.输出1+2+……+100的和,并求出1~100 之间能被17整除的数据的个数(8分)6.从键盘输入10个数,求出其中的最大数,最小数和平均值。

(8分)VB试题答案及评分标准一、单项选择题(每题1分,共10分)1.B 2.A 3.C 4.C 5.D6.D 7.A 8.B 9.D 10.B二、填空题(每空1分,共10分)1.n Mod 13=0 And n Mod 17=01、对象3.LEFT(“Visual Basic 6.0”,6)4.65.False6.Autosize7.:8.Option Explict 9.Const Dim三、将下列数学表达式转换成VB表达式(每题1分,共6分)1、a^2+2*a*b+b^22、x^(1/3)*y^(1/4)3、8*exp(x)*log(10)4、2*sin(3.1416/4)*cos(3.1416/4)5、(x+y+z)/sqr(x^2+y^2+z^2)6、log(1+abs((a+b)/(a-b)))四、判断题(每题1分,共10分)1.×2.√ 3.×4.√ 5.×6.√ 7.×8.×9.×10.√五、根据题意,将下列程序补充完整(每空1分,共10分)1.(1)int(rnd*91)+10 (2)I<102.(1)i*j (2)next i3.(1)int(sqr(x))或者x-1 (2)flag=14.(1)dim f(15) as integer (2)f(I-1)+f(I-2)六、写出下面程序的输出结果(每题4分,共24分)1、y=652、Zheng Zhou Zhong Yuan Gong Xue Yuan 2分ZZZG 2分3.1 2 34 2 34.1 8 275.3 4 5 6 75 6 7 8 97 8 9 10 119 10 11 12 1311 12 13 14 156.-7七、编写程序1. private sub command1_click()dim x as integer,grade as string 1分x=text1.text 1分select case x 4分case 90 to 100grade=”A”case 80 to 89grade=”B”case 70 to 79grade=”C”case 60 to 69grade=”D”case is<60grade=”E”case elsemsgbox “请重新输入”end selectprint “该学生成绩为”+grade 1分end sub2.Private Sub command1_click()Dim n as integer,f as long 1分n=text1.text 1分f=1for I=1 to n 3分f=f*Inext Itext2.text=f 2分end sub3.Private Sub Command1_Click()Dim a(1 To 20) As Integer ' 1分RandomizeFor i = 1 To 20 2分a(i) = Int(Rnd * 100)Print a(i);NextPrintFor i = 1 To 19 3分For j = i + 1 To 20If a(i) > a(j) Thent = a(i): a(i) = a(j): a(j) = tEnd IfNext jNext iFor i = 1 To 20 2分Print a(i);Next iEnd Sub4.Private Sub Command1_Click()Dim a(1 To 6, 1 To 6) As Integer ' 1分Dim aver As SingleRandomizeFor i = 1 To 6 3分For j = 1 To 6If i = j Or i + j = 7 Thena(i, j) = 1Elsea(i, j) = Int(Rnd * 30)End IfPrint a(i, j);Next jNext iPrintMax = 0: Min = 30 4分For i = 1 To 6s = 0For j = 1 To 6s = s + a(i, j)Next javer = s / 6If aver > Max Then Max = aver: row_max = I If aver < Min Then Min = aver: row_min = i Next iPrint row_max, row_minEnd Sub5.Private Sub Command1_Click()Dim i As Integer, c As IntegerDim s As IntegerFor i = 1 To 100 4分s = s + iIf i Mod 17 = 0 Then c = c + 1Print "1+2+...+100="; s 2分Print "能被17整数的数据有"; c; "个" 2分End Sub6.Private Sub Command1_Click()Dim x As Integerx = InputBox("x=") 1分Print x;Max = x: Min = x: s = x 2分For i = 2 To 10 3分x = InputBox("x=") :Print x;s = s + xIf x > Max Then Max = xIf x < Min Then Min = xNext iPrint s / 10 1分Print Max, Min 1分End Sub。

相关文档
最新文档