vb第四次练习题

合集下载

VB第四章测试题(附答案)

VB第四章测试题(附答案)

VB第四章测试题一、选择题1.下列可作为VB的变量名的是BA.3*DletaB.PrintCharC.AbsD.ABπ2.下列可作为VB的变量名的是AA.FilenameB.A(A+B)C. A%DD.Print3.下列可作为VB中所允许的形式的数是CA.±25.74B.3.457E-100C. .368D. 1.87E+504.下列可作为VB中所允许的形式的数是DA.10^(1.256)B. D32C. 2.5ED.12E35. 下面的数写成普通的十进制数是B2.65358979335278D-006A.0.0000265358979335278653B. 0.00000265358979335278C.0.000265358979335278653D. 0.0000002653589793352786.下面的数写成普通的十进制数是D1.21576654590569D+019A.12157665459056900B. 121576654590569000C.1215766545905690000D. 121576654590569000007.下面的数写成普通的十进制数是B8.6787E+8A. 86787000B. 867870000C. 8678700D. 86787000008.下面的数写成普通的十进制数是A2.56E-12A.0.000000000002567B. 0.0000000002567C.0.000000002567D. 0.000000000025679.下列符号中不能作为VB中变量名的是___C_____。

A.ABCDB. E0065700C. 123TWDFFD. zxy10.如果将布尔常量值True赋值给一个整型变量,则整型变量的值为B_。

A. 0B. –1C. TrueD.False11.下列符号常量的声明中,__C______是不合法的。

A. Const a As Single = 1.1B. Const a As Integer = “12”C. Const a As Double =sin(1)D.Const a = “OK”12.下列___A_____是字符型常量。

VB机试模拟试卷4(题后含答案及解析)

VB机试模拟试卷4(题后含答案及解析)

VB机试模拟试卷4(题后含答案及解析)题型有:1. 基本操作题 2. 简单应用题 3. 综合应用题基本操作题(30分)1.注意:下面出现的“考生文件夹”均为c:\wexam\25160001。

请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。

(1)在名称为Form1的窗体上建立一个名称为Text1的文本框,一个名称为Cmd1,标题为“输出”的命令按钮,如图4-1所示。

要求程序运行后,在文本框输入几个字符,单击“输出”按钮,则在窗体上显示文本框中的文字。

注意:在程序中不能使用任何变量。

保存时必须存放在考生文件夹下,窗体文件名为sjt1.frm,工程文件名为sjt1.vbp。

(2)在名称为Form1的窗体上建立两个名称分别为Cmd1和Cmd2,标题为“按钮一”和“按钮二”的命令按钮,如图4-2所示。

要求程序运行后,如果单击“按钮一”,则把“按钮二”移到“按钮一”上,使两个按钮重合,如图4-3所示。

注意:在程序中不得使用任何变量(必须通过属性设置来移动控件)。

保存时必须存放在考生文件夹下,窗体文件名为sjt2.frm,工程文件名为sjt2.vbp正确答案:(1)在窗体上建立好控件后,先设置控件属性,再编写事件过程。

通过命令按钮的Caption属性来设置其标题,单击命令按钮触发Click事件;文本框显示内容是用Text属性。

文本框中的内容通过其Text属性得到,在命令按钮的Click事件中利用Print方法将文本框中的内容输出,完成题目要求。

解题步骤:第一步:建立界面并设置控件属性。

程序中用到的控件及其属性见表4-1。

第二步:编写程序代码。

参考代码:Private Sub Cmd1_Click( ) Cls Print Text1.Text End Sub 第三步:调试并运行程序。

第四步:按题目要求存盘。

(2)在窗体上建立好控件后,先设置控件的属性,再编写事件过程。

命令按钮的Caption属性用来设置其标题,单击命令按钮触发Click 事件,本题考查的是按钮的摆放位置的设置,涉及到对象的Left和Top属性。

2008春VB上机试卷VB04答案

2008春VB上机试卷VB04答案

2008年(春)上机 Visual Basic(VB04)答案一、改错【题目】本程序的功能是查找四位整数n,它的9倍正好等于n的反序数。

Option ExplicitPrivate Sub Command1_Click()Dim n As Integer, k As IntegerDim st As StringText1 = "结果是:"For n = 1000 To 1111k = 9 * nIf nx(n) = k Thenst = n & "--" & kText1 = Text1 & st & vbCrLfEnd IfNext nEnd SubPrivate Function nx(ByVal n As Integer) As Integer '无ByvalDim i As Integer, sa As StringDim k As Integeri = 1Dok = n Mod 10sa = sa & CStr(k) 'err Str(k)n = n \ 10 ‘err n / 10Loop While n > 0nx = saEnd Function二、编程题【题目】编写程序,输入一个正整数n,求所有小于n大于1,且与n互质的数,存入一个数组,并按每行五个的格式输出到一个多行文本框中。

(所谓两个数互质,是指两个数除了1之外,没有其他公约数)Option ExplicitPrivate Sub Command1_Click()Dim n As Integer, hz() As Integer, k As IntegerDim i As Integer, st As Stringn = Text1i = 2DoIf gcd(i, n) = 1 Thenk = k + 1ReDim Preserve hz(k)hz(k) = iEnd Ifi = i + 1Loop While i < nFor i = 1 To UBound(hz)st = st & Str(hz(i))If i Mod 5 = 0 Then st = st & vbCrLfNext iText2 = stEnd SubPrivate Function gcd(ByVal m As Integer, ByVal n As Integer) As Integer Dim r As IntegerDor = m Mod nm = nn = rLoop Until r = 0gcd = mEnd FunctionPrivate Sub Command2_Click()Text1 = "": Text2 = ""Text1.SetFocusEnd SubPrivate Sub Command3_Click()EndEnd Sub。

电大VB程序设计形成性考核4答案

电大VB程序设计形成性考核4答案

电⼤VB程序设计形成性考核4答案判断题:(共20题每题2分)1、如果⼀个菜单项的Visibal属性值为False,则该菜单及它的⼦菜单都不会显⽰。

参考答案:正确2、双精度数据类型的数据在机器内部⽤8个字节存储。

参考答案:正确3、语句Print “123”+45的输出结果是“12345”。

参考答案:错误4、当命令按钮的Style属性值为1-Graphical时,不可以⽤Caption属性设置标题的⽂字,可以⽤Picture属性给命令按钮添加图形。

参考答案:错误5、编译后形成的可执⾏应⽤程序⽂件是可以脱离开系统独⽴执⾏的。

参考答案:正确6、在盘驱动器列表框Drive1的Change事件过程中,代码Dir1.Path=Drive1.Drive的作⽤是:当Drive1的驱动器改变时,Dir1的⽬录列表随同驱动器相应变化。

参考答案:正确7、设计菜单中每⼀个菜单项分别是⼀个控件。

每⼀个控件都有⾃⼰的名字。

参考答案:正确8、通过改变属性窗⼝中的name属性,可以改变窗体上显⽰的标题。

9、⼆进制⽂件与随机⽂件的主要区别是:⼆进制⽂件与随机⽂件类似,必须限制固定长度,可⽤喜欢的⽅式来存取⽂件。

参考答案:错误10、for...next语句中的初值必须⼤于终值。

11、系统提供的诸如sqr( )等函数不属于过程。

参考答案:正确12、在vb中,可通过函数now返回计算机系统的⽇期和时间。

参考答案:正确13、vb允许设计和使⽤⽤户⾃⼰设计的控件。

参考答案:正确14、vb提供的单选按钮的value属性,true表⽰选中,false表⽰未选中。

参考答案:正确15、在表达式中,运算符两端的数据类型要求⼀致。

参考答案:错误16、在vb中,⽂件菜单的“删除⼯程”的作⽤是将当前vb⼯程在硬盘中删除。

参考答案:错误17、vb⽀持弹出菜单,所谓“弹出菜单”是指单击⿏标后打开的菜单。

18、事件过程与sub过程,它们相同点都是事件的驱动,⽽不同的只是事件过程由控件属性决定,⽽sub过程是由户⾃定义。

VB第四套

VB第四套

一、基础单项选择 (每小题1分,共20分)1、下列哪个符号不能作为VB中的变量名(D)。

(A)wash (B)CET4 (C)fh (D)a[3]2、函数Int( 5 * RND )+1的值是在哪个范围内的整数(C)。

(A) [0,5] (B) [0,6] (C) [1,5] (D) [1,6]3、语句Dim x As Single作用是:将x定义为(A)变量。

(A)单精度型(B)整型 (C) 布尔型(D)字符型4. Int(-6.24)的值是(C)。

(A) -6 (B) -6.14 (C) -7 (D) 6.245.设A=7, 则A MOD 3 的值是(B)。

(A) 7 (B) 1 (C) 3 (D) 56.Len(“Goodbaby”)的值是(C)。

(A) 6 (B) 7 (C)8 (D) 97. Left (“SWUSTNIC”,2)的值是(A)。

(A) SW (B) W (C) IC (D) US8、表达式2*3^2+2*6/3 的值是(B)。

(A) 60 (B) 22 (C) 45 (D) 589、语句Dim arr(-3 TO 4,2 TO 6)AS Integer定义的数组元素有(D)个。

(A)45 (B)35 (C)42 (D)4010、设有语句: a = InputBox("请输入数值:","输入示例", "100") 程序执行后,若从键盘上输入数值20并按回车键,则变量a的值是(A)。

(A) 字符串"20" (B) 字符串"120"(C) 默认值100 (D) 数值12011、要从for-next中退出循环使用的语句是(B)。

(A) exit (B) exit for (C) continue (D) stop loop12、设a=3,b=5,则以下表达式值为真的是(B)。

(A)a>=b And b>10 (B)(a>b) Or (b>0)(C)(a<0) Eqv( b>0) (D)(-3+5>a) And (b>0)13、设a=“Visual□Basic”,下面使b=“Basic”的语句是(D)。

VB习题4

VB习题4

1、下列关于VB编码规则的叙述中,错误的是( )。

(1分)BA之间用逗号隔开CD上注释,以提高可读性2、在设计阶段,双击窗体上任一空白处,打开的窗口是( )。

(1分)A BC D3、窗体文件的扩展名是( )。

(1分)A BC D4、VB是一种面向( )的程序设计设计语言。

(1分)A BC D5、下列控件中,不能改变大小的是( )。

(1分)A BC D6、若要取消窗体的最小化功能,可通过设置( )的属性值为False来实现。

(1分)A BC D7、下列( )是文本框所具有的属性。

(1分)A BC D8、以下关于命令按钮的控件属性的描述中,不正确的是( b )。

(1分)A BC D9、要使一个标签透明且不具有边框,则应( )。

(1分)A BorderStyle 属性设置为B属性设置为C BorderStyle 属性设置为D属性设置为10、为使计时器控件每隔1秒产生一个计时器事件(Timer),则应将其Interval属性值设置为( )。

(1分)A BC D11、为了清除图片框内绘制的图形,应采用的正确方法是( d )。

(1分)A BCDPicture1.Picture=LoadPicture("")12、在设计一个倒计时标牌时,必须要使用的控件是( c )。

(1分)A BC D13、下列运算中,优先级最低的是( c )。

(1分)A BC D14、设a=6,b=-3,则以下表达式值为True的是( d)。

(1分)A BC D15、表达式25.28 Mod 6.99的值是( )。

(1分)A BC D16、语句x=123456.789已经被执行,输出时要求加千位分隔符,小数点后取2位有效数字,格式正确的是( )。

(1分)A BC D17、变量未赋值时,String型变量的值为( )。

(1分)A BC D18、设a=2,b=3,c=4,d=5,下列表达式3>2*b OR a=c AND b<>c OR c>d的值是( )。

vb练习题(有答案)(打印)

vb练习题(有答案)(打印)

《大学Visaul Basic程序设计》复习题第一章Visual Basic程序设计概述第一题:是非题(共10分,每项1分)1. VB6.0只能运行在Windows 2000下,不能运行在Windows 98下。

13A.对B.错√2. 用户控件和系统控件都可以加载到工具箱上,并且永久保留。

4A.对B.错√第二题、单选题(共45分,每项1.5分)1. VB中的工具栏可以从______菜单上的“工具栏”命令中移进或移出。

15A.工具B.编辑C.视图√D.调试2. 在VB的集成环境中创建VB应用程序时,除了工具箱窗口、窗体设计窗口、属性窗口外,必不可少的窗口是______。

2A.窗体布局窗口B.立即窗口C.代码窗口√D.监视窗口第二章VB的编程机制第一题:是非题(共10分,每项1分)1. 在事件驱动的应用程序中,代码是按照预定的路径执行的。

15A.对B.错√2. 标签控件即可以用来显示用户不能编辑和修改的文本,也可以用来编辑和修改文本。

9A.对B.错√3. 每一个控件实质上都是一个微型程序。

2A.对√B.错4. 窗体上的控件同样可以借助于剪贴板进行剪切、复制和粘贴。

A.对√B.错第二题、单选题(共45分,每项1.5分)1. 文本框没有_____属性。

21A.EnabledB.VisibleC.BackColorD.Caption√2. 文本框(Text1)中有选定的文本,执行Text1.SelText=”Hello”的结果是___。

9A.“Hello”将替换掉原来选定的文本√B.“Hello”将插入到原来选定的文本之前C.Text1.SelLength为5D.文本框中只有“Hello”3. 要判断“命令按钮”是否被鼠标单击,应在“命令按钮”的______事件中判断。

3A.ChangB.KeyDownC.Click√D.KeyPress4. 如果文本框的Enabled属性设为False,则___。

6A.文本框的文本将变成灰色,并且此时用户不能将光标置于文本框上B.文本框的文本将变成灰色,用户仍然能将光标置于文本框上,但是不能改变文本框中的内容√C.文本框的文本将变成灰色,用户仍然能改变文本框中的内容D.文本框的文本正常显示,用户能将光标置于文本框上,但是不能改变文本框中的内容第三题、简单程序(共15分,每项1.5分)1. 以下程序的输出结果是______。

中原工学院VB题库(含参考答案)4-2

中原工学院VB题库(含参考答案)4-2

本卷共有4道大题:一、单项选择题(20道小题,共20分)1、假定焦点已经位于TextBox1中,则能够触发KeyPress事件的操作是()。

(1分)A、单击鼠标B、双击文本框C、鼠标滑过文本框D、按下键盘上的某个键2、在中每个对象都有三个基本要素,它们是 ( )。

(1分)A、对象的名称,值和所属类。

B、对象的属性,事件和方法。

C、对象的大小,存储方式和内容。

D、对象的访问方法、存储方式和名称。

3、表达式 Int(Rnd*55)+15 产生的随机数范围是( )。

(1分)A、[15,55]B、[15,69]C、(15,55)D、(15,69)4、以下表达式的结果( )不是字符串类型。

(1分)A、"45" + "123"B、"45" & "123"C、45 + "123"D、全部5、在窗体上有一文本框,名称为Textbox1,程序运行后,要求该文本框不能接收键盘输入,但能输出信息,以下设置正确的是( )。

(1分)A、TextBox1.MaxLength=0B、TextBox1.Enabled=FalseC、TextBox1.Visible=FalseD、TextBox1.Size.Width=06、设有 x,y 两个数值型变量,今欲将其以坐标的样式“(x,y)”显示在标签(Label1)上(注:x,y显示具体的数值),下面语句中正确的是( )。

(1分)A、Label1.text="(" & x & "," & y & ")"B、Label1.text="(x,y)"C、Label1.text=("x","y")D、Label1.text=(x,y)7、关于For...Next 循环,以下说法错误的是( )。

VB 第四章 数组习题

VB 第四章 数组习题

第一章数组一、选择题1.在窗体上画一个命令按钮,然后编写如下程序:Option Base 1Private Sub Command1_Click(Index As Integer)Dim Arr1(12) As Integer, Arr2(3) As IntegerDim Sum As IntegerSum = 2For i = 1 To 12Arr1(i) = iNext iFor i = 1 To 3Arr2(i) = Arr1(i * i)Next iFor i = 1 To 3Sum = Sum + Arr2(i)Next iPrint SumEnd Sub程序运行后,单击命令按钮,在窗体上的输出结果是A.16B.24 C.32 D.36 2.在窗体上画一个文本框,然后编写如下代码:Option Base 1Private Sub Form_Click()Dim arrDim Start As Integer, Finish As IntegerDim Sum As Integerarr = Array(12, 4, 8, 16)Start = LBound(arr)Finish = UBound(arr)Sum = 0For i = Start To FinishSum = Sum + arr(i)Next ic = Sum / FinishText1.Text = cEnd Sub程序运行后,单击窗体,则在文本框中显示的内容是A.40 B.10C.12 D.16 3.阅读程序:Option Base 1Private Sub Form_Click()Dim Arr(4, 4) As IntegerFor i = 1 To 4For j = 1 To 4Arr(i, j) = (i - 1) * 2 + jNext jNext iFor i = 3 To 4For j = 3 To 4Print Arr(j, i);Next jPrintNext iEnd Sub程序运行后,单击窗体,输出结果是A.5 7 B.6 8 C.7 9D.8 106 87 98 108 11 4.用下面的语句所定义的数组的元素个数是Dim A(-3 To 5) As IntegerA.6 B.7 C.8 D.9 5.用下面的语句所定义的数组的元素个数是Dim arr(3 To 5, -2 To 2)A.20 B.12 C.15D.246.在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:Private Sub Command1_Click()Dim Arr1(10), Arr2(10) As Integern = 3For i = 1 To 5Arr1(i) = iArr2(n) = 2 * n + iNext iPrint Arr2(n); Arr1(n)End Sub程序运行后,单击命令按钮,输出结果是A.11 3B.3 11 C.13 3 D.3 13 7.在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:Option Base 1Private Sub Command1_Click()Dim a(10), p(3) As Integerk = 5For i = 1 To 10a(i) = iNext iFor i = 1 To 3p(i) = a(i * i)Next iFor i = 1 To 3k = k + p(i) * 2Next iPrint kEnd Sub程序运行后,单击命令按钮,输出结果是A.35 B.28 C.33D.378.在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:Option Base 1Private Sub Command1_Click()Dim aa = Array(1, 2, 3, 4)j = 1For i = 4 To 1 Step -1s = s + a(i) * jj = j * 10Next iPrint sEnd Sub程序运行后,单击命令按钮,输出结果是A.4321 B.12 C.34 D.12349.在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:Option Base 1Private Sub Command1_Click()Dim Arr(3) As IntegerFor i = 1 To 3For j = 1 To 3Arr(j) = Arr(i) + 1Next jNext iPrint Arr(3)End Sub程序运行后,单击命令按钮,输出结果是A.7 B.6 C.5D.4 10.在窗体上画一个名称为List1的列表框,一个名称为Label1的标签框。

vb练习题及答案

vb练习题及答案

vb练习题及答案VB练习题及答案一、选择题1. 在VB中,以下哪个是正确的数据类型?A. IntegerB. IntC. Both A and BD. None of the above答案:C2. VB中,哪个关键字用于声明变量?A. DimB. DeclareC. DefineD. Set答案:A3. 在VB中,以下哪个是正确的循环结构?A. ForB. WhileC. RepeatD. All of the above答案:D4. VB中,以下哪个是正确的条件语句?A. IfB. SwitchC. CaseD. A and B only答案:A5. 在VB中,以下哪个是正确的数组声明方式?A. Dim myArray(5) As IntegerB. Dim myArray As Integer(5)C. Both A and BD. None of the above答案:A二、填空题1. 在VB中,使用________关键字可以定义一个类。

答案:Class2. VB中,使用________方法可以为控件添加事件处理程序。

答案:AddHandler3. 在VB中,________方法用于结束程序的执行。

答案:End4. VB中,________属性用于获取或设置一个控件的文本。

答案:Text5. 在VB中,________方法用于打开一个文件。

答案:Open三、简答题1. 请简述VB中的事件和事件处理程序的概念。

答案:在VB中,事件是用户或程序触发的特定动作,如按钮点击或键盘敲击。

事件处理程序是一个过程,当特定的事件发生时,会被自动调用以响应该事件。

2. 描述VB中如何使用For循环。

答案:在VB中,For循环用于重复执行一段代码直到满足特定条件。

基本语法是:```For counter = start To end [Step increment]' 循环体Next [counter]```3. 解释VB中什么是继承,并给出一个简单的示例。

VB程序设计教程第四课后答案

VB程序设计教程第四课后答案

vb课后习题答案第一章习题参考答案一、填空题1、对象事件驱动2、编译运行模式解释运行模式二、简答题1、简述VB的特点。

答:①可视化的程序设计方法②面向对象的程序设计思想③事件驱动的编程机制④结构化的程序设计语言⑤高度的可扩充性⑥强大的数据库访问能力⑦支持动态数据交换⑧支持对象链接与嵌入2、简述VB的安装过程。

答:①向光驱中放入VB安装光盘;②计算机将运行自动安装程序,若没有,执行VB目录下的Setup.exe;③根据提示逐一回答问题,并点击“下一步”;④点击“完成”;2、如何启动VB。

答:三种方法:①单击“开始”按钮,选择“程序”菜单下的“Microsoft Visual Basic 6.0 中文版”菜单项并单击;②双击桌面上的VB6.0快捷图标;③在“开始”菜单的运行对话框中输入命令来启动VB;第二章习题参考答案一、选择题:1-10、DCACD BCBBC11-20、BADCA BBAAB21-29、AACBB CDDC二、填空题1.窗体、控件2.属性值3.属性窗口设置、代码窗口设置4.事件过程5.对象名、下划线、事件名6.Form_Click第三章习题参考答案一、选择题1、B2、C3、A4、B5、A6、C7、C二、填空题1、11字符型、字节型、整型、长整型、单精度型、双精度型、货币型、逻辑型、日期型、对象型、变体型。

String、Byte、Integer、Long、Single、Double、Currency、Boolean、Date、Object、Variant2、双引号(英文)、#3、ASCII、1、24、public、通用、Dim、Static、Private、Static5、&、+、+6、Now()、Time、日期型三、解答题1、(3)2、(1 )3、(1)常量(关键字)(2)字符型常量(3)逻辑型常量(4)变量(5)字符串常量(6)变量(7)字符串常量(8)变量(9)日期型常量(题目应是#11/16/1999#)(10)数值型常量(单精度)4、315、(1)(1+y/x)/(1-y/x) (2)x^3+3*x*y/(2-y)(3)sqr(abs(a*b-c^3)) (4)sqr(s*(s-a)*(s-b)*(s-c))6、7、(1)13 (2)17(3)#1999-11-12# (4)zxy123ABC8、(1)19 (2)8.16666666666667(3)5.25 (4)29、(1)-4 (2)2 . 82842712474619 (3)-3 (4)49 (5)”hello” (6)He7)16 (8)“-459.65” (9)510、(4)11、(2)12、(4)第四章习题参考答案一、选择题:1—7: DAABBCD二、填空题1.500.00%2.将字号扩大为原来的二倍3.B三、编程题(略)1.文本框、标签和命令按钮的名称分别为text1、label1、command1Private Sub Command1_Click()Label1.caption=text1.textCommand1.caption=text1.textEnd Sub2.单价、数量、折扣和应付款对应的文本框的名称分别为:text1、text2、text3和text4,计算和清除命令按钮的名称分别为:command1和command2。

VB第四次

VB第四次

3、VB应用:(30分)•阅读程序写出运行结果4-5题(其中字符处理一题,过程调用至少两题,数组一题)补充代码题4-5题(其中数论2题左右,文件操作一题,字符处理一题)VB应用中要熟悉:公共函数(1)算术函数(Abs, Sin, Cos, Atn, Exp, Hex, Log, Rnd, Sgn, Sqr, Tan)(2)字符串函数(Asc, Chr, Lcase, Ucse, Left, Len, Trim, Mid, Right, Space, String, InStr)(3)日期及时间函数(Time, Date, Now, DateValue,Day, Month, Year, WeekDay)(4)转换函数(Str, Val, Chr, Asc, Cint, Fix, Int, CBool, Cbyte, CDate, Cdbl,Cstr)(5)用户交互函数:InputBox函数与MsgBox函数(6)数组函数(Array,Ubound,Lbound)提示语句:•InputBox函数InputBox[$](提示[,标题][,缺省][,x坐标][,y坐标] •MsgBox函数和MsgBox过程MsgBox函数形式如下:变量[%]= MsgBox(提示[,按钮][,标题])MsgBox语句形式如下:MsgBox 提示[,按钮][,标题]InputBox函数选项•“$”:有此选项,返回的数据类型是字符串型;省略此项,返回的数据类型是变体型。

•“提示”:字符串表达式,不能省略该项,在对话框中作为信息显示。

•“标题”:字符串表达式,在对话框标题显示;若省略,则把应用程序名放入标题栏中。

•“缺省”:字符串表达式,当在输入对话框中无输入时,则该缺省值作为输入的内容。

MsgBox函数和MsgBox过程选项•“提示”和“标题”:意义与InputBox函数中对应的参数相同。

“按钮”:整型表达式,决定信息框按钮的数目、类型及出现在信息框上的图标类型。

2012级计算机专业VB语言程序设计4

2012级计算机专业VB语言程序设计4

2012级计算机专业VB语言程序设计4.10月考试卷(满分100分)姓名:分数:一、选择题:(每小题2分,共计40分)1.Visual Basic中窗体设计器的主要功能是( )。

A.显示文字B.修改对象属性C.建立用户界面D.编写程序代码2. 要使Print方法在Form_Load事件中起作用,要对窗体的属性进行设置。

A.BackColorB.ForeColorC.AutoRedrawD. Caption3.以上叙述中正确的是A.窗体的Name属性指定窗体的名称,用来标识一个窗体B.窗体的Name属性值是显示窗体标题栏中的文本C.可以在运行期间改变窗体的Name属性的值D.窗体的Name属性值可以为空4. 在程序中,用以区分每一个对象的标志是( )。

A.CaptionB.HeightD.Enabled5. 以上叙述中错误的是A.打开一个工程文件时,系统自动装入与该工程有关的窗体文件B.保存Viual Basic应用程序时,应分别保存窗体文件及工程文件C.Viual Basic应用程序只能以解释方式执行D.窗体文件包含该窗体及其控件的属性6.表达式2*3^2+2*8/4+3^2的值为( )。

A.64B.31C.49D.227.在Visual Basic环境中开发的每个应用程序都可以称为( )A.工程 B.对象 C.属性 D.事件8. 要使Form1窗体的标题栏显示“6欢迎使用VB”,以下( )语句是正确的。

A.Form1.Caption=“6欢迎使用VB”B.Form1.Caption=' 6欢迎使用VB 'C.Form1.Caption=6欢迎使用VBD.Form1.Caption=" 6欢迎使用VB "9.在VB集成环境创建VB应用程序时,除了工具箱窗口、窗体中的窗口、属性窗口外,必不可少的窗口是()。

A.窗体布局窗口B.立即窗口C.代码窗口D.监视窗口10..在窗体上画一个文本框(text1)和标签(label1),程序运行后,如果在文本框中输入指定的信息,则立即在标签中显示相同的内容,以下可以实现上述操作的事件过程是A.Private Sub Text1_Click()Label1.Caption=Text1.TextEnd SubB.Private Sub Text1_Change ()Label1.Caption=Text1.TextEnd SubC.Private Sub Label1_ Change ()Label1.Caption=Text1.TextEnd SubD.Private Sub Label1_Click()Label1.Caption=Text1.TextEnd Sub11.下列可以作为Visual Basic的变量名的是()。

!VB1-4章习题参考答案.docx

!VB1-4章习题参考答案.docx

《Visual Basic程序设计基础》教材习题参考答亲第1章VisuaI Basic 6.0程序设计概述判断题1.J2.J3. X4. V5. X6.V7.X8. J9・J10. X11.J 12.J13. X14.15. X16.J17.V18. J19.V20. V选择题l.C 2. B 3.D 4.C 5.B 6. A7.D 8. A 9. B 10. A 11. C 12. D三、填空题1.对象、事水牛2.属性、方法、事件3.控件、屏幕(Screen)4.对象5. Left、Top6.属性、v对象名>.<属性名>=v表达式〉7.网格8. Forml9.Load或Initialize或Resize或Activate (自动执行的先后顺序也按此排列)10.Activate、Deactivate四、程序设计题程序1.界面设计参看图10-1> 10・2以及表10-1 o表10-1实例2各控件的主要属性设置控件属性(属性值)属性(属性值)标签控件1Name(Labell)Caption("我的第一个VB程序”)标签控件2Name(Label2)Caption(”请输入你的姓名”)FontUnderLine(True)Fontltalic(True)命令按钮1Namc(Command 1)CaptionC'确定(&O)”)命令按钮2Name(Command2)Caption(”结束(&X)”)过程设计如下:Private sub Form_Click()Command2.Enabled = FalseEen SubPrivate Sub Commandl_Click()Label2.Visible = FalseLmb ell. Caption = Text 1. Text + n :欢迎使用” + Lab ell. Caption Text1.Visible = FalseCommandl.Enabled = False: Command2.Enabled = TrueEnd SubPrivate Sub Command2_Click()End End Sub程序3.界面设计略,过程设计如下(窗体Height 值的计量包括标题、边框,而ScaleHeight 值仅与窗体有效绘图区域的高度有关):Private Sub Form_Load()Textl.Text = "Visual Basic 程序设计” End SubPrivate Sub Form_Resize() Textl.Top = 0: Textl-Left = 0Textl.Width = Forml. ScaleWidth/2 '用 Forml .ScaleWidth 效果优于用Forml ・ Width Textl ・ Height = Forml ・ ScaleHeight/2 1 用 Forml. ScaleHeight 优于用 Forml ・ Height Commandl•Top = Forml•ScaleHeight 一 Commandl•HeightCommandl.Left = Forml.Scalewidth 一 Commandl.Width End Sub程序2.界面设计略,过程设计如卞: PrivateSub Commandl_Click()Forml.FontSize = Forml.FontSize Forml .Cis: Print ”欢迎使用 VB” End SubPrivate Sub Command2_Click() Forml.FontSize = Forml.FontSize Forml .Cis : Print ”欢迎使用 VB” End SubPrivate Sub Command3_Click() Forml.FontBold = TrueForml .Cis: Print ”欢迎使用 VB“ End SubPrivate Sub Command4_Click() Forml.FontBold = FalseForml .Cis: Print ”欢迎彳吏用 VB” End Sub 运行时,不得连续、 适时错误。

VB第1-4章练习题及答案

VB第1-4章练习题及答案
3. Visual Basic的窗体设计器主要是用来___________。
(A)建立用户界面(B)添加图形、图像、数据等控件
(C)编写程序源代码(D)设计窗体的布局
参考答案为A。
4. Visual Basic是一种结构化高级程序设计语言,它采用的是_________驱动方式。
(A)键盘(B)鼠标(C)事件(D)函数
参考答案为B。
7.表达式3^2*2+3 MOD 10\4的值是_________。
(A)18(B)1(C)19(D)0
参考答案为C。
8.下面的变量名合法的是_________。
(A)k_name(B)k ame(C)name(D)k-name
参考答案为A。
9.设有如下变量声明Dim time1 As Date,为变量time1正确赋值的表达式是_________。
8.窗体布局窗口:窗体布局窗口用于观察应用程序中各窗体在屏幕上的位置。可以在窗体布局窗口用鼠标拖动窗体小图像的方法来改变窗体布局。
3.什么是对象的属性、事件和方法。
参考答案:
属性是一个对象的数据,用来表示对象的状态。属性具有属性值,改变对象的属性值就可以改变对象的状态。对象常见的属性有标题(Caption)、名称(Name)、颜色(Color)、字体大小(Fontsize)、是否可见(Visible)等。
参考答案为C。
5. Visual Basic程序设计语言属于_________。
(A)面向过程的语言(B)机器语言
(C)面向对象的语言(D)汇编语言
参考答案为C。
6. Visual Basic一共有设计、运行和中断三种模式,要使用调试工具应该_________。
(A)进入设计模式(B)进入运行模式

(完整版)VB项目4数组习题答案

(完整版)VB项目4数组习题答案

一、单选题1.在中,一组具有相同名字、不同下标的变量称为____________。

A。

数组 B.变量 C。

同类数据 D。

同类变量2。

一维数组的大小为______________。

A。

上界+下界+1 B。

上界+下界-1 C.上界-下界+1 D.上界—下界—13.数组的存放是按____________存放的。

A.数据大小 B。

数据类型 C。

列 D.行4。

数组具有相同的_____________。

A。

下标 B.类型 C。

数值 D.存放地址5。

重定义数组大小的语句是______________。

A.Dim语句 B。

ReDim语句 C.Static 语句 D.Public 语句6。

使用Dim A(100) As Integer 语句声明了数组A,其下标的取值范围为____________。

A。

0~100 B.1~100 C.0~99 D.1~997.若使用Dim A(100) As Integer 语句声明了数组A,下列引用错误的是___________。

A.A(0)=2B.A(1)= -28C.A(56)= A(-56) D。

A(100)=A(0)+A(55)8。

如果要对已经声明的数组重新定义大小,并保留原有数据,可使用语句___________。

A。

Dim B.ReDim C。

Dim Preserve D.ReDim Preserve9。

对于Integer 类型的静态数组,如果没有赋值,则所有元素的值为____________。

A。

空 B.0 C。

1 D。

最大数10.执行重定义数组大小语句ReDim A(UBound(B))后,A数组的上界为______________。

A。

B数组的上界 B。

B数组的上界+1 C.B数组的上界— 1 D。

不确定11.下列数组声明语句中正确的是______________。

A.Dim A(9) As Single ={1,2,3,4,5,6,7,8,9,10}B。

Dim A() As Single ={1,2,3,4,5,6,7,8,9,10}C.Dim A() As Single ={1,"abc","ccc”,4,5,6,7,8,9,10}D。

VB第四章练习(二)

VB第四章练习(二)

VB第四章练习(二)VB第四章练习(二)(有正确答案的)一、填空题1设 a=2,b=3,表达式 a>b 的值是_______。

FALSE|0|零|假|假值|零值 2.在VB中声明静态变量的关键字是_______。

static 3.在VB中声明符号常量的关键字是_______。

const 4.表达式10 MOD 16\\4的值是_______。

25.设A=5,B=6,C=7,D=8,表达式3>2*B OR A=C AND B<>C OR C>D的值是_______。

False|0|零|假|假值|零值6.设a=6,b=3,c=5,则表达式Not a>c And c=b Or b<>a+c 的值为_______。

True|真|真值|-18.设a=1,b=2,c=3,则VB6.0表达式:a9.x是小于120的非负数,描述该条件的布尔(逻辑)表达式是_。

x<100 and x>=0|x>=0 and x<100|(x<100)and (x>=0)|(x<100) and x>=0|x<100 and (x>=0)|(x>=0) and(x<100)|(x>=0) and x<100| x>=0 and (x<100)10.在VB中,用 Dim X As Integer 语句定义的变量X,系统默认其值为_______。

0|零 11.表示x是5的倍数VB表达式为_______。

X MOD 5=0|x/5=int(x/5)|int(x/5)=x/5 12.已知 a=3.5,b=5.0,c=2.5,d=True 则表达式:a>=0 AND a+c>b+3 OR NOT d 的值是____。

False|0|零|假|假值|零值13.用于声明全局变量的关键字是_______。

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

==================================================题号:19606'-------------------------------------------------'【程序设计】'-------------------------------------------------'题目:在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个命令按钮和一个文本框。

'程序运行后,单击命令按钮,即可计算出0~1000范围内不能被7整除的整数的个数,并在文本框中显示出来。

'在窗体的代码窗口中,已给出了部分程序,其中计算不能被7整除的整数的个数的操作在通用过程Fun中实现,请编写该过程的代码。

'要求:考生不得修改已经存在的程序,******* Begin ************ 和 ******* End ************** 之间为代码编写区域'-------------------------------------------------Sub SaveData()Open App.Path & "\" & "outtxt.txt" For Output As #1Print #1, Text1.TextClose #1End SubFunction Fun()'******* Begin ************'******* End **************End FunctionPrivate Sub Command1_Click()d = Fun()Text1.Text = dSaveDataEnd SubFor i = 0 To 1000If i Mod 7 <> 0 ThenY = Y + 1End IfNext iFun = Y程序填空================================================== 题号:21045'-------------------------------------------------------'【程序填空】'-------------------------------------------------------'功能:窗体中有Text1-Text7共7个文本框,单击按钮Command1在' Text7中显示前6个文本框中的数值的最大数'-------------------------------------------------------Private Sub Command1_Click()Dim a, b, c, d, e, f, m As Integera = Val(Text1.Text):b = Val(Text2.Text):c = Val(Text3.Text)d = Val(Text4.Text):e = Val(Text5.Text):f = Val(Text6.Text) Call max(a, b, c, m)Call max(m, d, e, m)Call max(m, f, f, m)'**********SPACE**********Text7.Text = 【?】End Sub'**********SPACE**********Sub max(x, y, z 【?】)If x > y Thenm = xElsem = yEnd If'**********SPACE**********If m < 【?】 Thenm = zEnd IfEnd Sub答案:位置 1:m 【或】 Cstr(m) 【或】 Str(m)位置 2:,m位置 3:z程序改错================================================== 题号:19425'------------------------------------------------'【程序改错】'------------------------------------------------'题目:求s=2!+4!+6!+8!,阶乘的计算用Function过程' fact实现'------------------------------------------------Option ExplicitPrivate Sub Form_Click()Dim i As Integer, s As Long'**********ERROR**********For i = 2 To 8s = s + fact(i)Next iPrint sEnd Sub'**********ERROR**********Public Function fact()Dim t As LongDim i As Integert = 1For i = 1 To nt = t * iNext i'**********ERROR**********fact = iEnd Function答案:位置 1:For i=2 To 8 Step 2位置 2:Public Function fact(ByVal n As Integer) 【或】 Public Function fact(n As Integer) 【或】 Public Function fact(n%) 【或】 Public Function fact(n) 【或】 Public Function fact(ByVal n%) 【或】Public Function fact(ByVal n) 【或】 Public Function fact(ByVal n As Integer) as integer 【或】Public Function fact(n As Integer) as long 【或】 Public Function fact(n%) as intetger 【或】Public Function fact(n%) as long 【或】 Public Function fact(n) as integer 【或】 Public Function fact(n) as long 【或】 Public Function fact(ByVal n%) as integer 【或】 Public Function fact(ByVal n%) as long 【或】 Public Function fact(ByVal n) as integer 【或】 Public Function fact(ByVal n) as long 【或】 Public Function fact(n As Integer) as integer位置 3:fact = t窗体设计==================================================题号:20006题目:用复选框实现在文本框中显示是否"加下划线"或"斜体显示"。

在窗体上放置一个文本框,两个复选框,程序运行界面如图所示各控件属性设置如下表:对象名称 Name属性 Caption属性 text属性窗体默认默认文本框 Display 人民警察为人民复选框 Check1 斜体显示Check2 加下划线------------------------------------------------题号:19460--------------------------------------------------------------------- 【窗体设计】--------------------------------------------------------------------- 题目:请按照题目要求设计指定的窗体。

(本题有6个项目要完成)建立如图所示界面:注意:保存时不得修改窗体和工程文件的名称及路径,否则后果自负。

---------------------------------------------------------------------1、窗体设置1)名称为“模板”2)标题为“南京工程学院”2、在窗体上方添加一个标签控件1)对齐方式为右对齐2)设置背景透明,边框风格为13)内容为“透明右对齐”3、在前一个标签下方添加另一个标签控件1)能自动调整大小2)背景色为白色,值为H00FFFFFF3)标题为“0”4)字体大小为364、在窗体上添加一个时钟控件1)时间间隔为1秒2)在Timer事件过程中添加代码,使第二个标签的标题的值加一。

5、在窗体下方添加一个列表框控件1)名称为“列表”2)设置为不可用3)排序属性设为真4)Top为3360,Left为22806、在窗体右下角添加一个命令按钮1)名称为“计时切换”2)标题为“计时”3)在单击事件过程中添加代码,使时钟控件的Enabled属性值取反。

----------此为题目要求的最后一行,以下空白---------------------------------------。

相关文档
最新文档