(1)以下叙述错误的是___A_____。
A.打开一个窗体文件时,系统自动装入与该窗体有关的工程文件
B.事件可以由用户激发,也可由系统激发
C.打开一个工程文件时,系统自动装入与该工程有关的窗体等文件
D.保存VB应用程序时,应分别保存窗体文件和工程文件
(2)VB6.0 集成开发环境不包括___C____窗口。
A.代码窗口
B.属性窗口
C.DOS界面窗口
D.窗体窗口
(3)下面所列符号中,____C_____不是数据类型说明符。
A. !
B. %
C. ?
D. #
(4)在 VB 中,对于已经声明但没有赋值的布尔型变量,系统的默认值是____C_______。
A.1
B.0
C.False
D.True
(5)下面所列中,_____C_____是合法的字符常数。
A.ABC
B.'ABC'
C."ABC"
D.ABC$
(6)表达式 Int(8*sqr(36)*10^(-2)*10+0.5)/10 的值是___D_____。
A.0.48
B.0.048
C.0.05
D.0.5
(7)数学表达式 3≤X<10 在 VB 中的逻辑表达式为____C______。
A.x>=3 OR X<10
B.3<=x AND<10
C.3<=x AND x<10
D.3<=x<10
(8)MsgBox 函数,返回值的类型是_____B_____。
A.数值或字符串
B.整型数值
C.字符串
D.变体
(9)已知 A$="12345678" ,则表达式 Val(Left$(A$,4)+Mid$(A$,4,2)) 的值为___C_______。
A.6
B.8
C.123445
D.123456Visual Basic
(10)程序设计语言中,响应对象的外部动作称为____D_____,而对象可以执行的动作或对象本身的行为则称为________。
A.属性,方法
B.过程,事件
C.方法,事件
D.事件,方法
(11)在 Visual Basic 中称对象的数据为___D_______。
A.方法
B.事件
C.封装
D.属性
(12)当标签的标题内容太长,需要根据题目自动调整标签的大小时,应设置标签的___A____属性为 True。
A.AutoSize
B.Visible
C.Enabled
D.WordWrap
(13)要在窗体 Form1 内显示字符串 "MyForm",可以使用的语句是__B______。
A.Form1. Caption="MyForm"
B.Form1.Print "MyForm"
C.Form.Caption="MyForm"
D.Form.Print "MyForm"
(14)在窗体上有一个命令按钮,然后编写如下事件过程
Private Sub Cmd1_click()
a= inputbox("Enter the First Integer")
b= inputbox("Enter the Second Integer")
print a+b
End Sub
程序运行后,单击命令按钮,先后在两个输入框中分别输入"1"和"3",则输出结果为__B____。
A.4
B.31
C.1
D.13
(15)若在消息框 MsgBox 中显示 "确定(OK)" 和 "取消(Cancel)" 两个按钮,则 Buttons 参数的设置值是___D____。
A.3
B.2
C.0
D.1
(16)以下 Case 语句中错误的是___A____。
A.Case Is>10 And Is<5
B.Case 3£?5£?Is>10
C.Case Is>10
D.Case 0 to 10
(17)执行程序段:x=8:If x>10 Then Print x Else Print x+1 ,显示的运行结果是___D_____。
A.8
B.0
C.10
D.9
(18)执行语句"For i=1 to 3:i=i+1:Next i"后变量i的值是___C___。
A.6
B.4
C.5
D.3
(19)执行下列程序段输出的结果是____A___。
X%=2
Do While x<8
Print "*";
X=x+2
Loop
A.***
B.****
C.*
D.**
(20)由 Array 函数建立的数组,其变量必须是___C____类型。
A.字符型
B.整型
C.变体型
D.字符串类型
(21)下列叙述中,错误的说法是____D_______。
A.使用Redim语句可以改变数组每维数的大小
B.使用Redim语句可以对数组的元素初始化
C.使用Redim语句可以改变数组的维数
D.使用Redim语句可以改变数组的类型
(22)编写如下事件过程:
Private Sub Form_Click()
Dim x$,y$,Z$,i%
x="祝你成功"
y="1234"
For i=1 To 4
Z=Z+Mid(x,i,1)+Right(y,1)
Next i
Print Z
End Sub
程序运行后,单击窗体,则窗体上显示的内容是____B_______。
A.祝你成功1234
B.祝4你4成4功4
C.祝1你1成1功1
D.1234祝你成功
(23)设已定义函数过程 f,它有三个整型数值参数,再设 a, b 和 c 为实型变量,则调用该函数过程使用的语句为___D_____。
A.f a+b, b+c, c+a
B.f
C.f(a+b, b+c)
D.f(a+b, b+c ,c+a)
(24)有如下程序:
Private Sub Form_Click()
Dim a As Integer, b As Integer
a = 10:
b = 20
Call pl(a,b)
Print "a="; a; "b="; b
End Sub
Private Sub pl(ByVal x As Integer, y As Integer)
x = 5
y = x + y
End Sub
程序运行时,单击窗体后,窗体上显示的值是___C_____。
A.a=5 b=20
B.a=10 b=20
C.a=10 b=25
D.a=5 b=25
(25)要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮,只要对____C______
属性设置就有效。
A.Width
B.MinButton
C.BorderStyle
D.MaxButton
(26)要使控件在运行时不可显示,应对____C____属性进行设置。
A.Caption
B.Enabled
C.Visible
D.BackColor
(27)在 Visual Basic 中,下列控件中, ___D_____控件可以包含其他控件。
A.CheckBox
B.TextBox
C.Image
D.Frame
(28)程序运行后,在窗体上单击鼠标,此时窗体的事件不会发生的是__A_____。
A.Load
B.MouseDown
C.MouseUp
D.Click
(29)在 Visual Basic 中要将一个正在运行的窗体隐含在内存中,应该使用语句___C_____。
A.UnLoad
B.Load
C.Hide
D.Show
(30)在 Visual Basic 中最基本的对象是____D____,它是应用程序的基石,是其它控件的容器。
A.文本框
B.命令按钮
C.标签
D.窗体
大学VB考试题库 一、单项选择题 1、与传统的程序设计语言相比,Visual Basic最突出的特点是()。 A、结构化程序设计 B、程序开发环境 C、事件驱动编程机制 D、程序调试技术 2、赋值语句:a=123& MID("123456",3,2)执行后,a变量中的值是()。 A、"12334" B、123 C、12334 D、157 3、保存一个工程至少应保存两个文件,这两个文件分别是(B)。 A、文本文件和工程文件 B、窗体文件和工程文件 C、窗体文件和标准模块文件 D、类模块文件和工程文件 4、以下能在窗体Form1的标题栏中显示"VisualBasic窗体"的语句是(C)。 A、https://www.wendangku.net/doc/872157839.html,="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=30 B、y=π*r*r C、y=x+30 D、3y=x 8、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)属性进行设置。 A、Backcolor B、ForeColor C、AutoRedraw D、BackStyle 11、若要使命令按钮不可操作,要对(A)属性进行设制。 A、Enabled B、Visible C、BackColor D、Caption 12、以下叙述中错误的是(B)。 A、一个工程中可以包含多个窗体文件 B、在一个窗体文件中用Private定义的通用过程能被其他窗体调用 C、在设计VB程序时,窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件。 D、一个工程默认的启动对象是Form1 13、Cls方法可以清除窗体或图片框中的(C)内容。 A、在设计阶段使用Picture设置的背景位图 B、在设计阶段放置的控件 C、在运行阶段产生的图形和文字 D、以上均可 14、设x=3,y=5,则以下表达式值为真的是 (C) A、(-3+5>x) And (y>0) B、(x<0) Eqv (y>0) C、(x>y) Or (y>0) D、x>=y And y>10 15、为了防止用户随意将光标置于控件之上,应将进行(D)设置。 A、将控件的TabIndex属性设置为0
一、单选题(每小题1分,共99 分) 1. 假定Picture1 和Text1 分别为图片框和文本框的名称,下列语句中不正确的是______ 。 A Picture1.Print 25 B Text1.Print 25 C Print 25 D Debug.Print 25 2. 在Visual Basic 中要将一个窗体从内存中释放,应该使用以下语句中的______ 。 A UnLoad B Stop C Close D Hide 3. 如果组合框ComBo1中已有10项数据,应使用语句______将数据"Mydata"插入到第5项。 A ComBo1.Insert "Mydata", 4 B ComBo1.Insert "Mydata", 5 C ComBo1.AddItem "Mydata", 5 D ComBo1.AddItem "Mydata", 4 4. 如果列表框List1中已有10项数据,应使用语句______将数据"Mydata"插入到列表框的第3项。 A List1.Insert "Mydata", 3 B List1.AddItem "Mydata", 2 C List1.AddItem "Mydata" ,3 D List1.Insert "Mydata", 2 5. 语句If x=1 Then y=1,下列说法正确的是____________。 A x=1和y=1为赋值语句 B x=1为赋值语句,y=1为关系表达式 C x=1为关系表达式,y=1为赋值语句 D x=1和y=1均为关系表达式 6. 删除列表框中指定的项目所使用的方法为______ 。 A Move B Clear C Remove D RemoveItem 7. 不论何控件,共同具有的属性是______________。 A ForeColor B Name C Text
题目描述 418 VB中,(B)控件对象在运行时一定不显示。A:Label B:Timer C:TextBox D:CommandButton 419 VB中,将Interval属性值设置为(D)时,计时器控件每隔5秒钟产生一个计时器事件。A:5 B:500 C:300 D:5000 420 VB中,可以弹出一个对话框的函数是(D)A:Int() B:Rnd() C:V al() D:MsgBox() 421 VB中,Rnd(B)函数的值不可能是(B)A:0 B:1 C:0.1234 D:0.00005 422 VB中,Int(5.9)的返回值是(C)A:3 B:4 C:5 D:6 423 "下面程序的运行结果是(B) Private Sub Command1_Click(B) Text1.Text = ""123"" Text2.Text = ""321"" a = Text1.Text + Text2.Text Print a End Sub" A:444 B:123321 C:321123 D:132231 424 VB中正确的循环语句是(B)A:For x=1 to step 10 B:For x=1 to 10 step 2 C:For x=1 to 10 step -1 D:For x=10 to 1 425 "下面程序的运行结果是(B) Dim a As Integer, b As Integer a=6 b=15 S=1+(a*b)/2 Print S" A:6 B:46 C:15 D:45 426 "VB中,执行下面的程序段后,b的值为(A) a = 100 b = 20 a = a + b b = a - b" A:100 B:120 C:20 D:80 427 "x=10 If x<=12 then y=2*x+6 Else y=x/2 End If 上述程序段中y的值是(A)" A:26 B:25 C:10 D:5 428 "下列程序段的运行结果是(C) x=3 Select Case x Case 5 Print ""优秀"" Case 4 Print ""良好"" Case 3 Print ""通过"" Case Else Print ""不通过"" End Select" A:优秀B:良好C:通过D:不通过 429 执行Do……Loop Until语句时(B)A:先判断后循环B:先循环后判断C:顺序执行D:其余说法都不对 430 VB中,定义a为整型变量的语句是(A)A:Dim a As Integer B:Dim a As Single C:Dim a As Date D:Dim a As Byte 431 对VB窗体中控件的操作错误的是(A)A:单击Delete键一次只能删除一个控件B:单击Delete键一次可以同时删除多个控件C:按住Shift键,依次单击每个要选择的控件,可以同时选中多个控件D:按住Ctrl键,依次单击每个要选择的控件,可以同时选中多个控件 432 VB中,多个语句写在同一行时,每个语句之间用(B)符号分隔。 A:, B:: C:. D:; 433 VB中,一条语句要分行书写,用(C)符号作续行符。A:“-”B:“+”C:“_” D:“…” 434 "下列VB程序段执行后x的值为(B)a=8 If a<9 Then x=9 End If Print x" A:8 B:9 C:0 D:1 435 在VB中,表达式9\4的结果是(B)A:2.5 B:2 C:3 D:40 436 在VB中,Int(23.512)的值为(D)A:-23 B:-24 C:24 D:23 437 VB中,定义a为实型变量的语句是(B)
一、有如下程序段: x=7 If x>5 Then y=11-2*x Else y=10+x^2 End If 该程序段运行后,变量y 的值是() ZR_A=-3 ZR_B=5 ZR_C=10 ZR_D=59 —————————————————————————————————————————二、如图所示算法的功能是() ZR_A=按从小到大的顺序输出两个变量的值 ZR_B=按从大到小的顺序输出两个变量的值 ZR_C=交换两个变量的值 ZR_D=找出两个变量中的较小者————————————————————————————————————————— 三、有如下程序段: t=5 If t<>5 Then f=10 Else f=10+(t-3)*2 End IF 该程序段运行后,变量f的值是() ZR_A=5 ZR_B=10 ZR_C=14 ZR_D=20 —————————————————————————————————————————
四、流程图如图所示,若输入x的值为0,则输出结果是() ZR_A=10 ZR_B=16 ZR_C=4 ZR_D=-4 —————————————————————————————————————————五、淄博市规定60岁及以上老年人可以办理老年证,办证的流程如下图,这属于()。 ZR_A=双路径决策ZR_B=多路径决策ZR_C=计数循环ZR_D=变量—————————————————————————————————————————六、某商场香蕉每斤1.5元,为了促销,规定购买4斤或4斤以上打八折,不足4斤的按原价格销售。下面是用VB编写的程序,红线上应填入的语句是()。 ZR_A=y = 1.5 * x * 0.8 ZR_B=y = 1.5 * x /4 ZR_C=y = 4 * x * 0.8 ZR_D=y = 1.5 * x * 0.2 —————————————————————————————————————————
VB常用字符串操作函数2009/11/25 18:321. ASC(X,Chr(X:转换字符字符码[格式]: P=Asc(X 返回字符串X的第一个字符的字符码 P=Chr(X 返回字符码等于X的字符 [范例]:(1P=Chr(65 ‘ 输出字符A,因为A的ASCII码等于65 (2P=Asc(“A” ‘ 输出65 2. Len(X:计算字符串X的长度 [格式]: P=Len(X [说明]:空字符串长度为0,空格符也算一个字符,一个中文字虽然占用2 Bytes,但也算 一个字符。 [范例]: (1 令X=”” (空字符串 Len(X 输出结果为0 (2 令X=”abcd” Len(X 输出结果为4 (3 令X=”VB教程” Len(X 输出结果为4 3. Mid(X函数:读取字符串X中间的字符 [格式]: P=Mid(X,n 由X的第n个字符读起,读取后面的所有字符。 P=Mid(X,n,m 由X的第n个字符读起,读取后面的m个字符。 [范例]: (1 X=”abcdefg” P=Mid(X,5 结果为:P=”efg” (2 X=”abcdefg” P=Mid(X,2,4 结果为 P=”bcde” 4. R eplace: 将字符串中的某些特定字符串替换为其他字符串 [格式]: P=Replace(X,S,R [说明]:将字符串X中的字符串S替换为字符串R,然后返回。[范例]:X=”VB is very good” P=Replace(X,good,nice 输出结果为:P=”VB is very nice” 5. StrReverse:反转字符串 [格式]: P=StrReverse(X [说明]:返回X参数反转后的字符串 [范例]:(1)X=”abc” P=StrReverse(X 输出结果:P=”cba” 6. Ucase(X,Lcase(X:转换英文字母的大小写 [格式]:P=Lcase(X ‘ 将X字符串中的大写字母转换成小写P=Ucase(X ‘ 将X字符串中的小写字母转换成大写 [说明]:除了英文字母外,其他字符或中文字都不会受到影响。 [范例]:(1)令X=”VB and VC” 则Lcase(X的结果为”vb and vc”,Ucase(X的结果为”VB AND VC” 7. InStr函数:寻找字符串 [格式]: P=InStr(X,Y 从X第一个字符起找出Y出现的位置 P=InStr(n,X,Y 从X第n个字符起找出Y出现的位置 [说明]:(1)若在X中找到Y,则返回值是Y第一个字符出现在X中的位置。(2) InStr(X,Y相当于 InStr(1,X,Y。(3)若字符串长度,或X为空字符串,或在X中找不到Y,则都 返回0。(4)若Y为空字符串,则返回0。 ---------------------------------------------------------------------------------------------- mid(字符串,从第几个开始,长度 ByRef 在[字符串]中[从第几个开始]取出[长度个字符串] 例如 mid("小欣无敌",1,3 则返回 "小欣无" instr(从第几个开始,字符串1,字符串2 ByVal 从规定的位置开始查找,返回字符
序号题干答案 1 VB是一种面向对象的程序设计语言。对 2 VB通过窗体管理构成应用程序的各类文件的集合。错 3 VB支持弹出菜单,所谓“弹出菜单”是指单击鼠标后打开的 菜单。 错 4 Visual Basic程序的运行,仅能从某一窗体启动,如Form1 窗体。 错 5 Visual Basic程序的运行可以从Main()过程启动,也可以从 某 个窗体启动。 对 6 Visual Basic提供的几种标准坐标系统的原点都是在绘图区 域 的左上角,如果要把坐标原点放在其它位置,则需使用自定 义 坐标系统。 对 7 单击并拖拽工具箱中所需的控件到窗体上即可完成添加控件 任务. 错 8 Dim i, j as integer 表明i和j都是整型变量。错 9 Single 和Double型用于保存浮点数,在VB中定义单精度浮 点8位 ,双浮点16位. 错 10 Visual_basic是合法的变量名。对 11 可以用"&","+"合并字符串,但是用在数值变量时,"+"可能 会 将两个数值加起来。 对 12 某一过程中的静态变量在过程结束后,静态变量及其值可以 在 其它过程中使用。 错 13 全局变量用global或public关键字声明,且仅在通用声明 处可 以定义。 错 14 如果某子程序add用public static sub add()定义,则该子 程 序的变量都是局部变量。 错
15 设A=3,B=4,C=5,D=6,则表达式A>B And C<=D Or 2*A>C 的值是False。 错 16 所有的VB 的变量,都有隐含说明字符和强调声明两种方法来 定义. 错 17 在VB中,运算 "ABCDE123A" Like "[a*a] " 的结果是True。错 18 在VB中,运算 "D" Like "[! A-Z]" 的结果是True. 错 19 在VB中,运算"ABA"Like"[a?a]"的结果是False。对 20 MsgBox()函数建立的消息框能显示信息也能输入信息。错 21 MsgBox()函数建立的消息框能显示信息也能输入用户的信 息. 错 22 Picture图片框既可用来显示图片和绘制图形,也可用Print 方 法来显示文字. 错 23 在框架控件内的几个单选按钮中,可有一个或多个单选按钮 的Value属性为True。(正确答案:只有一个) 错 24 *.bmp格式的图片,如果在autosize设为False的图片框, 它会 以图片框大小完整显示出来。 错 25 “菜单编辑器”中至少要填“名称”和“标题”这两个框, 才 能正确完成菜单栏的设计。 错 26 ActiveX控件是扩展名为*.ocx的独立文件,使用时需用 “工程”/“部件”载入或移去。 对 27 Circle方法绘制扇形或圆弧图形时,图形的形状不仅与起始 角、 终止角的大小相关,而且与起始角、终止角的正或负相关。 对 28 Frame控件是一种容器控件,因此它可有它自己的坐标系. 错 29 Function函数有参数传递,并且一定有返回值。错 30 Image控件不能用作容器使用。对 31 Image控件使用的资源比Picture控件使用的多. 错 32 Line(500,500) – (2500,2500) 命令能够正确画出矩形。错 33 List1.Clear是清除List1的全部列表项,所以Clear是对象 的方法。 对 34 move方法的一般形式是:对象名.move A,B[,C,D],其中A指 Left ,C 指width. 错
ASP纯ASP VBscript常用函数: 1.数值型函数: abs(num): 返回绝对值 sgn(num): num>0 1; num=0 0; num<0 -1;判断数值正负 hex(num): 返回十六进制值直接表示:&Hxx 最大8位 oct(num): 返回八进制值直接表示:&Oxx 最大8位 sqr(num): 返回平方根num>0 int(num): 取整int(99.8)=99; int(-99.2)=100 fix(num): 取整fix(99.8)=99; fix(-99.2)=99 round(num,n): 四舍五入取小数位round(3.14159,3)=3.142 中点数值四舍五入为近偶取整round(3.25,1)=3.2 log(num): 取以e为底的对数num>0 exp(n): 取e的n次幂通常用num^n sin(num): 三角函数,以弧度为值计算(角度*Pai)/180=弧度con(num); tan(num); atn(num) 2.字符串函数: len(str):计算字符串长度中文字符长度也计为一! mid(str,起始字符,[读取长度]):截取字符串中间子字符串 left(str,nlen):从左边起截取nlen长度子字符串 right(str,nlen):从右边起截取nlen长度子字符串 Lcase(str):字符串转成小写 Ucase(str):字符串转成大写 trim(str):去除字符串两端空格 Ltrim(str):去除字符串左侧空格 Rtrim(str):去除字符串右侧空格 replace(str,查找字符串,替代字符串,[起始字符,替代次数,比较方法]):替换字符串 注:默认值:起始字符1;替代次数不限;比较方法区分大小写(0)
VB测验选择题真题精选
————————————————————————————————作者:————————————————————————————————日期:
VB考试真题精选,考前必备神器20 开通黄钻 21, a = 1: b = 2: plus S, a, b: Print S:不能使其输出结果为3的plus过程为( b )。(1分) A、Sub plus(sum, a , b ): sum = a + b: End Sub B、Sub plus(ByVal sum , a , b ): sum = a + b: End Sub C、Sub plus(sum , ByVal a, ByVal b ): sum = a + b: End Sub D、 D、Sub plus(sum , ByRef a , ByRef b ): sum = a + b: End Sub 22、通过关键字( c )声明的局部变量,在整个程序运行中一直存在。(1分) A、Dim B、Public C、Static D、Private 23、过程的作用域分为( c )。(1分) A、窗体级和局部级 B、模块级和局部级 C、窗体/模块级和全局级 D、窗体/模块级和局部级 24、在窗体的通用段声明变量时,不能使用( d )关键字。(1分) A、Dim B、Public C、Private D、Static 25、能在一个工程的所有程序中使用的变量,称为( b )。(1分) A、局部变量 B、全局变量 C、窗体级变量 D、模块级变量 27、使用Public Const语句声明一个全局的符号常量时,应该将该语句放在( b )。(1分)
VB 编程基础判断题(0错误 1正确) 1. Excel 可以处理电子表格数据,所以它是程序设计语言。答案: 0 2. 每种程序设计语言都有自己的语法和规则。答案:1 3. 使用VB 设计程序时,可以不用创建工程。答案:0 4. 通常状况下,我们会通过两种方法修改对象属性,一种是利用属性窗口,另一种是利用代码。答案:1 5. 在 VB 开发环境中,如果对象窗口工具箱工程资源管理器属性窗口和窗体布局窗口等被关闭,可以通过“视图”菜单再次打开。答案:1 6. 在VB 窗体中添加第一个标签控件后,该标签控件的Caption 标题属性设置的默认值是“command1”。答案:答案:0 7. 在VB 中,可以借助键同时选中多个对象。答案:1 8. 在VB 中,调整选中的多个控件的大小和位置时,要最后选中作为调整依据的控件。答案:1 9. 在VB 中,一个程序可能包含若干个不同的文件,但一定不包括工程文件和窗体文件。答案:0 10. 在VB 中,一个程序中的工程文件扩展名为vbp ,窗体文件扩展名为frm。答案:1 11. 在VB 中,要想让同一窗体上的3 个按钮控件的大小相同,可以使用“格式”菜单中的“统一尺寸”子菜单的“两者都相同”命令。答案:1 12. 在VB 中,标签一般用来显示信息,文本框用来接受用户输入的信息。答案:1 13. 在VB 程序中,被使用的窗体和控件统称为对象。答案:1 14. 在VB 中,属性窗口通常显示的是当前被选中的对象的具体属性。答案:1 15. 在VB 中,对象的“名称”和“Caption”是两种相同的属性。答案:0 16. 在VB 中,标签和命令按钮显示的文字由其“Text”属性确定,文本框中显示的文字由其“Caption”属性确定。答案:0 17. 在VB 中我们可以接触两种程序界面,一种是窗体中不带网格点的设计界面,另一种是带网格点的运行界面。答案:0 18. 属性窗口有两个选项卡,一个是按字母排序别一个是按类进行排,但都是用来显示某一对象的各种属性的。答案:1 19. 在VB 中,语句命令中的符号,都必须是英文字符。答案:1 20. 在VB 中,一个对象只能响应一种事件。答案:0 21. VB 的代码窗口包括对象名框事件过程名框和代码编辑区3 部分。答案:1 22. 在VB 中,125 是数值型数据,"125"也是数据型数据。答案:0 23. 在VB 中,可以使用“User & name”作为变量名。答案:0 24. 在VB 程序中,使用Option Explicit 后,如果再使用未加声明的变量,运行程序时会出现错误提示。答案:1 25. 在VB 中CStr 函数可以将数值型表达式的值转换成对应的字符串。答案:1
定制模块行为 (1) Option Explicit ''强制对模块内所有变量进行声明 Option Private Module ''标记模块为私有,仅对同一工程中其它模块有用,在宏对话框中不显示Option Compare Text ''字符串不区分大小写 Option Base 1 ''指定数组的第一个下标为1 (2) On Error Resume Next ''忽略错误继续执行VBA代码,避免出现错误消息 (3) On Error GoTo ErrorHandler ''当错误发生时跳转到过程中的某个位置 (4) On Error GoTo 0 ''恢复正常的错误提示 (5) Application.DisplayAlerts=False ''在程序执行过程中使出现的警告框不显示 (6) Application.ScreenUpdating=False ''关闭屏幕刷新 Application.ScreenUpdating=True ''打开屏幕刷新 (7) Application.Enable.CancelKey=xlDisabled ''禁用Ctrl+Break中止宏运行的功能 工作簿 (8) Workbooks.Add() ''创建一个新的工作簿 (9) Workbooks(“book1.xls”).Activate ''激活名为book1的工作簿 (10) ThisWorkbook.Save ''保存工作簿 (11) ThisWorkbook.close ''关闭当前工作簿 (12) ActiveWorkbook.Sheets.Count ''获取活动工作薄中工作表数 (13) https://www.wendangku.net/doc/872157839.html, ''返回活动工作薄的名称 (14) https://www.wendangku.net/doc/872157839.html, ‘返回当前工作簿名称 ThisWorkbook.FullName ‘返回当前工作簿路径和名称 (15) ActiveWindow.EnableResize=False ‘禁止调整活动工作簿的大小 (16) Application.Window.Arrange xlArrangeStyleTiled ‘将工作簿以平铺方式排列 (17) ActiveWorkbook.WindowState=xlMaximized ‘将当前工作簿最大化 工作表 (18) https://www.wendangku.net/doc/872157839.html,edRange.Rows.Count ‘当前工作表中已使用的行数 (19) Rows.Count ‘获取工作表的行数(注:考虑向前兼容性) (20) Sheets(Sheet1).Name= “Sum”''将Sheet1命名为Sum (21) ThisWorkbook.Sheets.Add Before:=Worksheets(1) ''添加一个新工作表在第一工作表前 (22) ActiveSheet.Move After:=ActiveWorkbook. _
字符函数 函数名 功能 示例 ASC 返回一个Integer,代表字符串中首字母的字符代码。 Asc(string) CHR 返回String,其中包含有与指定的字符代码相关的字符 Chr(charcode) Format 返回Variant (String),其中含有一个表达式,它是根据格式表达式中的指令来格式化的。 Format(expression[, format[, firstdayofweek[, firstweekofyear]]]) Hex 返回代表十六进制数值的String。 Hex(number) InStr 返回Variant (Long),指定一字符串在另一字符串中最先出现的位置。 InStr([start, ]string1, string2[, compare]) InstrRev 返回一个字符串在另一个字符串中出现的位置,从字符串的末尾算起。 InstrRev(string1, string2[, start[, compare]]) Join 返回一个字符串,该字符串是通过连接某个数组中的多个子字符串而创建的。 Join(list[, delimiter]) LCase 返回转成小写的String。 LCase(string) Left 返回Variant (String),其中包含字符串中从左边算起指定数量的字符。 Left(string, length) Len 返回Long,其中包含字符串内字符的数目,或是存储一变量所需的字节数。
Len(string | varname) Ltrim Rtrim Trim 返回Variant (String),其中包含指定字符串的拷贝,没有前导空白(LTrim)、尾随空白(RTrim) 或前导和尾随空白(Trim)。 LTrim(string)RTrim(string)Trim(string) Mid 返回Variant (String),其中包含字符串中指定数量的字符。 Mid(string, start[, length]) Partition 返回一个Variant (String),指定一个范围,在一系列计算的范围中指定的数字出现在这个范围内。 Partition(number, start, stop, interval) Replace 返回一个字符串,该字符串中指定的子字符串已被替换成另一子字符串,且替换发生的次数也是指定的。 Replace(expression, find, replacewith[, start[, count[, compare]]]) Right 返回Variant (String),其中包含从字符串右边取出的指定数量的字符。 Right(string, length) Space 返回特定数目空格的V ariant (String)。 Space(number) Split 返回一个下标从零开始的一维数组,它包含指定数目的子字符串。 Split(expression[, delimiter[, count[, compare]]]) StrComp 返回Variant (Integer),为字符串比较的结果。 StrComp(string1, string2[, compare]) String 返回Variant (String),其中包含指定长度重复字符的字符串。 String(number, character) StrReverse 返回一个字符串,其中一个指定子字符串的字符顺序是反向的。 StrReverse(string1)
1.不论哪种控件,共同具有的属性是Name 2.要使某控件在运行时不可显示,应对其设置的属性是Visible 3.要是窗体在运行时不可改变窗体的大小和没有最大化、最小化按钮,需设置的属性是Borderstyle 4.当程序运行时,系统自动执行启动窗体的事件过程是Load 5.要判断在文本框中是否按下了Enter键,应在文本框的Keypress 事件中判断 6.要使标签控件显示时不覆盖其背景内容,要对其设置的属性是Backstyle 7.复选框的Value属性为0时,表示复选框未被选中 8.将数据项“语文”添加到列表框(list1)中成为第一项应使用的语句是“List1.Addltem”“语文”,“0” 9.执行下面的程序,列表框中的数据项有“1,3” Sub Form_Click() For i = 0 To 4 List1.AddItem i Next For i = 0 To 2 List1.RemoveItem i Next End Sub 10.如果列表框(list1)中没有被选定的项目,则执行List1.RemoveItem List1.ListIndex语句的结果是 D A.移去第一项 B.移去最后一项 C.移去最后加入列表的项 D.其他都不对 11.下列可以把当前目录下的图形文件Pic1.jpg装入图片框Picture1中的语句为“Picture1. Picture=Load Picture(“”Pic1.jpg””)” 12.假定在图片框Picture1中装入了一个图形,为了清除该图形(不是删除图片框)应采用的正确方法是“执行语句Picture1. Picture =Load Picture(“””’”)” 13.当组合框的Style属性值设置为2时,其为下拉式列表框 14.要使定时器无效应将Interval属性取值为0 15.假定定时器控件的Interval属性为1000,Enable属性为Ture,并且有下面的事件过程 Private Sub Timer1_Timer() Beep End Sub 计算机将发出Beep声的次数为 A.1000次 B.0次 C.1次 D.其他都不对 16.下面语句能正确地把列表框list1从1数起的第4项的内容设置为“aaaa”的是“List1.List(3)=””aaaa””” 17. 下面语句能正确地把列表框list1从1数起的第3项的内容设置为“aaaa”的是“List1.List(2)=””aaaa””” 18.在窗体上画一个文本框,为了在程序运行后隐藏该文本框,应使用的语句为Text1.Visible=False 19.在窗体上画一个文本框Text1和一个标签Label1,要求程序运行后,如果在文本框输入字符,则立即在标签中显示相同的内容,一下可以实现上述操作的事件过程的是 “Private Sub Text1_Change() Lebel1.Caption = Text1.Text
VB常用函数大全 现在的编程软件像VB,C++等,大多自带功能很强的函数库,可以很省力得完成各种功能。很多时候,想不起来实现某个功能的函数或函数格式,导致编程大费周折。作为一个编程人员,我对此深有体会。因此,特地准备了几期VB常用函数的介绍,供大家学习或参考。有说的不当之处,也欢迎在本网站的论坛中提出,大家学习。 (一)类型转换类函数 1、CType(X) [格式]: P=CBool(X) 将X转换为“布尔”(Boolean)类型 P=CByte(X) 将X转换为“字节”(Byte)类型 P=CCur(X) 将X转换为“金额”(Currency)类型 P=CDate(X) 将X转换为“日期”(Date)类型 P=CDbl(X) 将X转换为“双精度”(Double)类型 P=CHr(X) 返回字符码对应的字符 P=CInt(X) 将X转换为“整型”(Integer)类型 P=CLng(X) 将X转换为“长整型”(Long)类型 P=CSng(X) 将X转换为“单精度”(Single)类型 P=CStr(X) 将X转换为“字符串”(String)类型 P=Cvar(X) 将X转换为“变体型”(Variant)类型 P=CVErr(X) 将X转换为Error值 [ 范例]:(1) CStr(13)+CStr(23) 数值转换成字符串后,用“+”号连接,结果:1323 (2) CInt("12")+12 字符串转换成整型后与12相加,结果:24 (3) P=CInt(True) 输出结果为-1,布尔值与数值的转换时要注意,布尔值只有True和False,其中True在内存中为-1,False存为0 (4) CBool(-0、001) 输出结果为True。将数值转换为布尔型时,等于0的数值将得到False,不等于0的数值得到True 2、Int(X),Fix(X):取X的整数值 [格式]: P=Int(X) 取<=X的最大整数值 P=Fix(X) 取X的整数部分,直接去掉小数 [范例]:(1) Int(-54、6) 结果为-55,取<=-54、6的最大整数 (2) Fix(54、6) 结果为54,取整数并直接去掉小数 (二)常用数学函数 [格式]: 1、Abs(N) 取绝对值 例:Abs(-3、5) 结果:3、5 2、Cos(N) 余弦函数 例:Cos(0) 结果:1 3、Exp(N) e为底的指数函数 例:Exp(3) 结果:20、068 4、Log(N) 以e为底的自然对数
1、下列叙述中,错误的是( A )。(1分) A、一条语句可以分为多行书写,但要在上行末加上VBCrLf B、在同一行上书写多条语句,应在两两语句中加上:号 C、可以用Rem或'注释单行语句 D、VB程序代码不区分字母的大小写 2、下列叙述正确的是( D )。(1分) A、Visual Basic的事件是由用户定义的 B、Visual Basic程序从主窗体开始执行 C、Visual Basic程序是过程驱动的 D、保存一个Visual Basic程序,应分别保存其窗体模块、标准模块和工程文件 3、被对象所识别的动作与对象可执行的动作分别称为对象的( A )。(1分) A、方法、事件 B、事件、方法 C、事件、属性 D、过程、属性 4、下列关于VB编码规则的叙述中,正确的是( C )。(1分) A、一条语句可以分为多行书写 B、多条语句不能书写在同一行上 C、每条语句以分号;结尾 D、应用程序代码字母是区分大小写的 5、( D )不属于面向对象系统的三要素。(1分) A、事件 B、属性 C、方法 D、变量 6、下列叙述中,不正确的叙述是( C )。(1分) A、注释语句是非执行语句,仅对程序的有关内容起注释作用,客观存在不被解释和编译 B、注释语句能放在整个代码程序的最后 C、注释语句可以放在代码中的任何位置 D、代码中加入注释语句的目的是提高程序的可读性 7、下列叙述错误的是( B )。(1分) A、不允许使用行号与标号 B、单条语句可分行书写 C、同一行上可以书写多条语句 D、VB代码不区分字母的大小写 8、窗体设计器是用来设计( B )。(1分) A、应用程序的代码段 B、应用程序的界面 C、对象的属性 D、对象的事件 9、启动Visual Basic后,系统为用户新建的工程起一个名为( A )的临时名称。(1分) A、工程1 B、窗体1 C、工程 D、窗体 10、在界面设计时,双击窗体中的对象后,Visual Basic将显示的窗口是( C )。(1分) A、立即窗口 B、属性窗口 C、代码窗口 D、工程资源管理器窗口 11、VB应用程序在( A )模式下不能编辑代码和设计界面。(1分) A、运行 B、中断 C、设计 D、以上均不能 12、如果要向工具箱中加入控件的部件,可以利用“工程”菜单中的( B )命令(1分) A、引用 B、部件 C、工程属性 D、加窗体 13、如果Visual Basic环境中缺少某个窗口,一般应该从主菜单的( D )下拉菜单中寻找并打开。(1分) A、编辑 B、文件 C、调试 D、视图 14、标准控件不包括( D )控件。(1分) A、驱动器列表框 B、目录列表框 C、文件列表框 D、通用对话框 15、在设计窗体时,如果窗体上没有显示网格会感到不方便,( c )可以使网格出现。(1分) A、使用“编辑”菜单上的相关命令 B、使用“格式”菜单上的相关命令 C、使用“工具”菜单上的相关命令 D、使用“工程”菜单上的相关命令 16、在Visual Basic中,某一事件对应的程序叫( b )。(1分)
目录 一、填空题 (2) 二、选择题 (5) 三、程序填空 (18) 四、阅读程序写结果 (25) 五、编程题 (31) 六、历年全国计算机二级等级考试真题(附答案) (33) 2006年4月全国计算机等级考试二级VB笔试试卷 (33) 2005年9月全国计算机等级考试二级VB笔试试卷 (43) 2005年4月全国计算机等级考试二级VB笔试试卷 (50) 2004年9月全国计算机等级考试二级VB笔试试卷 (57)
一、填空题 1、在程序中使用日期型数据时,必须用符号 将日期型数据括起来。 2、VB 集成发环境窗口,它包括了数个独立的窗口。除必须的"主窗口"外,常用的还有 窗口、 窗口、 窗口、工具箱窗口、对象浏览窗口、工程资源管理等窗口。 3、在计算机上建立一个VB 应用程序的完整过程,一般分:建立用户界面的对象、对象属性的设置 、对象事件过程及编程、 程序的运行和调试 和 保存文件 五个步骤。 4、VB 中每个对象都有自己的属性, visible 属性决定控件是否允许可见。 5、在VB 对象的三要素中,可以把 属性 看作一个对象的性质,把 事件 看作对象的响应,把 方法 看作对象的动作。 6、VB 有三种工作模式,它们分别是 模式、 模式和 模式。 7、如果希望每0.6秒钟产生一个计时事件,那么应将InterVal 属性值应设置为 。 8、在VB 中,为了使一个控件在运行时不可操作,应将控件的 enable 属性设置为 false 。 9、为了防止用户编辑文本框内的内容,应将控件的 locked 属性设置为 true 。 10、当要使标签框的大小随着Caption 属性的值进行扩展或缩小时,应将该控件的 autosize 属性设置为 true 。 11、定义一个长度为8个字符的定长字符串变量(Ch5)的Dim 声明语句是 dim ch5 as string*8 。 12、VB 中拥有多个窗体的程序可用 load 语句窗体装入内存,用 unload 语句从内存中删除指定窗体. 13、在多窗体工程中,可用 show 方法显示一个窗体,用 hide 方法将一个窗体隐藏起来。 14、结构化程序设计方法,把程序的结构规定为 三种基本结构,它们是: 选择结构 、 选择 结 构 、 和 __循环结构_________三种基本结构。 15、VB 逻辑数据类型只有True 与False 两个值。当逻辑数据转换成整型数据时,True 转换为 ,False 转换为 。 16、VB 中依据变量的作用范围将VB 变量的作用范围分为三类,它们是: 局部 变量、 全局 变量和 窗体模块 变量。 17、VB 中,对控件(对象)一些属性的设置,即可以通过在 程序代码 中设置,也可以在 属性窗口 中设置,两种方法来设置。 18、在VB 中,静态数组声明中的下标只能是 常 量 。而动态数组Redim 语句中的下标还可以是已赋值 的变量。 19、产生100~200之间(含100和200)的随机整数的表达式是: 。 20、表达式4 AND 5 的运算结果是 4 。 21、VB 中,当KeyPress 事件发生时会返回一个按键 的 ASCii 值。 22、VB 中,用Option Base 1说明后,Dim A (5,5)定义的数组有 25 个元素。 23、表达式“12345”<>“12345”&“ABC ”的值 是 。 24、在Select case 结构中应至少包含一个 __Case____子句。 25、启动VB6.0时,VB6.0默认的工程类型是 标准EXE 程序 。 26、A=7,B=3,C=4,则表达式A MOD 3 +B^3/C\5的值为 2 。 27、若要求在菜单中包含分隔条,则设计时,在菜单的标题属性中应设置为 “— “ 。 28、在For ……Next 循环中,循环次数由循环控制变量的初值、终值与步长三个因素决定,其计算公式为 循环次数=INT (终值-初值)/步长+1 。 29、激活属性窗口的快捷键是 F4 。 30、字符串常量由任何ASCII 字符组成,在程序中,它必须由 双引号 括起来。