单选
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.doczj.com/doc/1f738805.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.doczj.com/doc/1f738805.html,bo1.Remove
https://www.doczj.com/doc/1f738805.html,bo1.Cls
https://www.doczj.com/doc/1f738805.html,bo1.Clear
https://www.doczj.com/doc/1f738805.html,bo1.Delete
15.用键盘的光标键选中某一菜单项,并按回车将触发菜单的()的事件.
A.KeyUp
B.KeyPress
C.Click
D.KeyDown
判断:
1.Visual Basic程序的运行,仅能从某一窗体启动,如Form1窗体。
2.Single 和Double型用于保存浮点数,在VB中定义单精度浮点8位,双浮点16位.
3.所有的VB 的变量,都有隐含说明字符和强调声明两种方法来定义.
4.Picture图片框既可用来显示图片和绘制图形,也可用Print方法来显示文字.
5.属性是用来描述和反映对象特征的参数,不同的对象具有各自不同的属性,对象的所有属性都可以在属性窗口中设置.
6.VB允许设计和使用用户自己设计的控件.
7.只要用拖拽的方法,将工具箱中所需的控件拖到窗体上即可完成.
8.图片框的Move方法不仅可以移动图片框,而且还可以改变该图片框的大小,同时也会改变该图片框有关属性的值.
9.方法是VB 对象可以响应的用户操作.
10.在VB6.0中命令按钮不仅响应Click事件,而且响应DbClick事件.
11.文本框控件有Caption属性.
12.move方法的一般形式是:对象名.move A,B[,C,D],其中A指Left,C 指width.
13.控件是对象,而窗体不是对象,它只是控件对象的窗口.
14.图片框的Move方法不仅可以移动图片框,而且还可以改变该图片框的大小,同时也会改变该图片框有关属性的值.
15.计算机在处理数据时必须将其装入内存,在高级语言中通过内存单元名来访问其中的数据,命名的内存单元就是常量或变量.
16.定时将文本框中的数据保存到磁盘,应用于选用Timer计时器控件.
17.对象的属性只能在属性窗口中设置.
18.标签控件可以用来让用户输入数据.
19.当需要在同一窗体中建立几组相互独立的单选钮时,就要用框架将每一组单选钮框起来.
20.图片框的属性Enabled设置为FALSE, 图片框上的控件仍可响应用户操作.
填空
1.在VB 6.0中,变量名最长可达_____个字符.
2.设a=2,b=3,c=4,d=5,则NOT a<=c OR 4*c=b^2 AND b<> a+c 的值为_____.
3.如果要在单击钮时执行一段代码,则应将这段代码写在_____事件过程中.
4.VB中,变量的声明可分为两种方法:隐式声明和_____.
5.VB是一种面向_____的程序设计语言,采用了_____编程机制.
6.表达式Ucase(Mid("abcdefgh",3,4))的值是_____.
7.请用正确内容填空,以下程序的输出结构是:
4 7 10
5 8 11
6 9 12
Option Base 1
Private Sub Form_Click()
Dim i as integer
Dim j as integer
Dim a(3,3) as integer
For i=1 to 3
For j=1 to 3
a(i,j)=_____
print a(i,j);
Next j
Next i
End Sub
8.在过程调用中,参数的传递可分为两种方式,其中按_____传递方式是默认的. 程序设计
1.
'-------------------------------------------------
'【程序设计】
'-------------------------------------------------
'题目:(事件)单击窗体。
' (响应)求50以内所有偶数的和,并在窗体上输出出来。
' 将结果存入变量S中
'-------------------------------------------------
Private Sub Form_Click()
Dim s As Integer
'******** Begin *********
'********* End ***********
TestFunc (s)
End Sub
Private Sub TestFunc(i As Integer)
Dim OUT As Integer
OUT = FreeFile
Open App.Path& "\18.out" For Output As #OUT
Print #OUT, i
Close #OUT
End Sub
2.
'-------------------------------------------------
'【程序设计】
'-------------------------------------------------
'题目:编写函数fun其功能是:根据整型形参m,
'计算如下公式的值:
' y=1+1/3+1/5+1/7+...+1/(2m+1)
' 例如:若m=9,则应输出:2.133256
'-------------------------------------------------
Private Function fun(m As Integer) As Single
'********** Begin *********
'********** End *************
End Function
Private Sub Form_Load()
Show
Print fun(9)
TestFunc
End Sub
Private Sub TestFunc()
Dim i As Integer
Dim s As String
Dim l As Integer
Dim d As Double
Dim a(10) As String
Dim fIn As Integer
Dim fOut As Integer
fIn = FreeFile
Open App.Path& "\in.dat" For Input As #fIn
fOut = FreeFile
Open App.Path& "\out.dat" For Output As #fOut
For i = 1 To 10
Line Input #fIn, a(i)
l = Val(a(i))
Print #fOut, fun(l)
Next
Close #fIn
Close #fOut
End Sub
程序填空
1.
'------------------------------------------------------- '本程序段将一个十进制整数m转换成 r (2-16)进制字符串
'方法:将m不断除 r 取余数,直到商为零,以反序得到结果。'------------------------------------------------------- Function TranDec$(ByVal m%, ByValr%)
Dim StrDtoR$
Dim iB%, mr%
StrDtoR = ""
Do While m <> 0
'**********FILL**********
mr = _____
m = m \ r
If mr>= 10 Then
'**********FILL**********
StrDtoR = Chr(mr - 10 + _____) &StrDtoR
Else
StrDtoR = mr&StrDtoR
End If
Loop
TranDec = StrDtoR
End Function
Private Sub Command1_click()
Dim m0%, r0%, i%
m0 = Val(Text1.Text)
r0 = Val(Text2.Text)
If r0 < 2 Or r0 > 16 Then
i = MsgBox("输入的R进制数超出范围", vbRetryCancel)
If i = vbRetry Then
Text2.Text = ""
Text2.SetFocus
Else
End
End If
End If
Label3.Caption = "转换成" & r0 & "进制数"
'**********FILL**********
Text3.Text = TranDec(m0, _____)
End Sub
2.
'-------------------------------------------------------
'本程序运行后,单击"替换"按钮,可以将text1中包含的
'text2内容,替换为text3内容。
'如果若text1中包含text2,则将被查找内容替换为text3中内容,
'否则,不进行替换,并且将最终结果打印在窗体上。运行效果如图1所示
'
'-------------------------------------------------------
'**********FILL**********
Public Function MyReplace(s$, OldS$, NewS$) As _____ Dim i%, lenOldS%
lenOldS = Len(OldS)
i = InStr(s, OldS)
Do While i > 0
s = Left(s, i - 1) + NewS + Mid(s, i + lenOldS) i = InStr(s, OldS)
Loop
'**********FILL**********
MyReplace=_____
End Function
Private Sub Command1_Click()
Print MyReplace(Text1, Text2, Text3)
End Sub
Public Sub sMyReplace(s$, OldS$, NewS$)
Dim i%, lenOldS%
lenOldS = Len(OldS)
i = InStr(s, OldS)
Do While i > 0
s = Left(s, i - 1) + NewS + Mid(s, i + lenOldS) i = InStr(s, OldS)
Loop
End Sub
程序改错
1.
'------------------------------------------------
'【程序改错】
'------------------------------------------------
'题目:产生30个小于100的成绩随机数,并统计出优、良
' 、中等、及格、不及格数的个数,并计算出成绩属' 于优秀段的成绩平均分。
'------------------------------------------------ Private Sub Form_Click()
Dim k%, a%, bjg%, jg%, zd%, lh%, yx As Integer Dim pjf As Integer
Randomize
pjf = 0
For k = 1 To 30
'**********ERROR**********
a = Int(Rnd())
Select Case a
Case 0 To 59
bjg = bjg + 1 '不及格
Case 60 To 69
jg = jg + 1 '及格
Case 70 To 79
zd = zd + 1 '中等
Case 80 To 89
lh = lh + 1 '良好
Case 90 To 100
yx = yx + 1 '优秀
'**********ERROR**********
pjf = pjf + 1
End Select
Next k
'**********ERROR**********
If yx> 0 Then pjf = pjf / 30
Debug.Print "不及格" + Str$(bjg) + "人,及格" + Str$(jg) + "人,中等" + Str$(zd) + "人";
Debug.Print "良好" + Str$(lh) + "优秀" + Str$(yx) + "人"
Debug.Print "优秀分数段成绩平均分" &pjf
End Sub
2.
'------------------------------------------------
'【程序改错】
'------------------------------------------------
'题目:使用顺序文件读写方式编写一个简单的记事本应用程序,
' 基本逻辑是:假设在考生目录中有一个名为exam.txt的文
' 本文件。当点击"打开"按钮(Command1)时,程序将exam.Txt
' 文件中的内容显示在文本框(Text1)中,当点击"新建"按钮
' (Command2)时,清空Text1中的内容;用户可以在Text1中进行
' 编辑操作,当点击"保存"按钮(Command3)时,将Text1中的内容
' 保存在exam.txt文件中。当点击"退出"按钮(Command4)时关闭本窗体。
'------------------------------------------------
Private Sub Command1_Click()
Dim A As String
Text1 = ""
Open "exam.txt" For Input As #1
Do While Not EOF(1)
'**********ERROR**********
Input #0, A
Text1 = Text1 + A
Loop
'**********ERROR**********
Close #0
End Sub
Private Sub Command2_Click()
Text1 = ""
End Sub
Private Sub Command3_Click()
Open "exam.Txt" For Output As #1 '**********ERROR**********
Input #1, Text1
Close #1
End Sub
Private Sub Command4_Click()
Unload Me
End Sub
单选 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.doczj.com/doc/1f738805.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.doczj.com/doc/1f738805.html,bo1.Remove https://www.doczj.com/doc/1f738805.html,bo1.Cls https://www.doczj.com/doc/1f738805.html,bo1.Clear https://www.doczj.com/doc/1f738805.html,bo1.Delete
大学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.doczj.com/doc/1f738805.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
| 最新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期末考试试题A卷 一、填空题 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、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是(2)。 A、滚动框处于最右位置时,一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时,滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时,滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示(3)。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中,不属于标签的属性是(4)。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本,应当在属性窗口中改变的属性是(5)
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分)
1.表达式Len(""123程序设计ABC"")的值为10 2.表达式LENB(""123程序设计ABC"")的值为20 3.求25度的正弦值的VB表达式为SIN(25*3.14/180) 4.如果X是一个正实数,对X的第三位四舍五入的表达式是0.01*int(100*(X+0.005)) 5.函数int(rnd*100)产生的整数范围是"(0,100)" 6.函数Sgn(10)的结果为 1 7.函数Sgn(-10)的结果为-1 8.函数Sgn(0)的结果为0 9.a=""ABCDEFGHIJK"" Print mid(a,4,3) 语句执行后的输出是DEF 10.a=""ABCDEFGHIJK"" Print mid(a,1,4) 语句执行后的输出是ABCD 11.a=""ABCDEFGHIJK"" Print mid(a,5,4) 语句执行后的输出是EFGH 12. a=""ABCDEFGHIJK"" Print mid(a,8) 语句执行后的输出是HIJK 13.执行一下程序段,变量C的值为Quick BASIC Programming a="Visual Basic Programming" b="Quick" c=b&Ucase(mid(a,7,6))&right(a,11) 14.X=Ucase("AbcDEF")语句执行后的值为ABCDEF 15.X=Lcase("AbcDEF")语句执行后的值为abcdef 16.常量99/10/20是数值型 17.常量"99/10/20"是字符型 18.下面哪个赋值语句是正确的( B ) A. Let 3=a B. a=a+1 C. Let a+1=a D.a+1=s 19.下面哪个赋值语句是正确的( A ) A. Let b=1=2 B. Let 2+1=b C. 2+1=b D. b+1=2 20.下面哪个赋值语句是正确的( C ) A.Let 0=s B.Let s+1=s C. s=s+k D. k+1=s 21.常量#99/10/20#是日期型 22.常量True是逻辑型 23.sum% 是合法的整型变量 24.xinte$ 是合法的字符变量 25.mm# 是合法的双精度变量 26.num$ 是长整型变量 27.下面正确的变量名是( A ) A. a2 B. 2a C. a(2) D. 2*a 28.下面正确的变量名是( A ) A. int-num B. int.num C. integer D. int(num) 29.语句x=12 mod -5执行完毕后,变量X的值为 2 30.语句x=12.6 mod -5执行完毕后,变量X的值为-3 31.语句x=(-5)^3执行完毕后,变量X的值为-125 32.语句x=(5>4)执行完毕后,变量X的值为True 33.语句x=("abc">"aaa")执行完毕后,变量X的值为True
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
一、单项选择题 1、与传统的程序设计语言相比,VisualBasic最突出的特点是(C)。 A、结构化程序设计 B、程序开发环境 C、事件驱动编程机制 D、程序调试技术 2、赋值语句:a=123&MID("123456",3,2)执行后,a变量中的值是(C)。 A、"12334" B、123 C、12334 D、157 3、保存一个工程至少应保存两个文件,这两个文件分别是(B)。 A、文本文件和工程文件 B、窗体文件和工程文件 C、窗体文件和标准模块文件 D、类模块文件和工程文件 4、以下能在窗体Form1的标题栏中显示"VisualBasic窗体"的语句是(C)。 A、https://www.doczj.com/doc/1f738805.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、VisualBasic6.0集成环境的主窗口中不包括(C)。 A、标题栏 B、菜单栏 C、状态栏 D、工具栏 9、以下叙述中错误的是(C)。 A、VisualBasic是事件驱动型可视化编程工具 B、VisualBasic应用程序不具有明显的开始和结束语句 C、VisualBasic工具箱中的所有控件都具有宽度(Width)和高度(Height)属性 D、VisualBasic中控件的某些属性只能在运行时设置 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设置的背景位图
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分)
VB 期末考试试题A 卷 一、填空题 1、VB 程序设计的主要特点是可视化设计和事件编程。 2、在VB 中,最主要的两种对象是窗体(form )和控件。 3、工程是构成应用程序文件的集合。 4、方法是VB 提供的一种特殊子程序,用来完成一定的操作。 5、浮点类型数据包括单精度型和___双精度__数据。 6、事件是窗体或控件对象识别的__动作___ 。 7、可用窗体的__print_ 方法在窗体中显示文字。 8、复选框控件Value 属性指示复选框处于 _____ 选中___或禁止状态(暗淡的)中的某一种。 9、在VB中,修改窗体的高度(height)和宽度(width )属性值,可改变窗体的大小。 10、双击工具箱中的控件图标,可在窗体的中央出现一个尺寸为缺省值的控件。 11、在MsgBox 函数中,如果缺省title 参数,则使用工程1 作为消息框的标题。 12、设x = 34.58,语句Print Format(x, “ 000.0”)的输出结果是34.6。 13、在VB 中,数值型变量的初值为0 ,Varant 型变量的初值为空,布尔型变量的初值为FALSE 。 14、设置窗体的picture 属性,可在窗体上显示图片。 15、程序运行工程中,清除MP 图片框中的图片应使用语句cls 。 二、选择题 1 、菜单控件只包括一个事件,即C ,当用鼠标单击或键盘选中后按“回车”键时触发该事件,除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B 、Load C 、Click D 、KeyDown 2、滚动条控件(如图所示)的Max 属性所设置的是A 。 A 、滚动框处于最右位置时,一个滚动条位置的Value 属性最大设置值 B 、单击滚动条和滚动箭头之间的区域时,滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时,滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句Select * Form student 中的*表示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中,不属于标签的属性是 C 。 A、Enabled B、Caption C、Default D 、Font 5、要求改命令按钮显示的文本,应当在属性窗口中改变的属性是 A 。 A、Caption B 、Name C、Text D、Label 6、设置一个单选按钮(OptionButton)所代表选项的选中状态,应当在属性窗口中改变的属性是 D 。 A、Caption B 、Name C、Text D、Value 7、允许在菜单项的左边设置打勾标记,下面哪种论述是正确的? D 。 A、在标题项中输入&,然后打勾 B、在索引项中打勾 C、在有效项中打勾 D、在复选项中打勾 8、当执行以下过程时,在窗体上将显示 A 。 Private Sub Command1_Click() Print "VB"; Print "Hello! "; Print "VB"
卷1 一、填空题 1、VB程序设计的主要特点是可视化设计和事件 编程。2、在VB中,最主要的两种对象是窗体 (form)和控件。 3、工程是构成应用程序文件的集合。 4、方法是VB提供的一种特殊子程序,用来完成一定的操作。 5、浮点类型数据包括单精度型和___双精度__数据。 6、事件是窗体或控件对象识别的__动作____。 7、可用窗体的__print_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____选中___或禁止状态(暗淡的)中的某一种。 9、在VB中,修改窗体的高度(height)和宽度(width)属性值,可改变窗体的大小。 10、双击工具箱中的控件图标,可在窗体的中央出现一个尺寸为缺省值的控件。 11、在MsgBox函数中,如果缺省title参数,则使用工程1 作为消息框的标题。 12、设x=34.58,语句Print Format(x,“000.0”)的输出结果是34.6 。 13、在VB 中,数值型变量的初值为0 ,Varant型变量的初值 为空,布尔型变量的初值为FALSE 。 14、设置窗体的picture 属性,可在窗体上显示图片。 15、程序运行工程中,清除MP图片框中的图片应使用语句cls 。 二、选择题 1、菜单控件只包括一个事件,即 C ,当用鼠标单击或键盘选中后按“回车”键时触发该事件,除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、 Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时,一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时,滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时,滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句Select * Form student 中的*表 示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对
大学 VB 考试题库 一、单项选择题 1、与传统的程序设计语言相比,Visual Basic最突出的特点是(C)。 A、结构化程序设计 B 、程序开发环境 C、事件驱动编程机制 D 、程序调试技术 2、赋值语句:a=123& MID("123456",3,2)执行后,a变量中的值是(C)。 A、 "12334" B 、 123 C、 12334 D 、 157 3、保存一个工程至少应保存两个文件,这两个文件分别是(B)。 A、文本文件和工程文件 B 、窗体文件和工程文件 C、窗体文件和标准模块文件 D 、类模块文件和工程文件 4、以下能在窗体Form1的标题栏中显示"VisualBasic窗体"的语句是(C)。 A、 ="VisualBasic窗体" B、 ="VisualBasic窗体" C、 ="VisualBasic窗体" D、 ="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集成环境的主窗口中不包括(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
VB考试一 1、能够获得一个文本框中被选取文本的内容的属性是______。 A:SelStart B:SelLength C:SelText D:Text 参考答案:C 2、在窗体上画一个文本框,其名称为Text1,为了在程序运行后隐藏该文本框,应当使用的语句为:______。 A:Text1.Enabled = False B:Text1.Hide C:Text1.Clear D:Text1.V isible = False 参考答案:D 3、对于语句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 为赋值语句 参考答案:D 4、以下变量名中,______是不符合Visual Basic的命名规范的。 A:_mnu_Open_234 B:Abc901 C:price_ D:K 参考答案:A 5、MsgBox 函数返回值的类型是__________。 A:数值或字符串 B:字符串C:变体D:整型数值 参考答案:D 6、VB一共有设计、运行和中断三种模式,要使用调试工具应该______。 A:进入中断模式B:进入运行模式 C:进入设计模式D:不用进入任何模式 参考答案:A 7、设a=6,则执行 x=IIF(a>5,-1,0) 后,x的值为______。 A:-1 B:6 C:0 D:5 参考答案:A 8、可以同时删除字符前导和尾部空白的函数是______。 A:Mid B:Rtrim C:Trim D:Ltrim 参考答案:C 9、以下语句的输出结果是______。 Print Format$("32548.5","000,000.00")
大学V B考试题库 一、单项选择题 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.doczj.com/doc/1f738805.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 B、将控件的TabStop属性设置为True
大学vb课程题库全集 vb单选、操作部分 一、单项选择题 1、与传统的程序设计语言相比,Visual Basic最突出的特点是(C)。 A、结构化程序设计 B、程序开发环境 C、事件驱动编程机制 D、程序调试技术 2、赋值语句:a=123 & MID(\执行后,a变量中的值是(C)。 A、\ B、123 C、12334 D、157 3、保存一个工程至少应保存两个文件,这两个文件分别是(B)。 A、文本文件和工程文件 B、窗体文件和工程文件 C、窗体文件和标准模块文件 D、类模块文件和工程文件 4、以下能在窗体Form1的标题栏中显示\窗体\的语句是(C)。 A、https://www.doczj.com/doc/1f738805.html,=\窗体\B、Form1.Title=\窗体\C、Form1.Caption=\窗体\D、Form1.Text=\窗体\ 5、为了装入一个Visual Basic应用程序,应当(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、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)属性进行设置。 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、在设计阶段放置的控件
最新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", "B")后,x的值为 A、"a" B、"b" C、"B" D、"A" 8、在窗体上画一个文本框,然后编写如下事件过程: Private Sub Form_Click()
实验三 第1题四则运算题 设计如下窗体,为五个命令按钮编写5段代码完成四则运算及退出程序,其中在计算除法时,如果第二个数就是零,在消息框中显示信息“除数为零”。 Public Class Form1 Private Sub Button1_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button1、Click Dim a, b As Single a = TextBox1、Text b = TextBox2、Text TextBox3、Text = a + b End Sub Private Sub Button2_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button2、Click Dim a, b As Single a = TextBox1、Text b = TextBox2、Text TextBox3、Text = a - b End Sub Private Sub Button3_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button3、Click Dim a, b As Single a = TextBox1、Text b = TextBox2、Text TextBox3、Text = a * b End Sub Private Sub Button4_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button4、Click Dim a, b As Single a = TextBox1、Text b = TextBox2、Text