当前位置：文档库 › VB试题5

VB试题5

单项选择

==================================================

数学关系3<=x<10表示成正确的VB表达式为____________。

A、x>=3 OR x<10

B、3<=x AND <10

C、3<=x AND x<10

D、3<=x<0

答案：

设M=3，N=5，P=4.5，Q=2.5，表达式(M*N+2)/(P-Q)的计算结果为____________。

A、8.5

B、8.0

C、8

D、9

答案：

执行语句

Print Format(1234.567,“##,##0.00”)

后，输出结果是____________。

A、1,234.57

B、1,234.56

C、1，234.567

D、1234.57

答案：

要判断月收入在2000元以上（含2000元）且5000元以下（不含5000元的职工，应该使用的逻辑表达式

是____________。

A、M>2000 Or M<=5000

B、M>=2000 Or M<5000

C、M>2000 AND M<=5000

D、M>=2000 AND M<5000

答案：

下列说法正确的是________。

A、a$="Visual",b$="Basic",则a$ & b$ 和a$ + b$结果都是"VisualBasic"

B、(7-3<=4) Xor (1>-1) Or (7=5)的结果是True

C、设i=1,x=2,y=2,则x<2 Or Not y>0 And (x-y)/i<>0的结果是True

D、(Not True Or True) And (True Or False) 的结果是False

答案：

描述X、Y中只有一个小于Z的逻辑表达式是________。

A、X

B、X

C、X

D、X

答案：

下列数据中________________是Boolean常量。

A、123

B、True

C、Or

D、And

答案：

下列说法错误的是________。

A、产生0.01至100.99范围内的随机数，包括两端点，间隔为0.01的表达式可写成Myvalue=Int(101.98*Rnd+0.01)

B、Print String$(3,65)的运行结果是AAA,Print Asc(“Basic”)的结果是66

C、25\3 Mod 3.2 *Int(2.5) 的值是2

D、表达式5 \ 3 / Asc("c") * Fix(44.2) * CInt(7.8 - 5.2) 的值是1

答案：

Int(198.555*100+0.5)/100的值____________。

A、199.6

B、198.56

C、200

D、198

答案：

下列符号常量的声明中，______________是不合法的。

A、Const a as integer="12"

B、Const a as double=sin(1)

C、Const a =”OK”

D、Const a as single=1.1

答案：

下列可以将变量A、B互换的语句是____________。

A、A=B: B=C: C=A

B、A=A+B: B=A-B: A=A-B

C、A=(A+B)/2: B=(A-B)/2

D、A=C: C=A

答案：

以下哪个是合法的变量名____________。

A、Len

B、Test@qw

C、count2s

D、6cost_1

答案：

在一个语句行内写多条语句时，语句之间应该用___________分隔。

A、逗号

B、顿号

C、分号

D、冒号

答案：

下列叙述不正确的是____________。

A、注释语句是非执行语句，仅对程序的有关内容起注释作用，它不被解释和编译

B、注释语句可以作为代码中的一行

C、注释语句不可以放在其他语句的后面

D、代码中加入注释语句的目的是提高程序的可读性

答案：

下面程序段的功能是 A=10.5 B=INT(A+0.5) Debug.Print B

A、求平均值

B、舍去一实数的小数部分

C、将一实数四舍五入取整数

D、求绝对值

答案：

语句Print "5*20" 输出的结果是________。

A、"5*20"

B、5*20

C、出现错误信息

D、100

答案：

表达式（-1）*sgn(-100+int(rnd*100))的值是__________.

A、0

B、1

C、随机数

D、-1

答案：

下列叙述不正确的是___________ .

A、代码中加入注释语句的目的的提高程序的可读性

B、注释语句是非执行语句，仅对程序的有关内容起注释作用，它不被解释和编译

C、注释语句可以放在代码中的任何位置

D、注释语句不能放在续行符的后面

答案：

下面____________是合法的字符常数。

A、'ABC'

B、ABC

C、"AB"

D、ABC$

答案：

设整型变量a、b的当前取值分别为200与20，以下赋值语句中不能正确执行的是________。

A、Text1=“200”*a/b

B、Text1=a/b*a

C、Text1=a&b&a

D、Text1=a*a/b

答案：

在窗体上添加一个命令按钮，名为Command1，一文本框，名为Text1,则执行如下事件过程后，文本框中

的输出为_____。

Private Sub Command1_Click( )

For i = 1 To 4

x = 3

For j = 1 To 3

For k = 1 To 3

x = x+3

Next k

Next j

Next i

Text1.Text=Str(x)

End Sub

A、18

B、30

C、12

D、6

答案：

在窗体上有一个文本框Text1，以下程序段的运行结果是_____。Text1=""

For i=1 To 10

Sum=Sum+i

Next i

Text1=Sum

A、出错

B、在文本框中Text1中输出55

C、在文本框中Text1中输出不定值

D、在文本框中Text1中输出0

答案：

下列程序

Private Sub Command1_Click( )

a=InputBox("请输入")

b=InputBox("请输入")

Print a+b

End Sub

运行时输入3和4输出的结果是 _____ 。

A、7

B、3+4

C、出错

D、34

答案：

假定时钟控件的Interval属性为1000，Enabled属性为True，并且有下面的事件过程，则1秒钟的时候

窗体上将输出_____个字母"a"。

Private Sub Timer1_Timer()

For i = 1 To 10

Print "a"

Next i

End Sub

A、10次

B、10000次

C、以上都不对

D、1 000次

答案：

下列是一个计算1到100的奇数的和的程序，为补充完该程序，填空应为____。

Private Sub Command1_Click ( )

Dim s As Long, x As Integer

s=0

For x = _____ Step-2

s=s+x

Next x

Print s

End Sub

A、1 To 100

B、100 To 1

C、99 To 1

D、1 To 99

答案：

在单击窗体中的按钮Command1第3次后，如下程序打印结果是____。

Private Sub Command1_Click( )

Static a AS Integer

a = a+1

Select Case a

Case 1: Print "欢迎大家"

Case 2 :Print "努力就能成功

Case 3: Print "希望你能通过考试"

Case 4: Print "再见"

End Select

End Sub

A、“努力就能成功”

B、"希望你能通过考试"

C、“欢迎大家”

D、“再见”

答案：

以下语句中，不能正确执行的是_____。

A、Check1.Value=True

B、If Optionl.Value Then

C、If Optionl.Value=True Then

D、Check1.Value=0

答案：

下面语句错误的是_____。

A、If a=1 Then

c=2

ElseIf a=2 Then

c=3

End If

B、If a=1 And b=2 Then

c=3

End If

C、If a=1 Then

c=2

ElseIf a=2 Then

c=3

End If

D、If (a=1,2,3 ) Then c=2

答案：

有如下程序：

Private Sub Command1_Click( )

score=65

select Case score

Case Is<60

a$="F"

Case 60 To 69

a$="D"

Case 70 To 79

a$="C"

Case 80 To 89

a$="B"

Case else

a$="A"

End Select

MsgBox a$

End Sub

程序运行后，消息对话框中显示的内容为_____。

A、D

B、B

C、A

D、C

答案：

哪个程序段不能分别正确显示1、2、6、24的值_____。

A、For i=1 To 4

n=1

For j=1 To i

N=n*j

Next j

Print n

Next i

B、n=1

For j=1 To 4

N=n*j

Print n

Next j

C、n=1

j=1

Do While j<=4

n=n*j

Print n

j=j+1

Loop

D、For i=1 To 4

For j=1 To i

n=1

n=n*j

Next j

Print n

Next i

答案：

执行以下程序段，在窗体上显示的结果是_____。

Private Sub Form_Click()

Dim S As String, i As Integer

S = "ab"

For i = Len(S) To 1 Step -1

Print Chr( Asc ( Mid ( S , i , 1 ) ) + i )

Next I

End Sub

A、db

B、cb

C、cc

D、fd

答案：

下面程序是一个求最大公约数的程序，执行程序后，m的值为_____ Dim m As Integer, n As Integer

m=200

n=150

If n*m=0 Then Exit Sub

If m

t=m: m=n: n=t

End If

r=m Mod n

m=n

n=r

Loop While r<>0

Text3=m

A、50

B、100

C、200

D、150

答案：

下列程序：

Private Sub Form_Click( )

For j=1 To 15

a=a+j Mod 3

Next j

Print a

End Sub

运行后输出的结果是_____。

A、15

B、1

C、90

D、120

答案：

以下程序的输出结果是_____。Dim i As Integer,a As Integer Do While i<20

Do While True

If i Mod 10=0 Then

Exit Do

Else

i=i-1

End If

Loop

i=i+11:a=a+i

Loop

Print a

A、21

B、33

C、32

D、11

答案：

求解超越方程的根、求定积分、解微方程属于_____算法。

A、网络管理

B、非数值计算

C、通信

D、数值计算

答案：

用Msgbox（"Hello", vbokonly, "你好"）显示的消息对话框窗口的标题是_____。

A、OK

B、Hello

C、vbokonly

D、你好

答案：

当Form1_Click事件发生时，程序的输出结果是_____。

Private Sub Form_Click()

Dim M As Integer,k As Integer,t As Integer

M=5 : k=7

Select Case M

case 1 To 10

t=M: M=k: k=t

Case Else

M=k Mod 3

End Select

Print M, k, t

End Sub

A、7 5 5

B、7 5 7

C、5 7 5

D、5 5 7

答案：

运行程序产生死循环时，按_____键可以终止程序的运行。

A、Ctrl +Z

B、Ctrl+Break

C、单击停止运行按钮

D、Ctrl+C

答案：

在窗体上面一个文本框（其中Name属性为Text1），然后编写如下事件过程：Private Sub Command1_Click ( )

Text1.Text=""

For i=1 To 10

Sum=Sum+i

Next i

Text1.Text=Sum

End Sub

上述程序的运行结果是_____。

A、在文本框中Text1中输出0

B、出错

C、在文本框中Text1中输出不定值

D、在文本框中Text1中输出55

答案：

下面程序段运行后，显示的结果是_____。

Dim x

If x Then Print x Else Print x +1

A、-1

B、0

C、1

D、显示出错信息

答案：

填空

================================================== 语句Print 12;Tab;24的执行结果是_____.

答案：

空 1:

12 24

能正确产生[1,30]之间的随机整数的表达式是_____。

答案：

空 1:

Int(Rnd()*30)+1

执行下面的程序后，b的值为_____

a=300:b=20:a=a+b:b=a-b:a=a-b

答案：

空 1:

300

2Sinx+3Cosx+Tan2x+LnxLny的VB表达式为_____

答案：

空 1:

2*sin(x)+3*cos(x)+sin(2*x)/cos(2*x)+log(x)*log(y)

A=7，B=3，C=4，则表达式 A MOD 3+B^3/C\5的值为_____。

答案：

空 1:

下列程序运行的结果为_____。执行完该程序后，共循环了_____。

Private Sub Command1_Click( )

Dim intsum As Integer

Dim i As Integer

For i = 1 To 17 Step 2

intsum = intsum+i

Next i

Print intsum

End Sub

答案：

空 1:

空 2:

VB提供了结构化程序设计的三种基本结构，它们是顺序结构、选择结构和_____。

答案：

空 1:

循环结构

有如下程序：

Private Sub Command1_Click( )

a=Val(InputBox("请输入"))

b=Val(InputBox("请输入"))

x=a+b

If a>b Then x = a-b

Text1.Text=x

End Sub

运行后，从InputBox对话框中连续输入3和4，文本框中显示的是_____；若连续输入4和3，文本框中又显示的是_____。

答案：

空 1:

空 2:

执行下面的程序，单击窗体后在窗体上显示的第一行结果是_____，第三行结果是_____。Private Sub Command1_Click( )

s1="B"

For i = 1 To 3

s2=LCase(s1)

s1=s1 & s2

s=s & s1

Print s

s1=Chr(Asc(s1)+i)

Next i

End Sub

答案：

空 1:

空 2:

BbCcEe

在窗体中添加一个命令按钮Command1和一个文本框Text1，并编写如下程序代码。执行程序单击命令按钮后，文本框中的结果是_____。

Option Explicit

Private Sub Command1_Click( )

Dim s As String

s=String(3,"#")+","+String(3,"#")

s=Format(1234567,s)

Text1.Text="s=" & s

End Sub

答案：

空 1:

s=1234,567

VB习题及答案

1. _________________ GBK 字符集共有 C 汉字。 A 、6000 多 B 、10000 多 C 、20000 多 D 、30000 多 2. 美国标准信息交换码（ASCII 码）中，共有128个字符，包括___B_ 32个控制字符。 A 、52 B 、96 C 、116 D 、101 3. 在计算机中，西文字符最常用的编码是 __C ―。 A 、原码 B 、反码 C 、ASCII 码 D 、补码 4?下列四个选项中，按照其 ASCII 码值从小到大排列的是 A Q A 、数字、英文大写字母、英文小写字母 B 、数字、英文小写字母、英文大写字母 C 、英文大写字母、英文小写字母、数字 D 英文小写字母、英文大写字母、数字 5?下列字符中，其 ASCII 编码值最大的是__B ________ Q A 、9 B 、D C 、A D 、空格 6. 中文标点符号“。”在计算机中存储时占用 —B_个字节。 A 、1 B 、2 C 、3 D 、4 7. GBK 是汉字内码的一种扩充规范，下面叙述中错误的是 _B _ Q A. 它共有20000多个汉字 B. 、它使用双字节表示，字节的最高位均为 0 C. 、它与GB2312保持向下兼容 D 它不但有简体字，也有繁体字 &汉字从录入到打印，至少涉及三种编码，汉字输入码，字型码和 _D A 、BCD 码 B 、ASCII 码 C 、区位码 D 、机内码 9. 在下列汉字编码标准中，不支持繁体汉字的是 _A Q 个可打印字符和其原因不可能

A、GB2312 B、GBK C、BIG5 D、GB18030 10.在利用拼音输入汉字时，有时虽正确输入拼音码但却找不到所要的汉字, 是A ______ Q A 、计算机显示器的分辨率不支持该汉字的显示 B 、汉字显示程序不能正常工作 C 、操作系统当前所支持的汉字字符集不含该汉字 D 、汉字输入软件出错 11 ?将字符信息输入计算机的方法中，目前使用最普遍的是_A _ 。 A、键盘输入 B 、笔输入. C语音输入D、印刷体识别输入 12?汉字的键盘输入方案数以百计，能被用户广泛接受的编码方案应_C _ 。 A、必须易学易记 B可输入字数多 C.、易学易记，效率要高 D重码要少，效率要高 13. ________________ MP3音乐采用 C 编码方法。 A、MPEG-1层1 B、MPEG-1 层2 C 、MPEG-1 层3 D、MPEG-2audio 14.Windows操作系统中的“帮助”文件，为方便用户使用，提供了超文本功能，超文本采用的信息组织形式为_C _______ 。 A 、线性结构 B 、层次结构 C 、网状结构 D 、顺序结构 15?使用计算机进行文本编辑与文本处理是常用的两种操作，下列不属于文本处理的是_ C_。 A.、文本检索 B 、字数统计 C文字输入 D 、文语转换

vb考试题及答案

1．下列不是VB常量的是 B 。 A）3.14 B）′Name ′ C)#10/18/2007# D)True 2．确定控件在窗体上位置的属性是 C 。 A）Width 和Height B）Width 和Top C）Top 和Left D）Top 和Height 3．数学表达式1≤X＜10表示成正确的VB表达式为 B 。 A）1≤X＜10 B）X＞=1 And X＜10 C) X＞=1 Or x＜10 D) X＞=1 And ＜10 4. 下面的__ B ___语句可以实现：先在窗体上输出大写字母A，然后在同一行的第10列输出小写字母b。 A）Print "A";Tab(9);"b" B）Print "A";Spc(8);"b" C）Print "A";Space(10);"b" D）Print "A";Tab(8);"b" 5. 下列控件中，不能改变大小的控件是 D 。 A）TextBox B）Label C）Frame D）Timer 6．Visual Basic过程的编写是在 D 中进行的。 A）窗体窗口B）工程资源管理器窗口C）属性窗口D）代码编辑窗口 7. 在Visual Basic中，声明全局变量应该用 D 关键字。 A）Dim B）Private C）Static D）Public 8. 在Visual Basic表达式中，运算符的运算顺序为 A 。 A）算术运算符—>字符串运算符—>关系运算符—>逻辑运算符 B）逻辑运算符—>关系运算符—>字符串运算符—>算术运算符 C）字符串运算符—>算术运算符—>关系运算符—>逻辑运算符 D）关系运算符—>逻辑运算符—>算术运算符—>字符串运算符 9. 下列属于非法调用的函数是 A 。 A）sqr(-5) B)Sgn(-5) C)Exp(-5) D)Int(-5) 10. 下列能够正确输出”a=8”形式的语句是 B 。 A）print a=3+5 B）pirnt “a=”;3+5 C）print “a=3+5”D）print a=;3+5 11. 下列符号中，可以用作VB变量名的是 C 。 A）x.y.z B)3xyz C)x_yz D)Integer 12. 可以删除字符串两端空格的函数是 A 。 A）Trim B）Rtrim C）Ltrim D）Mid 13. 函数Int(Rnd*80)+1是在 D 范围内产生随机整数。 A）[0，80] B）[0，79] C）[1，79] D）[1，80]

中专VB试题

VB考试练习题(附正确答案) 一,单项选择题(1-251题) 1.以下4种描述中,错误的是__ D __. A. 常量在程序执行期间其值不会发生改变 B. 根据数据类型不同,常量可分为字符型常量,数值常量,日期/时间型常量和布尔型常量 C. 符号常量是用一个标识符来代表一个常数,好象是为常数取一个名字,但仍保持常数的性质 D. 符号常量的使用和变量的使用没有差别 2.下面合法的常量是___ D ____. A. 1/2 B. 'abcd' C. 1.2*5 D. False 3.Visual Basic中可以用类型说明符来标识变量的类型,其中表示货币型的是___ C ____. A. % B. # C. @ D. $ 4.下面___ B____是不合法的整常数. A.100 B.%O100 C.&H100 D.&O100 5.以下关键字中,不能定义变量的是___A____. A. Declare B. Dim C. Public D. Private 6.表达式16/4-2^5*8/4 MOD 5\2的值为___B____. A. 14 B. 4 C. 20 D. 2 7.用十六进制表示Visual Basic的整型常数时,前面要加上的符号是___A____. A. &H B. &O C. H D. O 8.Visual Basic日期型常量的定界符是__A_____. A. ## B.'' C. () D. {} 9.数学关系式3≤x<10表示成正确的VB表达式为___B____. A. 3<=x<=x AND x=3 OR x<=x AND 10.下面正确的赋值语句是___C____. A. x+y=30 B. pi*r*r=y C. y=x+30 D. x=3y 11. \,/,Mod,*四个算术运算符中,优先级别最低的是___C____. A. \ B. / C. Mod D. * 12.表达式ASC("F")的类型是__C_____. A. 字符表达式 B. 关系表达式 C. 算术表达式 D. 逻辑表达式 13.下面语句中有非法调用的是___C____. A. x=Sgn(-1) B. x=Fix(-1) C. x=Sqr(-1) D. x$=Chr$(65) 14.表达式23/5.8,23\5.8,23 Mod 5.8的运算结果分别是___B____. A. 3,3.9655,3 B. 3.9655,3,5 C. 4,4,5 D. 3.9655,4,3 15.如果变量 a=2,b="abc",c="acd",d=5,则表达式 ac AND bc 的值为___A____. A. True B. False C. Yes D. No 16.下面不正确的赋值语句是___B____. A. x=30-y B. y=r.r C. y=x+30 D. y=x\3 17.为了给x,y,z三个变量赋初值1,下面正确的赋值语句是___A____. A. x=1:y=1:z=1 B. x=1,y=1,z=1 C. x=y=z=1 D. xyz=1 18.以下4类运算符,优先级最低的是___D____.

VB模拟试题1

一、概念填空题 1．在Visaul Basic中,属性窗口分为四个部分，这四个部分分别是（ 1 ）属性显示方式、属性列表和对当前属性的简单解释。 2．组合框有三种不同的风格，它们分别是：( 2 )、( 3 )和( 4 )。3．VB中，当KeyPress事件发生时会返回一个按键的（ 5 ）值。 4. 时钟控件是有规律地以一定的( 6 )激发计时器事件，而执行相应的代码程序。 5．A = 8，B = 3，C = 5，则表达式A MOD 3 + B^3 / C \ 5的值为（ 7 ）。6．声明一个双精度变量Num5，的声明语句是 ( 8 ) 。 7．有一文本框Text1，为了使该文本框在运行时获取焦点，应执行的语句是（ 9 ）。8．在使用动态数组时，如要改变数组的大小而又不丢失数组中的数据，应使用（ 10 ）关键字。 9．Visual Basic逻辑数据类型只有 True 与 False 两个值。当逻辑数据转换成整型数据时，True 转换为（ 11 ），False转换为（ 12 ）。 10．在Visaul Basic 中依据变量的作用范围将VB变量的作用范围分为三类，它们是：（ 13 ）变量、（ 14 ）变量和（ 15 ）变量。 11．在Visual Basic工程中，拥有多个窗体的程序可用（ 16 ）语句将窗体装入内存，用（ 17 ）语句将指定窗体从内存中删除。 12．在Visual Basic中，当坐标系确定后，如果坐标值前加上关键字Step，则坐标值（X，Y）是（ 18 ）坐标。 13．字符串常量是由任何ASCII字符组成，在程序代码中，它必须由（ 19 ）括起来。 14．如果有三个单选按钮直接画在窗体上，另有四个单选按钮画在框架中，则运行时，可以同时选中（ 20 ）个单选按钮。二、概念选择题 1．不能触发滚动条Change事件的操作是（）。 A) 拖动滚动条的滑块 B) 单击两端箭头 C) 单击滚动条的滑块 D) 单击滚动条的空白处 2．已知变量x 、y为整数型，且x=4 , y=12 ,s为字符型，且s=“a”，Leble1为标签控件，Leble1的Caption属性值为Label1，下列合法的赋值语句是（）。 A) X= Leble1.Caption B) Leble1.Caption=Str(X) C) X*3=Y D) Y=X*S 3．下列可以将变量A、B的值互换的语句是( )。 A) A=B : B=A B) C=B : B=A ：A=C C) A=C : C=B : B=A D) A=(A+B)/2 ：B=(A-B)/2 4．下列叙述中错误的是（）。 A)VB是采用了事件驱动编程机制。

程序设计语言VB_习题集(含答案)

《程序设计语言VB》课程习题集一、单选题 1. Visual Basic是一种面向（）的程序设计语言。 A. 用户 B. 事件 C. 程序 D. 对象 2.在Visual Basic6.0中规定工程文件的扩展名是（）。 A. vbp B. for C. frm D. bas 3. Visual Basic6.0中规定窗体文件的扩展名是（）。 A. for B. frm C. vbp D. bas 4.如何使一个标签或按钮控件在运行时不可用（）。 A. 把它的Visible属性设置成False B. 把它的Visible属性设置成True C. 把它的Enabled属性设置成False D. 把它的Enabled属性设置成True 5.控件的字体可在属性窗口的（）属性中调整？ A. Font B. Color C. Text D. Caption 6.若要将某命令按钮设置为默认命令按钮。则应设置为True的属性是（）。 A. Value B. Cancel C. Default D. Enabled 7.在VB中，记录对象数据的是（）。 A. 方法 B. 事件 C. 属性

8.在文本框上显示文本的属性是（）。 A. Value B. Text C. Print D. Enabled 9. InputBox函数返回值的类型为（）。 A. 字符串 B. 数值 C. 变体 D. 数值或字符串（视输入的数据而定） 10.设有语句：a = InputBox("请输入数值:","输入示例", "100") 程序执行后,若从键盘上输入数值20并按回车键,则变量a的值是（）。 A. 字符串"20" B. 字符串"120" C. 默认值100 D. 数值120 11.下列控件中可用于接受用户输入文本，又可用于显示文本的是（）。 A. Label控件 B. TextBox控件 C. Timer控件 D. CommandButton控件 12.语句PRINT "25*4"的输出结果是（）。 A. 25*4 B. "100" C. 100 D. 出现错误信息 13.只能用来显示字符信息的控件是（）。 A. 文本框 B. 标签框 C. 图片框 D. 图像框 14.下列可作为Visual Basic变量名的是（）。 A. A%A B. 4A C. ?xy D. Stemp 15.下列哪个符号不能作为VB中的变量名（）。 A. timefly

vb练习题及答案.doc

vb 练习题及答案【篇一：vb 习题(含答案)】 lass=txt>1 、vb 程序中，通常不会产生错误提示的是( )。（1 分） a、编译错误 b、逻辑错误 c、运行时错误 d、实时错误 2、在设计阶段，双击窗体上任一空白处，打开的窗口是( )。（1 分） a、工程资源管理器窗口 b、代码窗口 c、工具箱窗口 d、属性窗口 3、下列说法中，正确的说法是( )。（1 分） a、窗体名称和该窗体文件名必须一致 b、窗体名称和该窗体文件名可以不相同 c、窗体名称和该窗体文件名不能使用汉字 d、窗体名称不能使用汉字、但该窗体文件名能使用汉字 4、visual basic 有完备的help 联机帮助功能，可以通过按下功能键( )得到帮助。（ 1 分） a、f9 b 、f8 c、f1 d 、f5 5、以下( )控件可作为容器使用。（ 1 分） a、label b 、picturebox c、textbox d 、image 6、将窗体的boderstyle 属性设置为( )可使窗口不显示标题栏。（ 1 分） a、0 b 、1 c、2 d 、5 7、文本框没有( )属性（1 分） a、text b 、name c、caption d 、borderstyle 23、下列( )是不合法的常量。（ 1 分） a、100 b 、10e02 c、100.0 d 、10e0.5 24、下列对变量的定义中，定义x 为变体型变量的是( )。（1 分） a、dim x as double b 、dim x c、dim x! d 、x%=23

25、设有如下变量声明：dim testdate as date ，为变量testdate 正确赋值的表达方式是( )。（1 分） a、textdate=#1/1/2002# b 、testdate=#1/1/2002# c、textdate=date(1/1/2002) d 、 testdate=format(m/d/yy,1/1/2002) 26、在立即窗口中运行以下语句，a=beijing :b=shanghai :print a,b 对其输出结果的描述中，正确的是( )。（1 分） a、beijing 和shanghai 中间没有空格 b、beijing 和shanghai 中间有1 个空格 c、beijing 和shanghai 中间有 6 个空格 d、beijing 和shanghai 前面有7 个空格 27、语句段a=3: b=5:t=a ：a=b: b=t 执行后( )。（1 分） a、a 值为3，b 值为3 b 、a 值为3，b 值为5 c、a 值为5，b 值为5 d 、a 值为5，b 值为3 28、下列语句中，正确的是( )。（1 分） a、if x3*y and xy then y=x^3 b 、if x3*y and xy then y=3x c、if x3*y : xy then y=x^3 d 、if x3*y and xy then y=x**3 29、下面程序段dim x%: x=5: if x then y=x+1 else y=x 运行后， y 结果是( )。（1 分） a、5 b 、6 c、1 d 、显示出错信息 30、执行语句 a = inputbox(today, tomorrow, yesterday, 5, 5) ，将显示一个输入对话框，在对话框的输入区中显示的信息是( )。（1 分） a、today b 、tomorrow c、yesterday d 、5 31、窗体上有一个命令按钮command1, 编写如下事件过程: private sub command1_click() :x = val(inputbox(x=)) : y = inputbox(y=) : print x + y : end sub, 单击命令按钮，先后在两个输入对话框中输入123 和321 ，窗体显示的内容是( )。（1 分） a、444 b 、123321 c、123+321 d 、出错信息 32、执行语句msgbox aaa, 2, bbb 后，所产生的消息框的标题是 ( )。（1 分） a、aaa b 、bbb

大学VB考试题库

大学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/3411322603.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

2018-1VB程序设计课程试卷

2011-1-VB程序设计课程试卷一、单选题(每题1分,共30分) 1．一只白色的足球被踢进球门,则白色、足球、踢、进球门是______。 A．属性、对象、方法、事件B．属性、对象、事件、方法 C．对象、属性、方法、事件D．对象、属性、事件、方法 2．要对选定的多个控件调整格式,如对齐、调整间距、统一尺寸等,应使用______菜单。 A．格式B．编辑C．视图D．工具 3．要在窗体上显示图片,需设置窗体的______属性。 A．Caption B．Icon C．Picture D．Name 4．将命令按钮的______属性设置为False后,运行时该命令按钮呈灰色不可用。 A．ControlBox B．WindowState C．Visible D．Enabled 5．下列表达式中,值为True的是______。 A．Mid(“ABCD”,2,2)>Left(“ABCD”,2) B．Not(Sqr(4)-3>=-2) C．14/2\3<10 MOD 4 D．Ucase(“abcd”)>=“abcd”6．以下日期型常量合法的是______。 A．”03/25/89”B．#”03/25/89”# C．#03/25/89# D．#25/03/89# 7．表达式12000+”129”&200的值是______。 A．12129200 B．12000129200

C．12329 D．12000329 8．将文本框的______属性设置为True时,文本框可以输入或显示多行文本,且会在输入的内容超出文本框的宽度时自动换行。 A．MultiLine B．Enabled C．ScrollBars D．Max 9．任何控件都具有______属性。 A.T ext B．Caption C．Name D．ForeColor 10．若要将滚动条的最小值设为0,最大值设为255,应对其______属性进行设置。 A．Left和Top B．Width和Height C．SmallChange和LargeChange D．Min和Max 11．窗体上有一个文本框控件Textl,若已存在三个整型变量a、b、C,且三个变量的值分别为5、7、12。以下的______可以使文本框中显示的内容为：5+7=12。 A．Texll.T ext=a+b=C B．Textl.Text=“a+b=C” C．Textl.Text=a&”+”&b&”=“＆c D．Textl.Text=“a”&”+”&”b”&”=“&”c” 12．下列控件中, ______控件没有Caption属性。 A．命令按钮B．标签C．选项按钮D．文本框 13．程序运行时,若要使某一控件不可见,应将其______属性设为False。 A．Enabled B．Caption C．Visible D．Default 14．在设计阶段,双击窗体Forml的空白处,打开代码窗口,显示______事件过程模板。 A．Forml_ Click B．Forml_Load C．Form_Load D．Form_Click

vb试题及答案

VB试卷一、单项选择题(每题2分,共40分) 1. 窗体的标题栏显示内容由窗体对象的属性决定。 A) BackColor B)BackStyle C)Text D)Caption 2. 窗体的示意图标可用属性来设置。 A) Picture B) Image C) Icon D) MouseIcon 3. 窗体的控制菜单的有无由窗体对象的属性决定。 A) ControlBox B) MinButton C) MaxButton D) BorderStyle 4. 若要取消窗体的最大化功能，则可设置属性为False来实现。 A) ControlBox B) MinButton C) MaxButton D) Enabled 5. 以下4个选项，不属于VB的工作模式。 A) 编译 B) 设计 C) 运行 D) 中断 6. 窗体的边框样式由窗体对象的属性来设置。 A) BackStyle B) BorderStyle C) WindowState D) FillStyle 7. 若要以程序代码方式设置在窗体中显示文本的字体大小，则可用窗体对象的属性来实现。 A) FontName B) Font C) FontSize D) FontBold 8. 命令按钮的标题文字由属性来设置。 A) Text B) Caption C) Name D) (名称) 9. VB是面向对象的程序设计，以下4个选项，不属于面向对象的三要素。 A) 变量 B) 属性 C) 事件 D) 方法 10. 若要将某命令按钮设置为默认命令按钮，可设置属性为True来实现。 A) Value B) Cancel C) Default D) Enabled 11. 若要使命令按钮不可见，可设置属性为False来实现。 A) Value B) Enabled C) Visible D) Cancel 12. 运行程序时，系统自动执行窗体的事件。 A) load B) click C) unload D) GotFocus 13. 若要设置文本框最大可接收的字符数，可通过属性来实现。 A) MultiLine B) Length C) Max D) MaxLength 14. 若要使某命令按钮获得控制焦点，可使用方法来设置。 A) Refresh B) SetFocus C) GotFocus D) Value 15. 若要使命令钮可响应事件，可通过设置属性的取值来实现。 A) Visible B) Enabled C) Default D) Value 16. 在运行时，若要调用某命令按钮的Click事件过程，可设置该命令按钮对象的属性为True来实现。 A) Enabled B) Value C) Default D) Cancel 17. 标签框的边框，由属性的设置值决定。

VB真题汇总

VB真题汇总 1、以下有关Visual Basic语言描述中,错误的是 B (1分) A、语句是一行一句,以回车键结束 B、用“,”分隔一行中的多个语句 C、变量名不区分大小写 D、一条语句放在多行中,则在前一行结束处使用续行符“_”连接下一行 2、以下关于事件的叙述中,错误的是 D (1分) A、事件是系统定义的能被对象识别的动作 B、事件可分为用户事件与系统事件 C、VB为每个对象设置好各种事件,并定义好事件过程的过程名 D、VB中对象的事件就是对象的方法 3、下列选项中,不属于VB特点的选项是C。(1分) A、可视化程序设计 B、面向对象 C、窗口中包含有菜单栏和工具栏 D、事件驱动下的编程机制 4、下列叙述中,正确的是A。(1分) A、事件可以由用户触发,也可以由系统触发 B、Visual Basic应用程序只能以解释方式执行 C、保存Visual Basic程序时,只需保存窗体文件即可 D、所有控件都有DblClick事件 5、下列关于VB编码规则的叙述中,错误的是 B 。(1分) A、一条语句可以分为多行书写 B、多条语句可以书写在同一行上,每条语句之间用逗号隔开 C、可以用Rem注释内容给语句或程序段加上注释,以提高可读性 D、不区分程序代码中变量名的字母的大小写 6、B 是对象的一个基本要素,它描述了对象在程序中的外观特点。(1分) A、事件 B、属性 C、方法 D、事件程序 7、在Visual Basic中,系统为每个对象预先定义好了一系列的事件。下列事件中,不属于VB系统提供的事件是C。(1分) A、Click B、Change C、MyFirst D、DblClick 8、在设计模式下,双击窗体上的一个控件,则会打开 C 。(1分) A、属性窗口 B、工程资源窗口 C、代码窗口 D、窗体布局窗口

二级VB模拟试题1-1

二级VB模拟试题(1-1) 一、填空题（每空１分，共20分）１、ＶＢ是一种面向_____的可视化程序设计语言，采取了_____的编程机制。２、ＶＢ的对象主要分为_____和_____两大类。３、若要将窗体Form1隐藏起来，可使用方法_____；若要将窗体Form1显示出来，可使用方法_____来实现。４、在ＶＢ集成开发环境中，运行应用程序的方法有三种：一是_____；二是_____；三是_____。５、在ＶＢ中若要让某对对象获取焦点，则可通过_____方法来实现。６、ＶＢ提供的_____属性，用来控制对象是否可用，当属性值为_____时，表示对象可用，当属性值为_____时，表示对象不可用。７、ＶＢ提供的_____属性，用来控制对象是否可见，当属性值为_____时，表示对象可见，当属性值为_____时，表示对象不可见。８、在ＶＢ中，用来描述对象外部特征的量称之为对象的_____。９、为使某窗口中的命令按钮“取消(C)”具有如下特性：按“Alt＋C”键或按“ESC”键，均可代替用鼠标单击该按钮的操作，应设置该按钮的Caption属性值为_____，并且设置其_____属性值为_____。二、选择题（每题２分，共40分）１、用于从字符串左边截取字符的函数是（）Ａ、Ltrim( )Ｂ、Trim( )Ｃ、Left( )Ｄ、Instr( ) ２、可获得当前系统日期的函数是（）Ａ、Date( )Ｂ、Time( )Ｃ、IsDate( )Ｄ、Year( ) ３、退出For循环可使用的语句为（）Ａ、Exit ForＢ、Exit DoＣ、End ForＤ、End Do ４、窗体的标题栏显示内容由窗体对象的（）属性决定。Ａ、BackColorＢ、BackStyleＣ、TextＤ、Caption ５、程序运行时，若要通过回车键调用某命令按钮的Click事件过程，则可设置该命令按钮的（）属性值为True来实现。Ａ、valueＢ、EnabledＣ、DefaultＤ、Cancel ６、标签框所显示的内容，由（）属性值决定。Ａ、TextＢ、(名称)Ｃ、CaptionＤ、Alignment ７、文本框的（）属性用于设置或返回文本框中的文本内容。Ａ、TextＢ、(名称)Ｃ、CaptionＤ、Name ８、计时器控件的（）属性用于设置Timer事件发生的时间间隔。Ａ、StretchＢ、IntervalＣ、valueＤ、Length ９、滚动条的（）属性用于返回或设置滚动条的当前值。Ａ、ＶalueＢ、MaxＣ、MinＤ、Data 10、若要向列表框添加列表项，可使用的方法是（）Ａ、AddＢ、RemoveＣ、ClearＤ、AddItem 11、图像框或图片框中显示的图形文件，由它们的（）性性值决定。Ａ、DownPictureＢ、PictureＣ、ImageＤ、Icon 12、以下不属于键盘事件的是（）Ａ、KeyDownＢ、KeyUpＣ、UnloadＤ、KeyPress

vb题库及答案

| 最新VB题库及答案一、选择题第1部分 1、在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是 A、Private Sub Text1_Change() = "计算机等级考试" End Sub ] B、Private Sub Command1_Click() Caption = "计算机等级考试" End Sub C、Private Sub Form_Click() = "计算机等级考试" End Sub D、Private Sub Command1_Click() = "计算机等级考试" { End Sub 2、在一行内写多条语句时，每个语句之间用（）符号分隔。 A、 , B、： C、. D、； 3、下面（）是合法的变量名。 A、X_YZ B、123ABC C、INTEGER D、X-Y ] 4、下面（）是合法的字符常量。 A、 ABC$ B、“ABC” C、‘ABC’ D、 ABC 5、表达式16/4 - 2^5*8 MOD 5\2的值为（）。 A、14 B、 4 C、20 D、2 6、设a=”MicrosoftVisualBasic”，则以下使变量的b值为”VisualBasic”的语句是 A、b=Left(a,10) B、b=Mid(a,10) — C、b=Right(a,10) D、b=Mid(a,11,10) 7、设a="a"，b="b"，c="c"，d="d"，执行语句x = IIf((a < b) Or (c > d), "A",

vb题库2(2019525153035)

单选 1.启动VisualBasic后,系统为用户新建的工程起一个名为()的临时名称. A.窗体 B.工程1 C.窗体1 D.工程 2.下列关于窗体上控件的基本操作错误的是(). A.按下一次DEL键可以同时删除多个控件 B.按住SHIFT键,然后单击每个要选择的控件,可以同时选中多个控件 C.按住ALT键,然后单击每个要选择的控件,可以同时选中多个控件 D.按一次DEL键只能删除一个控件 3.求以10 为底X 的常用对数的表达式为(). A.LOG(X)/LOG(10) B.LOG(X) C.LOG(X)/LOG(E) D.LN(X) 4.要在图片框P1中打印字符串"HowAreYou",应使用语句(). A.P1.Print"HowAreYou" B.Print"HowAreYou" C.P1.Picture=LoadPicture("HowAreYou") D.Picture1.Print="HowAreYou" 5.在窗体Form1的Click事件过程中有以下语句: Label1.Caption="Visual Basic" 若本语句执行之前,标签控件的Caption属性为默认值,则标签控件的Name属性和Caption属性在执行本语句之前的值分别为(). A."Label1"、"Label1" B."Caption"、"Label" C."Label"、"Label" D."Label1"、"Visual Basic" 6.要使得标签能自动扩充以满足字体大小则可对其()属性进行设置. https://www.wendangku.net/doc/3411322603.html,emnemonic B.tag C.autosize D.alignment 7.要使一个文本框具有水平和垂直滚动条,则应先将其MultiLine 属性设置为True,然后再将ScrollBar属性设置为(). A.0B.2C.3D.1 8.以下不具有Picture属性对象是(). A.文本框 B.窗体 C.图片框 D.图像框 9.由For k=10 to 0 step 3:next k循环语句控制的循环次数是(). A.-10 B.0 C.-11 D.12 10.循环结构For I%= -1 to -17 Step -2 共执行()次. A.5 B.8 C.9 D.6 11.()属性决定了按Tab键时焦点在各个控件之间移动的顺序. A.SetFocus B.TabStop C.Tablndex D.Index 12.由For k=35 to 0 step 3:next k循环语句控制的循环次数是(). A.-10 B.0 C.-11 D.12 13.单击滚动条两端的任一个滚动箭头,将触发该滚动条的()事件. A.Scroll B.Change C.KeyDown D.Dragover 14.要清除组合框Combol中的所有内容,可以使用()语句. https://www.wendangku.net/doc/3411322603.html,bo1.Remove https://www.wendangku.net/doc/3411322603.html,bo1.Cls https://www.wendangku.net/doc/3411322603.html,bo1.Clear https://www.wendangku.net/doc/3411322603.html,bo1.Delete

VB考试题目1

一、单选题（每题1分，共76题） 1.以下关于窗体的描述中错误的是（） A. 在VB中每次运行时可以指定不同的启动窗体 B. 要让窗体以最大化方式打开，应设置MaxButton属性值为True C. 窗体第一次显示时也会发生Resize事件 D. 第一次显示时窗体的位置可以不是设计时所指定的位置 2.执行多窗体应用程序时，（） A. 打开一个窗体后，其他窗体都会被关闭 B. 允许同时打开多个窗体 C. 打开一个窗体后，其他窗体都会被隐藏起来 D. 在某一时刻只能打开一个窗体 3.程序中要在文本框文本中插入一段文字，应当使用的属性是（） A. SelText B. Name C. Text D. Caption 4. 在用户的应用程序执行期间发生，比如单击鼠标或按键盘中的键（） A. 方法 B. 属性 C. 事件 D. 工程 5.当一个工程中含有多个窗体时，其中的启动窗体是（） A. 启动VB时建立的窗体 B. 第一个添加的窗体 C. 最后一个添加的窗体

D. 在工程属性窗口中指定的窗体 6.当新建一个工程并启动Visual Basic后，工具箱中的控件是（） A. 内部控件 B. Active X控件 C. 内部控件和Active X控件 D. 内部控件或Active X控件 7.启动Visual Basic后，就意味着要建立一个新的（） A. 窗体 B. 程序 C. 工程 D. 文件 8.下面是字符串数据的类型声明字符（） A. % B. $ C. & D. ! 9.对象是将数据和操作起来的逻辑实体（） A. 封装 B. 串接 C. 连接 D. 伪装 10.下面属性用于显示对象的标题（） A. Text B. Caption C. Name(名称) D. ForeColor

VB试题及答案

以下答案由叶阿飞童鞋友情提供。 1. 何谓VB对象，他们都是可见的吗？每种分别举两个例子。窗口以及窗口中的每一个部件。不都可见；可视：窗口、菜单、按钮等；不可视：公共对话框、定时器等。 2.何谓对象的成员，分别加以说明。属性，方法和事件。 ·属性：对象的数据（设置和特性），例如，颜色、大小、位置等。 ·方法：一种可在对象上操作的过程，例如，移动等。 ·事件：对象可识别的动作，例如，单击鼠标和按下键盘键。可编写代码来响应事件。 3.何谓事件驱动和事件过程。说明并举例。只有在窗口中有关位置进行键盘输入或单击鼠标，程序才会作出响应的程序运行方式称为事件驱动方式。{所谓事件驱动就是利用事件来触发消息，系统再对相应的消息进行处理的一个机制（网上找的，不是书上的，不能确定是否正确）}。 ·vb应用程序中的某个事件被触发时，对象就会对该事件做出响应，响应某个时间后所执行的代码段就是事件过程。 4.VB集成开发环境的工作模式有哪些？分别说明每一种工作模式所能完成的功能。 <1>设计模式：创建应用程序的大多数工作都是在设计时完成的。在设计时，可以设计窗体、绘制空间、编写代码并使用“属性”窗口来设置或查看属性设置值。 <2>运行模式：代码正在运行的时期，用户可与应用程序交流，可查看代码，但不能改动它。 <3>中断模式：程序在运行的中途被停止执行。在中断模式下，用户可查看各变量及不是属性的当前值，了解程序执行是否正常。还可以修改程序代码，检查、调试、重置、单步执行或继续执行程序。 5.VB集成开发环境的控件种类有哪些？每一种分别举例说明。 <1>内部控件。主要有标签、文本框、命令按钮等。 <2>ActiveX控件。如数据绑定网络控件、数据绑定绑定组合框控件等 <3>可插入的对象。主要指microsoft office中的excel工作表或ppt幻灯片等。 6·何谓VB控件，向窗体中添加控件的方法有哪些？举例说明。在窗体上用于输入、输出信息的图形或文字符号称为控件。 <1>单击工具箱中的控件图标，可以看到鼠标指针变成十字指针，然后在窗体的空白处按住鼠标左键拖动鼠标到合适的位置放开，即可画出对应的控件。 <2>双击工具箱中的控件图标，即可将控件添加到窗体中。以下答案由妞仔仔童鞋友情提供。 7.试述VB编程步骤，对每一步进行必要的解释。创建工程→界面设计→属性设置→ 代码编辑→文件保存→程序运行和调试。创建工程启动Visual Basic 6.0 后，在“新建工程”对话框中选择“标准EXE”文件，单击“确定”按钮。此时，工程资源管理器窗口中显示已创建了一个工程，默认名字为“工程1” 并创建了一个窗体，默认名称为“Form1” 。界面设计新建窗体后，利用工具箱可以在窗体上依次添加控件对象。选择工具箱中的标签，通过双击或鼠标拖动将其对象拖放在窗体的合适位置；属性设置控件对象的默认属性值显然不能满足程序的要求，因此，我们要对每一个控件对象通过属性窗口设置属性。代码编辑应用程序进行到现在仅仅只做了一个空壳，当程序运行，我们单击任何命令按钮，并没有事情发生，这是因为我们还没有进行最重要的一个步骤——代码编辑。根据题目要求，我们要

vb经典题目及答案

1、在考生文件夹下有工程文件wy7、vbp及窗体文件wy7、frm,该程序就是不完整的,请在有？号的地方填入正确的程序代码,然后删除？及所有注释符号(即 '号),但不能修改其它部分。修改后的程序文件都保存,存盘时不得修改文件夹与文件名。本题描述如下: 在窗体上有一个名为Text1的文本框,有三个命令按钮,名称分别就是C1、C2与C3,标题分别就是"读入"、"加密"与"存盘"。要求程序运行后,点击"读入"按钮,将文本文件in7、txt(该文件在考生文件夹下)中的文本信息读入文本框Text1中;点击"加密"按钮将Text1中的英文字母加密转换,并将转换后的结果显示到Text1中。转换方式为转换成该字母对应字母表中后两个位置的字母。例如,转换前的字母就是"a",则转换后的就是"c",转换前就是"E",转换后就是"G";点击"存盘"按钮, 则将转换后的文本框中的文本保存到out7、txt 文件中(该文件保存到考生文件夹下)。 Private Sub C1_Click() Dim strinfo As String Open "in7、txt" For Input As 1 Input #1, strinfo Close #1 Text1、Text = strinfo End Sub Private Sub C2_Click() Dim strchange As String Dim i As Integer For i = 1 To Len(Text1、Text) strchange = strchange + Chr(Asc(Mid(Text1、Text, i, 1)) + 2) Next Text1、Text = strchange End Sub Private Sub C3_Click() Open "out7、txt" For Output As 1 Print #1, Text1、Text Close #1 End Sub 2、(1)在考生文件夹下有工程文件wy5、vbp及窗体文件wy5、frm,该程序就是不完整的,请在有？号的地方填入正确内容,然后删除？及所有注释符(即'号),但不能修改其它部分。存盘时不得改变文件名与文件夹。本题描述如下: 在窗口中有一个RichText文本框控件(名称为rtx1)与一个文本框控件(名称为Text1),两个命令按钮,名称分别为Command1与Command2,标题分别为"加入WY01、TXT"、"统计字符个数"。要求程序运行后,单击command1将考生文件夹下的wy01、txt的内容显示到rtx1中;单击"统计字符个数"按钮统计Text1中有多少个字符,将结果显示在Text1中。