87题
下列可作为Visual Basic变量名的是（D）。
A.a#a
B.4a
C.?xy
D.C.onst_a
为了描述x>y和y>z同时成立，则下述选项中，正确的是（D）。
A.x>y .and Y>z
B.x>y>z
C.x>y and >z
D.x>y and y>z
下列（B）是日期型数据。
A.@Januaryl0，1997@
B.#Januaryl0，1997#
C. Januaryl0，1997
D.&Januaryl0，1997&
名称（D）表示变体类型数据。
A.Double
B.Currency
C.Boolean
D.V ariant
在表示字符串时，可作为字符串尾部符号的是（D）。
A.#
B.!
C.&
D.$
在一个语句行内写多条语句时，语句之间应该用（D）分隔。
A.逗号
B.分号
C.顿号
D.冒号
Visual Basic的逻辑类型数据占（A）字节内存。
A.2
B.4
C.8
D.16
在代码编辑器中，如果一条语句太长，无法在一行内写下(不包括注释)，要折行书写，可以
在行末使用续行字符（A），表示下一行是当前行的继续。
A.一个空格加一个划字符( _)
B.一个划字符(_)
C.直接回车
D.一个空格加一个连字符( -)
表达式1.5+3\2>2 Or 7 Mod3 < 4 and Not 1的运算结果是（A）。
A.-1
B.0
C.1
D.其他
表达式4+5 \ 6 * 7 / 8 Mod 9 的值是（B）。
A.4
B.5
C.6
D.7
表达式Left( how are you ，3)的值是（A）。
A.how
B.are
C.you
D.how are you
表达式Int(5*Rnd+1)*Int(5*Rnd-1)的值的范围是（D）。
A.[0,15]
B.[-1,15]
C.[-4,15]
D.[-5,15]
满足当x的值是偶数时为真，奇数时为假要求的表达式是（D）。
A.x Mod 2=0
B.Not x Mod 2<>0
C.x\2*2-x)=0
D.Not(x Mod2)
函数Ucase( Basic )的值为（D）。
A.Basic
B.basic
C.BasiC
D.BASIC
可以同时删除字符串前导和尾部空白的函数是（C）。
A.Ltrim
B.Rtrim
C.Trim
D.Mid
如果逻辑与(A.nD.)运算的结果为真，与它所连接的两个条件必须是（C）。
A.前一个为真，后一个为假
B.前一个为假，后一个也为假
C.前一个为真，后一个也为真
D.前一个为假，后一个为真
设A=3，B=5，则以下表达式值为真的是（B）。
A.A>=B and B>10
B.(A>B) Or (B>0)
C.(A<0) Or (B<0)
D.(-3+5>A) and (B>0)
可获得当前系统日期的函数是（A）。
A.Date( )
B.Time( )
C.IsDate( )
D.Year( )
下列不能作为VB中的变量名的符号是（C）。
A.A45
B.P12
C.89Ta
D.xy
函数rnd用于产生随机数，其结果范围是（B）。
A. (0,1)
B. [0,1)
C. (0,1]
D. [0,1]
在一个语句内写多条语句时，每个语句之间用（B）符号分隔。
A.。
B.：
C.*
D.；
下面（A）是合法的单精度型变量。
A.Kum!
B.sum%
C. mytm$
D.Km#
下列关于变体类型的叙述正确的是（C）。
A.变体不是一种数据类型
B.变体是赋给某一种类型数值后，就不能再赋给它另一类型数值
C.该种数据类型在使用过程中是可以变化的，VB自动完成类型转换
D.变体的空值就表示该变体的值为0
表示学习成绩(score)在75分和90分之间的逻辑表达式是（A）。A．score>=75 And score<=90
B．score>=75 0r score<=90
C．score<=75 And score>=90
D．score<=75 0r score>=90
语句PRINT 5/4*6\5 mod 2的输出结果是（B）。
A.0
B.1
C.2
D.3
在\、/、Mod、*等4个算术运算符中，优先级最低的是（C）。
A.\
B./
C.Mod
D.*
表达式Mid(“SHANGHAI”,6,3)的值是（D）。
A.SHANGH
B.SHA
C.ANGH
D.HAI
在VB中，对于未定义的变量，系统默认类型是（D）变量。
A.整型
B.字符型
C.日期型
D.变体型
abc％，abc!，abc$，abc#分别声明abc是（A）。
A．整型、单精度、字符串、双精度变量
B．整型、整型、字符串、双精度变量
C．单精度、整型、字符串、双精度变量
D．整型、双精度、字符串、双精度变量
可获得当前系统日期的函数是（A）。
A.Date()
B.Time()
C.IsDate()
D.Year()
假设A=3,B=7,C=2,则表达式NOT(B*A)的值是（B）
A.True
B.False
C.表达式错误
D.不确定
用于获得字符串S从第5个字符开始的3个字符的函数是（A）。
A.Mid(S,5,3)
B.Middle(S,5,3)
C.Right(S,5,3)
D.Left(S,5,3)
X是小于100的非负数，用VB表达式表达正确的是（C）。
A.0≤X≤100
B.0<=X<100
C.0<=X and X<100
D.0≤X<100
下列符号中哪个是VB程序中合法的变量名（A）。
A.ab7
B.7ab
C.If
D.a*bc
用于去掉字符串左右两边的空格的函数是（B）。
A.Ltrim()
B.Trim()
C.Left()
D.Instr()
标准模块文件的扩展名是（C）。
A.frm
B.vbp
C.bas
D.vbg
表达式Abs(-5)+Len("ABCDE")的值是（C）。
A.5ABCDE
B.-5ABCDE
C.10
D.0
表达式X+I>X是（D）。
A.算术表达式
B.非法表达式
C.字符串表达式
D.关系表达式
在VB中，下列（C）是不合法的循环语句。
A.For…Next
B.Do Until…Loop
C.Do…while
D.Do…Loop
设m=1，n=2，o=3，p=4，下列表达式的值是（A）。m>o-3 And p A.-1 B.0 C.1 D.FALSE Visual Basic布尔运算符Xor，Or，Eqv，And中，级别最高的运算符是（D）。 A.Xor B.Or C.Eqv D.And 下列符号（A）是Visual Basic中的合法变量名。 A.x23 B.8xy C.END D.X8[B] 变量未赋值时，数值型变量的值为（A）。 A.0 B.空串"" C.Null D.没任何值 表达式"Turbo"+"c">"Ture"+"Basic"的值是（B）。 A.TRUE B.FALSE C.Null D.出错信息 表达式25.28 Mod 6.99的值是（B）。 A.1 B.4 C.5 D.出错 表达式Abs(-5)+Len("ABCDE")的值是（C）。 A.5ABCDE B.-5ABCDE C.10 D.0 在以下4个逻辑表达式中，其逻辑值为“真”的是（D）。 A.Not(3+4<4+6) B.2>1 And 3<2 C.1>2 Or 2>3 D.Not(1>2) 假设变量boolVar是一个布尔型变量，则下面正确的赋值语句是（D）。 A.boolVar="True" B.boolVar=.True. C.boolVar=#True# D.boolVar=3<4 有如下程序： a$="Flying"：b$="IS"：c$="funny!" Print a$+" "+Lcase$(b$)+" "+Ucase$(c$) End 运行后，输出结果是（B）。 A.Flying Is funny! B.Flying is FUNNY! C.Flying IS FUNNY! D.FLYING IS FUNNY! 设有如下变量声明： Dim TestDate As Date 为变量TestDate正确赋值的表达方式是（A）。 A.TestDate=#1/2002# B.TestDate=#"1/1/2002"# C.TestDate=date("1/1/2002") D.TestDate=Format("m/d/yy"，"1/1/2002") 下面的数组声明语句中( B )是正确的。 A.Dim A[3，4] As Integer B.Dim A(3，4) As Integer C.Dim A[3；4] As Integer D.Dim A(3；4) As Integer 下列续行写法正确的是( B )。 A.C=_A+B B.C= _A+B C.C =_A+B D.C=_'此处换行A+B 有如下程序： Const st$=""CHINA"" St$=""GREAT"" Print st$ 运行后输出的结果是( D )。 A.CHINA Beijing B.GREAT C.Hebei D.显示出错信息 下列语句正确的是( B )。 A.MsgBox("请输入查询的姓名："，"256+3+48") B.MsgBox "请输入查询的姓名："，256+3+48 C.X=MsgBox(请输入查询的姓名：，vbYesNoCancel) D.X=MsgBox("请输入查询的姓名："，"310") 下述程序段的运行结果是( A )。 X=-2.3 y=125 z=Len(Str$（x）+Str$（y）) Print z A.8 B.6 C.4 D.3 下面四个语句中，正确的赋值语句是( A )。 A.a=a + c B．a +c=a C．c +a=a D．a－c=a 将Cos（y）四舍五入保留3位小数的表达式是( C )。 A.Int((Cos（Y）+0.5)*1000)/1000 B.Int(Cos(Y*1000))/1000+0.5 C.Int(Cos（Y）*1000+0.5)/1000 D.Int(Cos(Y*1000)+0.5)/1000 设a=6，则执行x=iif(a>5,-1,0)后，x 的值为( D )。 A.5 B.6 C.0 D.-1 有如下语句： Type Student Name As String Age As Integer Sex As String End Type Dim Stu As Student With Stu .Name = ""张红"" .Age = 22 .Sex = ""女"" End With 执行Print Stu.Age后的结果是( B )。 A.张红 B.22 C.“女” D.Age 语句X=X+1的正确含义是( C )。 A.变量X的值与X+1的值相等 B.将变量X的值存到X+1中去 C.将变量X的值加1后赋给变量X D.变量X的值为1 有如下程序： a=3：b=4 Print b>a End 运行后，输出结果是( A )。 A.Ture C.4>3 D.显示出错信息 在4个字符""D"",""x""，""A""，""e""中，其ASCII码值最大的是( B )。 A.D B.x C.A D.e 以下语句的输出结果是( C )。 Print Format $(32548.5,""000,000.00"") A.32548.5 B.32548.5 C.32548.5 D.32548.5 在窗体上添加一个命令按钮和一个文本框，并在命令按钮中编写如下代码：Private Sub Command1_Click( ) A=1.2 C=Len(Str$（A）+Space(10)) Text1.text=C End Sub 程序运行后，单击命令按钮，在文本框中显示( C )。 A.3 B.8 C.14 D.10 在窗体中添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1)，然后编写如下两个事件过程： Private Sub Command1_Click() a = Ucase$(Text1.Text) + Left$(Text2.Text，2) Print a End Sub Private Sub Form_Load() Text1.Text = ""aB"" Text2.Text = ""123456"" End Sub 程序运行后，单击命令按钮，输出结果为( B )。 A.Ab12 B.AB12 C.AB56 在窗体中添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1)，然后编写如下程序： Private Sub Command1_Click() X = 0 Do While X < 10 X = (X + 1) * (X + 2) n = n + 1 Loop Text1.Text = Str（n） Text2.Text = Str（X） End Sub 程序运行后，单击命令按钮，在两个文本框Text1和Text2中分别显示的值是( B )。 A.1 0 B.2 12 C.2 72 D.3 12 执行如下语句： a=InputBox(""Today""，""Tomorrow""，""yesterday""，，，""Day before yesterday""，5) 将显示一个输入对话框，在对话框的输入区中显示的信息是( C )。 A.Today B.Tomorrow C.Yesterday D.Day before yesterday 执行语句s=Len(Mid("VisualBasic",1,6))后，s的值是( C )。 A.Visual B.Basic C.6 D.11 在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程： Private Sub Command1_Click() strText = InputBox(""请输入"") Text1.Text = strText End Sub Private Sub Text1_Change() Label1.Caption = Right(Trim(Text1.Text), 3) End Sub 程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是( D )。 B.abcdef C.abc D.def 在窗体上画一个命令按钮，然后编写如下事件过程，程序运行后，单击命令按钮，依次在输入对话框中输入5，4，3，2，1，-1，输出结果为( A )。 Private Sub Commandl_Click() x=0 DO Until x=-1 a=Val(InputBox(”请输入A的值”)) b=Val(InputBox(”请输人B的值”)) x=Val(InputBox(”请输入X的值”)) a=a+b+x Loop Print a End Sub A.2 B.3 C.14 D.15 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程: Private Sub Command1_Click() c = 1234 c1 = Trim(Str（c）) For I = 1 To 4 Print( ) Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容 1 12 123 1234 则在下划线处应填入的内容为( B )。 A. Right(c1,I) B.Left(c1,I) C.Mid(c1,I,1) D.Mid(c1,I,I) 下面( D )不是字符串常量。 A."你好" B." " C."TRUE" D.#False# 选拔身高T超于1.7米且体重W小于62.5千克的人，能表示该条件的布尔表达式是( C )。 A.T>1.7 And W<=62.5 B.T<=1.7 Or W>=62.5 C.T>1.7 And W<62.5 D.T>1.7 Or W<62.5 执行以下程序段后，变量C$的值为( D )。 A$=""Visual Basic Programing"" B$=""Quick"" C$=B$ & Ucase(Mid$(A$，7，6)) & Right$(A$，11) A.Visual BASIC Programing B.QuickBasic Programing C.QUICK Basic Programing D.Quick BASIC Programing 要强制显示声明变量，可在窗体模块或标准模块的声明段中加入语句( D )。 A.Option Base B.Option Explicit C.Option D.Option Compare 下列哪项不能作为VB中的变量名( C )。 A.SSSSS B.P123 C.456ADS D.xdk 表达式Mid(“Hello”,2,3)的值是( C )。 A.“ll” B.“llo” C.“ell” D.“ello” 表达式Int(4*Rnd+10)值的范围是( D )。 A.[10,14) B.[11,13) C.[10,14] D.[10,13] 表达式2*3^2+2*8/4+3^2的值是( B )。 A.49 B.31 C.45 D.37 设x=4,y=8,z=7，表达式x A.True B.False C.-1 D.1 可以同时删除字符串前导和尾部空白的函数是( C )。 A.Ltrim B.Rtrim C.Trim D.Mid 函数Len(“123.4”)的值为( B )。 A.11 B.5 C.6 D.8 函数InStr(“VB程序设计教程”,”程序”)的值为( C )。 A.1 B.2 C.3 D.4 下列函数中，返回值的类型与其它3个不同的是( A )。 A.NOW() B.HOUR() C.YEAR() D.DAY() InputBox函数返回值的类型为( B )。 A.数值 B.字符串 C.变体 D.数值或字符串(视输入的数据而定) 可获得当前系统时间的函数是( B )。 A.Date() B.Time() C.IsDate( ) D.Year( ) Abc%，abc!，abc$，abc#分别声明abc是( A )。 A.整型、单精度、字符串、双精度变量 B.整型、整型、字符串、双精度变量 C.单精度、整型、字符串、双精度变量 D.整型、双精度、字符串、双精度变量 第一章 答案： 一、单项选择题 1.B 2. C 3. D 4.D 5.D 6.D 7.D 8.C 9.B 10.B 11.A 12.D 13.B 14.C 二、判断题 1.T 2.T 3.F 4.F 5.F 6.T 7.T 8.T 9.T 10.T 11.T 第二章 一、单项选择题 1. B 2. D 3. A 4. D 5. B 6.A 7. D 8. D 9. D 10. A 11. A 12. A 13. C 14. C 15. A 16. C 17. A 18. D 19. A 20. D 21. B 22. C 23. B 24. A 25. B 26. A 27. C 28. D 29. D 30. B 31. C 32. D 33. B 34. C 35. C 36. C 37. C 38. D 39. C 40. A 41. D 二、判断题 1. True 2. True 3. False 4. False 5. False 6. False 7. False 第三章 一、单项选择题 1.A 2.D 3.D 4.B 5.B 6.D 7.C 8.D 9.B 10.B 11.D 12.D 13.C 14.D 15.A 16.C 17.B 二、判断题 1.T 2.F 3.T 4.T 5.F 6.F 7.F 8.F 9.F 10.F 11.T 12.F 13.F 14.T 15.F 16.T 17.T 18.F . 第四章 一、单项选择题 1.D 2.A 3.C 4.C 5.B 6.C 7.B 8.B 9.C 10.B 11.A 12.A 13.B 14.C 15.C 16.D 17.A 18.D 19.B 20.A 21.D 22.B 23.A 24.D 25.D 26.B 27.D 28.A 29.D 30.A 31.D 二、判断题 1.F 2.T 3.F 4.F 5.T 6.F 7.T 三、操作题 1.参考代码： Private Sub Command1_Click() Dim i As Integer, j As Integer, k As Integer Dim sum As Integer For i = 2 To 10000 sum = 0 For j = 1 To i / 2 k = i Mod j If 0 = k Then sum = sum + j End If Next j 大学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/5316567224.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：单项选择题： A A C C C D C B B C 2：填空题： （1）.bas （2）.vbp，.frm （3）视图工具箱 （4）对象 （5）属性对象事件方法 （6）Windows （7）事件行为 （8）窗体模块 实验二 1：单项选择题： A D C C A B A B D C B B C B C B A B D C 2：基本运算题： （1）27 （2）3.33333333333333 （3）3 （4）0 （5）-3 （6）2 （7）ab33 （8）类型不匹配 （9）3 （10）AB3 实验三 1：单项选择题： B C B D C 2：填空题： （1）300 （2）321456 （3）Shanghai （4）6 7 6 （5）True （6）2+3=5 （7）”area=” 12.56 （8）VISUAL 实验四 1：单项选择题： C A A C A 2：填空题： （1）7 （2）3 5 （3）输入的数小于0 （4）3 （5）False （6）2010 is not leap year. 试验五 1：单项选择题： A C C A B A C C C B 2：填空题： （1）9 （2）①n ②1 （3）①Len(a) ②n\2 ③Mid(a,(n-i+1),1) ④Mid(a,(n-i+1),1) （4）①n Mod 3=1 And n Mod 5=1 And n Mod 7=1 ②While CountN<5 （5）Mid(c1,1,i) 实验六 1：单项选择题： D B D C D A C A D D 2：填空题： （1）30 （2）3 （3）①a(2) ②a(3) ③a(1) （4）①1 ②2 ③a(i)=a(6-i) （5）①i+j ②0 ③a(i,j) （6）①Print ②k ③a(k,j)=a(j,k) ④a(k,j); 实验七 1：单项选择题： A B B A C B 2：填空题： （1）15 （2）①Preserve a(n+1) ②a(i+1)=a(i) ③Exit For ④a(i+1)=m⑤0 to n+1 (或LBound(a) to UBound(a)) （3）d,c,b,a 实验八 1：单项选择题： C A D B D C A C B 2：填空题： （1）a=9 b=4 （2） 36 25 16 9 4 1 （3）①a ②UBound(b) ③ 1、计算圆柱体的表面积和体积 在窗体上放置5个标签，4个文本框，3个命令按钮，单击“计算”按钮，右侧文本框显示相应的结果；单击“清除”按钮，清除所有文本框的内容；单击“结束”按钮，程序结束。（用两种方法做） 2、计算长方体的体积和表面积 3、求二元一次方程的根 求二元一次方程5X2-9X-10=0，运行界面如图 1．填空题 1．在程序设计语言系统中具有固定语法含义的符号串称为（），它们通常用来表示系统提供的标准过程、函数、运算符、常量等。 2．（）用于标记用户自定义的常量、类型、变量、控件、过程、函数等名字。 3．整型数据占（）字节的内存空间。长整型数据占（）个字节的内存空间。单精度浮点型数据占（）个字节的内存空间。双精度浮点型数据占（）个字节的内存空间。日期型数据占（）个字节的内存空间。 4．100%表示100为（）型数据；100！表示100为（）型数据；100＠表示100为()型数据。 5符号常量在某一过程中说明，则该符号常量只能在（）内有效。 6．若一个整型变量说明了之后没有给它赋值，则它的值为（）。 7．在VB中可以把类型说明符放在变量名的（）来说明变量的类型。 8．为使VB的编译程序自动检查变量声明，遇到未经说明的标识符发出错误警告信息，在程 序中要加上（Option Explicit）语句。 9．对含有多种运算的表达式，各种运算之间的顺序为（）→（）→（）→（）。 10．把的小数部分四舍五入转换为整数，可使用函数（）。 11．将x四舍五入到百位（例如，若x=应舍入成23900），可使用表达式（）。 12．将x从十位截断（例如，x=应截成23800）可使用表达式（）。 13．设X为数值变量，求X的常用对数可使用的表达式是（Log(X)/Log(10)）。 14．要从字符串“VisualBASIC”中截取子字符串“BASIC”可使用函数（） 15．设S是字符串变量，并且串长度为7，写出生成由S的偶数序号字符组成的字符串的表达式（例如，把字符串”ABCDEFG”变成“BDF”）。 16．设S是字符串变量，并且串长度为7，写出用第2i–1个字符代替第2i个字符所得到字符串的表达式（例如，把字符串”ABCDEFG”变成“AACCEEG”）。 17．产生从整数a到整数b之间的随机整数可使用表达式（Int((b-a+1)*Rnd+a)）。 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实验作业参考答案 作业一窗体设计 (2) 作业二计算器 (4) 作业三人民币张数求电阻值 (6) 作业四（必做）建康城 (8) 作业五阶乘累加 (9) 作业六（必做）九九乘法表 (11) 作业七（必做）I NPUT B OX 函数输入12个整数，赋值给3×4的二维数组 (12) 作业八递归函数计算两个正整数的最大公约数，递归公式为 (13) 作业九（必做）家电提货单 (15) 作业十统计某个文本文件中各英文字母出现的次数，不区分大小写，并将结果打印到窗体上。 (17) 作业十一设计一个程序，用于打开1个windows应用程序，如打开“记事本”“画图”、“计算器”等。 (19) 作业十二通过菜单选择，对字体、字号进行设置 (21) 作业一 1.简答题(略) 2.编程题： 1)单击窗体后在窗体上显示“您好！×××同学”。 要求：（1）程序中用自己的姓名替代“×××”。（2）文字以红色、仿宋体、加粗、三号字显示，并在字下加横线。（3）建立一个命令按钮，结束时单击此按钮退出。 答案参照课本P27的例1-6。 2)设计一窗体，窗体上有1个文本框（Text1）、1个命令按钮（Command1），运行时文本框中显示“Visual Basic程序设计”，命令按钮标题为“结束”，文本框及命令按钮能随窗体大小的调整而自动调整大小及位置，其中调整文本框使其：Left=0，Top=0，宽度和高度都为窗体的一半；命令按钮：始终位于窗体右下角位置。请编写： （1）用代码初始化各控件（提示：可写在Form_Load事件中）。 （2）文本框控件随窗体的大小而调整大小的代码，以及调整命令按钮位置始终位于窗体右下角的代码（提示：调整大小位置的代码写在Form_Resize事件中）。 （3）结束程序运行的代码（命令按钮）。 程序代码： Private Sub Form_Load() Text1.Left = 0 Text1.Top = 0 Text1.Width = Form1.Width / 2 Text1.Height = Form1.Height / 2 Command1.Left = Form1.ScaleWidth - Command1.Width VB第三章练习 一、选择题 1．关于Visual Basic程序的说法不正确的是________。 A) 一行可以写多条语句，语句之间用“:”隔开 B) 一条语句可以写在多行上，用“空格”加“_”作为续行标志 C) 程序中的大小写字母不区分 D) 变量在使用之前必须先定义类型 2．Visual Basic的一条语句可以写在多行，但要用续行符，续行符应为________。 A) 一个空格加一个下划字符(_) B) 一个下划字符(_) C) 直接回车 D) 一个空格加一个连字符(-) 3．Visual Basic的一行可以写多条语句，语句之间用________隔开。 A) 逗号 B) 分号 C) 顿号_ D) 冒号 4．下列说法不正确的是 ________。 A) 注释语句是非执行语句，仅对程序的有关内容其注释作用，它不被解释和编译 B) 注释语句可以作为代码中的一行 C) 注释语句不可以放在其他语句的后面 D) 代码中加入注释语句的目的是提高程序的可读性 5．下列说法不正确的是________。 A) 调试程序时，使用解释运行方式比较方便 B) 解释运行方式比编译运行方式运行应用程序的速度慢 C) 解释运行方式必须在Visual Basic集成环境下使用 D) 解释运行方式和编译运行方式都必须在Visual Basic集成环境下使用 6．一般情况下，用Visual Basic创建应用程序分为4个主要步骤。以下操作顺序正确的是________。 ① 创建应用程序的界面② 编写程序代码，建立事件过程 ③ 设置对象属性④ 调试运行程序，生成可执行文件 A) ①②③④ B)①③②④ C) ②①④③ D) ②③①④ 7．新建工程的快捷键是________ 。 A) Crtl+A B)Crtl+D C) Crtl+N D) Crtl+E 8．工程文件的扩展名是________。 A) frm B) frx C) cls D)vbp 9．假定窗体的名称(Name属性)为Form1，则把窗体的标题设置为"Visual Basic Test"的语句为________。 A) Form1＝"Visual Basic Test" B) Caption＝"Visual Basic Test" C) Form1.Text＝"Visual Basic Test" D) https://www.doczj.com/doc/5316567224.html,＝"Visual Basic Test" 10. 下列不能打开代码窗口的操作是________ 。 A) 双击窗体上的某个控件 B) 双击窗体 C) 按F7键 D) 单击窗体或控件 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. 标签框的边框，由属性的设置值决定。 实验六 专业_____________ 班级________年级________姓名______________学号_______________ 一、实验目的 1、认识常用控件：单选按钮、复选框、框架、列表框、组合框、滚动条、滑动器（Slider）、时钟、图形控件； 2、学习在窗体中创建常用控件 2、学习在属性窗口和在程序代码中设置属性 3、学习调用控件的方法 4、学习编写各控件和鼠标与键盘的事件过程 二、实验内容 1、单选按钮、复选框、框架 1）设置窗体F1的标题为“复选框、框架和单选按钮”；在窗体中设置复选框Ch1、Ch2 Ch1和Ch2的高度和宽度分别为360和1000；并程序运行时，Check2处于非少许状态。框架Fr1包含单选按钮Op1和Op2。 2）设计窗体，要求 ①标题为“设置字体”； ②在窗体中设置有边框的标签控件Label1，高度和宽度分别为450和3800，标题为“欢迎使用VB”，字号为“四号”，居中显示； ③标题为“字体”框架包含两个标题分别为“楷体_GB2312”和“华文新魏”的单选按钮Op1和Op2； ④标题为“斜体”框架包含两个标题分别为“是”和“否”的单选按钮。 ⑤编写相应控件的事件过程，使得程序运行时，单击“楷体_GB2312”，标签控件的字体为楷体_GB2312，单击“华文新魏”，标签控件的字体为华文新魏；单击“是”，标签控件的字体为斜体，单击“否”，标签控件的字体取消斜体。 Private Sub Option1_Click() Label1.FontName = Option1.Caption End Sub Private Sub Option2_Click() 第3章程序流程控制 3．1 填空题 1．设变量r 表示圆的半径，则计算圆的面积并赋给变量s使用的赋值语句为（s=3.14159*r*r ）。 2．给命令按钮Command2的Caption属性赋予字符串“退出”使用的赋值语句为（Command2.Caption=＂退出＂）。 3．为了求n的阶乘，要求用户输入n的值。程序使用InputBox函数输入，要求对话框提示信息为“请输入一个求阶乘的数：”，标题为“求数的阶乘”，并且正确地把输入的信息转换为数值存放到变量n中，则使用的赋值语句为（n=val（InputBox（＂请输入一个求阶乘的数：＂，＂求数的阶乘＂））。 ４．如果使用MsgBox对话框显示提示信息“退出本系统？”，并显示“是（Yes）”和“否（No）”两个按钮，显示图标“？”号，指定第一个按钮为默认值以及标题为“提示信息”，则调用MsgBox函数的形式为（MsgBox（＂退出本系统? ＂，4+32+0，＂提示信息＂））。 ５．如果使用MsgBox对话框显示提示信息“文件未找到！”，并显示“确定”按钮、图标“！”号和标题“文件查找”，则使用的MsgBox语句为（MsgBox＂文件未找到＂，0+48+0，＂文件查找＂）。 ６．要在当前窗体Form和立即窗口输出字符串“Visual BASIC 6.0”使用的Print方法分别是( Print “Visual BASIC 6.0”)和( Debug.Print “Visual BASIC 6.0”)。 ７．使用Print方法时，若用逗号分隔，则按( 标准)格式输出各表达式的值，若用分号分隔，则按( 紧凑)格式输出各表达式的值。 ８．注释语句是一个（非执行）语句，VB不对它们进行编译，对程序的执行结果没有任何影响。 ９．判别变量i是否为偶数，若为偶数就把它显示出来。使用单行结构条件语句为（If i Mod 2=0 Then print x ）。 页脚内容1 | 最新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", 第一题 1.制作如图所示窗体界面。（用真实的姓名、班级及学号） 2.使时间每隔1秒刷新一次 3.单击“最大值”命令按钮时，算出通过键盘输入的5个数的最大 值 4.在列表框中输入20、22、24、26、28 Private Sub Command1_Click() Dim a(1 To 5) As Integer For i = 1 To 5 a(i) = InputBox("please input a number") Next i mmax = a(1) For i = 1 To 5 If a(i) > mmax Then mmax = a(i) End If Next i MsgBox mmax End Sub Private Sub Timer1_Timer() Label2.Caption = Time End Sub 第二题 1.两个文本框里输入两个数字从而确定一个范围。 2.单击“计算”按钮求出这个范围中能被3或5整除的数的平方和， 结果显示在label3中。 https://www.doczj.com/doc/5316567224.html,bel3的背景色每隔1.5秒蓝红交替。 Private Sub Command1_Click() Dim a As Integer Dim b As Integer a = Text1.Text b = Text2.Text s = 0 For i = a To b If a Mod 3 = 0 Or b Mod 5 = 0 Then Label3.Caption = Label3.Caption & i & "," s = s + i * i End If Next i Label3.Caption = s End Sub Private Sub Timer1_Timer() If Label3.BackColor = vbRed Then Label3.BackColor = vbBlue Else Label3.BackColor = vbRed End If End Sub 第三题 1、单击按钮，在文本框中显示1到终值的所有整数的平方和 2、单击生成列表按钮，在列表框中显示1到终值之间的所有整数 Private Sub Command1_Click() 习题 一、单项选择题 1、设x=4，y=6，则以下不能在窗体上显示出“A=10”的语句是（） A.PrintA=x+y B. Print"A="；x+y C. Print"A="+Str(x+y) D. Print"A="&x+y 2、假定有如下的命令按钮(名称为Command1)事件过程： PrivateSubCommand1_Click() x=InputBox("输入："，"输入整数") MsgBox"输入的数据是：”，，”输入数据："+x EndSub 程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是（） A. x的值是数值10 B. 输入对话框的标题是“输入整数” C. 信息框的标题是“输入数据：10” D. 信息框中显示的是“输入的数据是：” 3、有如下程序 a=3;b=4 PRINT b＜a END 运行后，输出的结果是( ) A.4＞3 B.-1 C.0 D.显示出错信息 4、在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1 的命令按钮，然后编写一个事件过程。程序运行以后，如果在文本框中输入一个字 符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件 过程是（） A. Private Sub Text1_Change() B. Private Sub Command1_Click() Command1.Caption=”计算机等级考试”Caption=”计算机等级考试” End Sub End Sub C. Private Sub Form1_Click() D. Private Sub Command1_Click() Text1.Caption=”计算机等级考试”Text1.Text=”计算机等级考试” 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中。 请参考10_2.exe程序的运行结果，新建一个工程，完成"调色板"程序的设计，该程序由红绿兰三原色进行调色，如果预览满意，单击"应用"按钮，将调好的颜色作为文本框中文字的颜色。将完成后的工程文件以Design.Vbp、窗体文件以Design.frm保存到D:\10_2目录下。 具体要求如下： 1. 应用程序界面设计参考图示。 2. 要求水平滚动条和颜色成分输入文本框分别采用控件数组实现。 3. 要求操作任意一个滚动条，都会在相应的文本框中显示该颜色成分的当前取值，并且动态改变预览框中长方形的颜色。[注意：滚动条最大值为255] 4. 要求在任意一个颜色成分输入文本框中输入一个0-255的数据，相应的滚动条的滑块都会移到正确的位置上，并且预览框中长方形的颜色也随之而调整。 5. 单击"应用"按钮后将调好的颜色作为文本框中文字的颜色。 思考题：拖动滚动条时有没有触发滚动条的Change事件？ 提示: 1. 应用程序界面设计参考图示。 程序界面右下角的预览框架里的长方形是形状控件Shape1（工具箱中的），将其FillStyle属性设置为0。 2. 要求水平滚动条和颜色成分输入文本框分别采用控件数组实现。 三个滚动条的Min设为0，Max设为255；三个文本框的Text属性设为空字串。 3. 要求操作任意一个滚动条，都会在相应的文本框中显示该颜色成分的当前取值，并且动态改变预览框中长方形的颜色。 颜色是利用Rgb(r,g,b）函数来表示，其中r,g,b是红、绿、兰颜色的饱和度，分别通过滚动条来控制。 Private Sub HScroll1_Change(Index As Integer) Text1(Index).Text = HScroll1(Index).Value Shape1.FillColor = RGB(HScroll1(0).Value, HScroll1(1).Value, HScroll1(2).Value) End Sub 4. 要求在任意一个颜色成分输入文本框中输入一个0—255的数据，相应的滚动条的滑块都会移到正确的位置上，并且预览框中长方形的颜色也随之而调整。 设计文本框的Change事件： Private Sub Text1_Change(Index As Integer) HScroll1(Index).Value = Val(Text1(Index).Text) End Sub 5. 单击“应用”按钮后将调好的颜色作为文本框中文字的颜色。 Text2.ForeColor = Shape1.FillColor 下载10_1.exe 请参考10_1.exe程序的运行结果，新建一个工程，完成"过程练习"程序的设计，并将工程文件以Design.Vbp、窗体文件以Design.frm保存到D:\10_1目录下。 具体要求如下： 1. 各题必须按要求用通用过程或函数过程进行编程。 2. "第一题"：编写一个求n!的阶乘函数F(n)，利用该函数计算二项式系数Cmn=m!/(n!*(m-n)!)；其中m>=n；m和n从键盘输入。 3. "第二题"：编写一个求1+2+……+n的函数Sum(n)，利用该函数计算1+（1+2）+（1+2+3）+……+（1+2+……+100）的和。 4. "第三题"：编写一个三个数中求最大数的函数过程Max(x,y,z)。随机产生7个∈[0，50]之间的整数，然后用这个函数过程分别求出前三个数的最大值、前五个数的最大值以及这七个数中的最大值。 5. "第四题"：编写一个每行可以打印5个下标变量的打印数组的通用过程，。随机产生一个∈[100，500]、有20个下标变量的数组，调用该通用过程打印出原始数据；再将该数组中的偶数组成一个新的数组，再调用该通用过程打印出偶数数组。 思考题：通用过程与函数过程的区别？ 提示: 第三章建立简单的Visual Basic应用程序 教学要求： 掌握Visual Basic语言语句的语法规则，掌握赋值语句、注释、暂停与程序结束语句；通过编写简单的应用程序，了解如何用Visual Basic开发一个应用程序，掌握设计应用程序的方法，学会程序的保存、装入及运行。 知识点： 面向对象的交互式程序设计；使用Visual Basic开发应用程序。 内容导航： 一、语句 （一）语句 语句是执行具体操作的指令，每个语句以回车键结束。 （二）赋值语句 用赋值语句可以把指定的值赋给某个变量或某个带有属性的对象，一般格式为：［Let］目标操作符=源操作符 （三）注释、暂停与程序结束语句 1．注释语句 格式：Rem 注释内容 ′注释内容 2．暂停语句（Stop） 格式：Stop 3．结束语句（End） 格式：End 二、编写简单的Visual Basic应用程序 （一）用Visual Basic开发应用程序的一般步骤 在用Visual Basic开发应用程序时，需要以下3步：建立可视用户界面；设置可视界面特性；编写事件驱动代码。 （二）编写Visual Basic应用程序 1．建立用户界面 2．设置属性 3．编写代码 三、程序的保存、装入和运行 （一）保存程序 应用程序可以用4种类型的文件保存。一类是单独的窗体文件，扩展名为.frm；一类是公用的标准模块文件，扩展名为.bas；第三类是类模块文件，扩展名为.cls（本书不涉及类模块文件）；第四类是工程文件，这种文件由若干个窗体和模块组成，扩展名为.vbp。 （二）程序的装入 一个应用程序包括4类文件，即窗体文件、标准模块文件、类模块文件和工程文件，这4类文件都有自己的文件名。但只要装入工程文件，就可以自动把与该工程有关的其他3类文件装入内存。 （三）程序的运行 一、选择题（1-30 题每小题1分，共30分，31-45题每小题2分,共30分，总计60分）要使窗体Form1的标题栏中显示“正在复制文件…”，正确的语句是：a A．Form1.Caption=“正在复制文件…” B．Form1.Title=“正在复制文件…” C．Form1.Text=“正在复制文件…” D．Form1.名称=“正在复制文件…” 如果要求设置定时器时间间隔为1秒钟，那么它的Interval属性值应该等于：a A．1000 B．100 C．10 D．1 3、下列关于控件的基本操作中，错误的是 A)当控件处于活动状态时，可以对控件进行缩放 B) 在设计阶段不能移动控件 C) Visual Basic 6.0 允许对画好的控件进行复制和删除 D) 可以通过属性窗口改变控件的位置和大小 4、用Visual Basic 开发应用程序的一般步骤有：①设置窗体和控件的属性、②编写代码、③建立用户界面，其中正确的顺序是： A) ①②③B) ①③②C) ③②①D) ③①② 5、为使文本框只能显示不能输入，即只读，应设置文本框的属性是：c A．MaxLength设置为0 B．Cancel设置为True C．Locked设置为True D．Read设置为True 6、InputBox函数返回值的类型为。B A．数值B．字符串C．变体 D．数值或字符串（视输入的数据而定） 7、为了把焦点移到某个指定的控件，所使用的方法是：A A．SetFocus B．Visible C．ReFresh D．GetFocus 8、函数String(3,”str”)的功能是：b A．把数值型数据转换成字符串 B．返回有3个字符串组成的字符串 C．从字符串中第3个字符 D．从字符串中第3个字符的位置开始取字符串 9、双击窗体中的对象后，Visual Basic将显示的窗口是：c A．项目（工程）窗口B．工具箱C．代码窗口D．属性窗口 10、用于获得字符串s最左边4个字符的函数是：a A．Left(s,4) B．Left(1,4) C．LeftStr(s) D．LeftStr(3,4) 11、以下程序段的输出结果是：d a=Sqr(3) b=Sqr(2) c=a>b Print c A．-1 B．0 C．False D．True 12、用下面语句定义的数组的元素个数是：c Dim A (-4 to 6) As Integer A．6 B．7 C．11 D．9 实验教程 实验三顺序结构程序设计编程题参考答案（第47页） 1. 输入学生的语文、数学、英语、物理四门课程的成绩，计算该学生的总成绩和平均成绩并输出。要求使用InputBox分别进行输入，使用Print 方法输出。 2. 输入圆的半径，输出其周长、面积。要求使用TextBox控件进行输入，使用Label控件输出。 3. 输入一元二次方程ax2+bx+c=0 的系数a、b、c，输出两个实根。要求使用TextBox控件分别进行输入，使用Label控件输出。 实验四选择结构程序设计编程题参考答案（第58页） 1. 输入一个，判断其是否能同时被3和7整除。 2. 输入三个数，输出其中的最大值。 6. 编程及输出分段函数的值。由键盘输入t的值，计算y的值 7. B；20～29 为青年，输出B； 50 8. 输入年份，输出对应的属相。已知1984年为鼠年，要求使用Select Case语句实现。实验五循环结构程序设计编程题参考答案（第77页） 1.编写程序，求s=1×2×3 + 2×3×4 + … + n×(n+1) ×(n+2)的值，n由程序输入。 Y= 2.有一个分数序列 ，求出这个序列前 20项的和。 3. 求∑= 10 1 ! n n （即1！+2！+3！+…+10！） 4. 求一类三位数，该书中有某两位为相同数字，且该数是一个完全平方数，输出这些数并统计个数。 5. 输出所有的“水仙花数”。“水仙花数”是指一个三位数，其各位数字立方和等于该数本身。例如，371是一个水仙花数，因为371=33+73+13 6. 打印如图所示的乘法表 实验六定长数组的使用编程题参考答案（第96页） 1.定义一个包含10个数组元素的数组a，为其数组元素分别赋值为2、4、6、8、…20，并输出。 2. 输入十个评委的分数，去掉最高分和最低分后，计算最后的平均分并输出。 3.输入5个学生的姓名与一门课程的成绩，按成绩的升序输出姓名和成绩。分别使用比较 ,... 13 21 , 8 13 , 5 8 , 3 5 , 2 3 , 1 2vb实验教程答案
大学VB考试题库完整
vb程序设计实验教程习题答案
VB第三章练习题
vb练习题及答案.doc
vb实验作业参考答案
vb练习题第三章
vb试题及答案
vb6.0实验六习题与答案
VB课本习题答案第三章
vb题库及答案
Vb上机实验答案
最新VB第三章课后习题答案
vb经典题目及答案
vbvb期末考试实验答案作业
vb练习题,电子版 第三章 建立简单的Visual Basic应用程序
vb试题及答案
vb实验编程答案
相关主题
文本预览