VB作业答案
- 格式:doc
- 大小:42.50 KB
- 文档页数:5
VB课后练习答案P12第一章课后练习答案:一、选择题二、填空题第二章(P39)选择题答案:填空题答案:1.Cmdl, Click2.Text 1.Text二"Hello"P64第三章课后练习答案一、选择题二、填空题1.(Y Mod 4=0 And Y Mod 10000) Or Y Mod 400=0 2.a<>0 And b*2-4*a*c>=0 3.X Mod 5=0 And X Mod 2=0 或 Tnt(x/5)=X/5 And Int(X/2)=X/2 4. 注意:返回的均是字符型。
第四章课后答案:P79一、选择题答案为:$$41.50010二、填空题三、程序设计题(提示)1、鸡的头数为x,兔的头数为y,则可列方程式:\x-\- y = h (兀 * 2 + y * 4 =于求得x, y 的值再在窗体上输出结果。
2、 利用Format 格式函数,再通过窗体的Print 将格式化后的信息输出到窗体上。
3、 厶员I 的周长=2加" $岡的面积=加25、通过Inputbox 函数或用文本框输入三边和圆的半径a,b,c, r,利用公式:. a + b + cn 二 ---------2 S 三角形面积=Jh (h - - b )(h - c )P97第五章课后练习答案:第9题| D一、选择题答案D 改为:30二、填空题第]题Y Mod 4二0 And Y Mod 100二0 Or Y Mod 400二0 第2题笫3题笫4题Private Sub Command l_Click()X=Val(Textl.Text)Select Case XCase Is>200. Isv-10()Print “xv 100 Or x>200"Case ls<=0Y=l()()-XCase Isv二100Y=100+XCase Is<=200Y=400End SelectText2.Text=yEnd Sub三、程序设计题(提示)1、判断条件:假设一个整数为xX Mod 3=0 Or x Mod 5=0 或x/3=x\3 Or x/5=x\52、选项按钮的知识点在P182,利用该控件的Wlue属性判断是否选中该项。
章节作业--第1次作业:10题1、, Visual Basic的三种工作模式是。
A) 编辑 B) 编译 C) 设计、运行、中断 D) 连接正确答案是: C 你选择的答案是:C √2、, 在Visual Basic中,以下什么方法可以改变窗体的大小。
A) 设计时在窗体布局窗口中进行调整。
B) 运行时设置窗体的Left属性。
C) 运行时调用窗体的Move方法。
D) 设计时在窗体布局窗口中点鼠标右键,在快捷菜单中进行设置。
正确答案是: C 你选择的答案是:C √3、, 如果要使窗体的最小化按钮变成灰色(不起作用),需设置窗体的()属性。
A) Caption B) Icon C) MaxButton D) MinButton正确答案是: D 你选择的答案是:D √4、, 要使窗体上的所有控件具有相同的字体格式,应首先在属性窗口中对()的Font属性进行设置,然后再添加各控件。
A) 所有控件 B) 窗体 C) 标签控件 D) Fontname正确答案是: B 你选择的答案是:B √5、, 在属性窗口设置命令按钮的DownPicture属性,指定按下时显示的图形文件,但在运行时按下命令按钮却没有效果,原因是()。
A) 命令按钮的Default属性为True B) 命令按钮的Style属性为2-PictureC) 命令按钮的Style属性为0-Standard D) 命令按钮的Style属性为1-Graphics正确答案是: C 你选择的答案是:C √6、, 要在窗体上显示图片,需设置窗体的()属性。
A) Caption B) IconC) Picture D) ControlBo正确答案是: C 你选择的答案是:C √7、, “重复”命令是对()命令的反操作。
A) 撤消 B) 查找C) 复制 D) 剪切正确答案是: A 你选择的答案是:A √8、, 运行时,单击窗体(Form1)将窗体的前景色设置为红色的事件过程是()。
1. 选择题(1) 假定窗体的名称(Name属性)为Form1,则把窗体的标题设置为“VB Test”的语句为(B)。
A. Form1="VB Test"B. Caption="VB Test"C. Form1.Text="VB Test"D. ="VB Test"(2) 下列不能打开代码窗口的操作是(D)。
A.双击窗体上的某个控件B.双击窗体C.按F7键D.单击窗体或控件(3) 为了保存一个Visual Basic应用程序,应当(D)。
A.只保存窗体文件(.frm)B.分别保存工程文件和标准模块文件(.bas)C.只保存工程文件(.vbp)D.分别保存工程文件、窗体文件和标准模块文件(4) 为了装入一个Visual Basic应用程序,应当(C)。
A.只装入窗体文件(.frm)B.分别装入工程文件和标准模块文件(.bas)C.只装入工程文件(.vbp).D分别装入工程文件、窗体文件和标准模块文件(5) 不为了使窗体的大小可以改变,必须把它的BorderStyle属性设置为(A)。
A.1 B.2 C.3 D.42. 填空题(1) 在用Visual Basic开发应用程序时,通常首先需要新建工程、其次还要经过、、、和5步。
(2) 控件和窗体的Name属性只能通过属性窗口设置,不能在运行期间设置。
(3) 代码窗口分为左右两栏,左边一栏称为对象,右边一栏称为事件。
(4) 为了在输入程序时能自动进行语法检查,必须执行菜单中的命令,打开对话框,然后选择“编辑器”选项卡中的选项。
(5) 在保存VB应用程序中,窗体文件和工程文件的扩展名分别为 .frm 和.vbp 。
(6) 为了把一个Visual Basic应用程序装入内存,只要装入工程文件即可。
(7) Visual Basic应用程序通常由3类模块组成,即、和。
(8) 在窗体上画两个文本框和一个命令按钮,然后在命令按钮的代码窗口中编写如下事件过程:Private Sub Command1_Click( )Text1.Text=“VB Programming”Text2.Text=Text1.TextText1.Text=“ABCD”End Sub程序运行后,单击命令按钮,两个文本框中显示的内容分别为ABCD 和VB Programming 。
vb测试题及答案一、单项选择题(每题2分,共10分)1. 在VB中,以下哪个选项是正确的数据类型?A. IntegerB. DoubleC. StringD. All of the above答案:D2. 下列哪个函数用于计算两个数的和?A. SumB. AvgC. CountD. Max答案:A3. 在VB中,以下哪个关键字用于声明一个变量?A. DimB. ConstC. FunctionD. Sub答案:A4. 在VB中,以下哪个选项是正确的循环结构?A. ForB. WhileC. DoD. All of the above答案:D5. 在VB中,以下哪个选项是正确的条件语句?A. IfB. SelectC. CaseD. All of the above答案:D二、填空题(每题2分,共10分)1. 在VB中,声明一个整型变量并赋值为10,可以使用语句:Dim myVar As Integer; myVar = _______。
答案:102. VB中,用于输出信息到立即窗口的函数是 _______。
答案:Debug.Print3. 在VB中,要创建一个名为“myForm”的新窗体,可以使用语句:Form1. _______ "myForm"。
答案:Load4. VB中,要结束当前程序的执行,可以使用语句:_______。
答案:End5. 在VB中,要声明一个数组,可以使用语句:Dim myArray(10) As _______。
答案:Integer三、简答题(每题5分,共20分)1. 请简述VB中的事件驱动编程是什么?答案:事件驱动编程是一种编程范式,程序的执行流程由事件(如用户操作、系统消息等)触发,而不是由程序代码顺序执行。
2. 描述VB中如何使用If...Then...Else语句进行条件判断。
答案:在VB中,可以使用If...Then...Else语句进行条件判断,如果条件为真,则执行Then后面的代码块,如果条件为假,则执行Else 后面的代码块。
一、单选题1. 一个完整的计算机系统应包括( B )。
(A)主机、键盘、显示器(B) 硬件系统和软件系统(C) 主机和其他外部设备 (D) 系统软件和应用软件2.我们通常说的“U盘”属于计算机部件中的( C )。
(A) 输出设备 (B) 输入设备(C) 存储设备 (D) 打印设备3.在下列存储器中,存储速度最快的是( D )。
(A)软盘 (B)硬盘 (C)光盘(D)内存4. 计算机中采用二进制,是因为( D )。
(A)可降低硬件成本(B)两个状态的系统具有稳定性(C)二进制的运算法则简单(D)上述三个原因5. 是Internet中的( B )。
(A) 硬件编号(B) 域名 (C) 密码 (D) 软件编号6. 下列设备中,(D )不能作为计算机的输出设备(A)打印机(B)显示器(C)绘图仪(D)键盘[标准的输入设备]7. 计算机的主机由(B )部件组成[主机箱内硬件的总称](A)CPU、外存储器、外部设备(B)主机板,CPU和内存储器(C)CPU和存储器系统(D)主机箱、键盘、显示器8. 在Word中将文档中一部分文本内容复制到别处,首先要进行的操作是( C )(A)粘贴(B)复制(C)选择(D)剪切9. Windows系统中,回收站的功能是(B )(A)浏览上网的计算机(B)存放删除文件(C)设置计算机参数(D)收发信件10. 关于电子邮件的叙述正确的是(C )(A)电子邮件只能传输文本(B)电子邮件只能传输文本和图片(C)电子邮件可以传输文本、图片、视像、程序等(D)电子邮件不能传输图片11. 下列关于电子邮件的说法,正确的是(C )(A)收件人必须有E_mail账号,发件人可以没有E_mail账号(B)发件人必须有E_mail账号,收件人可以没有E_mail账号(C)发件人和收件人均必须有E_mail账号(D)发件人必须知道收件人的邮政编码12.下列有关Word的叙述,正确的是(B )(A)Word是一个应用软件,它只能对文字进行编辑处理(B)Word是在Windows环境下运行的应用软件(C)文档的缺省扩展名是.wrd(D)在Word中,一次只能打开一个文档13. 计算机当前的应用领域广泛,但据统计其应用最广泛的领域是(A )(A)数据处理(B)科学计算(C)辅助设计(D)过程控制14. 在计算机的内部所处理的任何信息均是采用(B )。
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中什么是继承,并给出一个简单的示例。
一、单选共300题(共计300分)滚动条的( )属性用于指定用户单击滚动条的滚动箭头时,Value属性值的改变量. A:ValueB:LargeChangeC:ChangeD:SmallChange答案:D运行时,当用户向文本框输入新的内容,或在程序代码中对文本框的TEXT属性进行赋值从而改变了文本框的TEXT属性值时,将触发文本框的()事件.A:CLICKB:DBLCLICKC:GOTFOCUSD:CHANGE答案:D要获得用户在组合框输入的内容,应利用的组合框的属性是( ).A:ListB:ListIndexC:SelectedD:Text答案:D输入对话框InputBox的返回值的类型是 .A:长整数B:字符串C:浮点数D:整数案:B要使得标签能自动扩充以满足字体大小则可对其()属性进行设置. A:alignmentB:usemnemonicC:autosizeD:tag答案:C假设变量BOOLVAR是一个布尔型变量,则下面正确的赋值语句是(). A:BOOLVAR='TRUE'B:BOOLVAR=.TRUE.C:BOOLVAR=#TRUE#D:BOOLVAR=3<4答案:D运算符"\"两边的操作数若类型不同,则先再运算.A:四舍五入为Byte类型B:取整为Byte类型C:四舍五入为整型D:取整为Integer类型答案:CVisual Basic程序设计时常用的Print、CLS属于( )A:属性B:对象C:方法D:事件答案:C当文本框的属性设置为True时,在运行时文本框不能编辑. A:VisibleB:EnabledC:LockedD:MultiLine答案:C要使标签所在处透明显示背景,应把其Backstyle属性设置为(). A:0B:1C:2D:3答案:AVisual Basic中,实现参数的传值方式的关键字是A:DimB:ByRefC:ReDim语句Print "5*5" 的显示结果是 .A:25B:"5*5"C:出现错误提示D:5*5答案:D若要求从文本框中输入密码时在文本框中只显示*号,则应当在此文本框的属性窗口中设置( ) A:Text属性值为*B:Caption属性值为*C:password属性值为空D:Passwordchar属性值为*答案:D在下列关于通用对话框的叙述中,错误的是( ).A:当Action属性值为3时,显示字体对话框B:CommonDialogl.ShowFont显示字体对话框C:在"打开"或"另存为"对话框中,FileName属性返回所选的文件名及其路径D:在"打开"或"另存为"对话框中,用户选择的文件名可以经FileTitle属性返回答案:AList1.Clear中的Clear是( ).A:属性D:对象答案:C以下不具有Picture属性对象是().A:窗体B:图片框C:图像框D:文本框答案:D设有如下数组定义语句: Dim s(3) as integer 则下列给数组元素赋值的错误语句是().A:S(2)=5*5-3*3B:s(3)=100C:S(3)=val(inputbox( "输入整数"))D:s(3)=array(0,1,2,3)答案:D简单组合框的style值为().A:0B:1C:2D:3答案:B以下()程序段可以实施X、Y变量值的变换.A:Y=X:X=YB:Z=X:Y=Z:X=YC:Z=X:X=Y:Y=ZD:Z=X:W=Y:Y=Z:X=Y答案:C表达式(7\3+1)*(18\5-1)的值是().A:8.76B:7.8C:6D:6.67答案:C下列对象中没有焦点属性的是().A:命令按钮控件B:窗口控件C:文本框控件D:单选框控件答案:B下列关于Select Case的叙述中,错误的是 .A:Case "abc","ABC" 表示判断Is是否和"abc"、"ABC"两个字符串中的一个相同B:Case "X" 表示判断Is是否为大写字母XC:Case -7,0,100 表示判断Is是否等于字符串"-7,0,100"D:Case 10 To 100 表示判断Is是否介于10与100之间答案:C设a=6,则执行x=IIf(a>5,-1,0)后,x的值为().A:5B:6C:0D:-1答案:D有一如下过程:Sub fact(n As Integer, result As Long)result = 1For i = 1 To nresult = result * iNext iEnd Sub在窗体上画一个名称为Command1的命令按钮,并编写如下事件过程: Private Sub Command1_Click()Dim res As Longfact 5, resPrint resEnd Sub程序运行后,单击命令按钮,则输出的结果是A:120B:15C:121D:100答案:AVisualBasic的编程机制是().A:可视化B:面向对象C:面向图形D:事件驱动答案:D在窗体上添加一个命令按钮,并写如下代码Private Sub Command1_Click()stra = "AbcD":strb = "hIJK"strc = LCase(stra)strd = UCase(strb)Print strc; strdEnd Sub运行后,单击命令按钮,显示的结果是 .A:abcdHIJKB:aBCdHijKC:ABCDHIJKD:AbcDhIJK答案:A声明符号常量应该用关键字().A:StaticB:ConstC:PrivateD:V26/ariant答案:B在VB中过()属性来设置字体颜色.A:FontColorB:ForeColorC:BackColorD:ShowColor答案:B要清除窗体A上已经在图片框P1中打印的字符串而不清除图片框中的图像,应使用语句( ). A:P1.Print""B:P1.picture=LoadPicture("")C:A.P1.ClsD:P1.piture""答案:CSub过程与Function过程最根本的区别是_______.A:Sub过程可以直接使用过程名调用,而Function过程不可以B:Function过程可以有参数,而Sub过程不可以C:两种过程参数传递方式不同D:Sub过程的过程名不能返回值,而Function过程能通过过程名返回值答案:D为达到把a、b中的值交换后输出的目的,编程如下:Private Sub Command1_Click()a% = 10: b% = 20Call swap(a, b)Print a, bEnd SubPrivate Sub swap(ByVal a As Integer, ByVal b As Integer)c = a: a = b: b = cEnd Sub在运行时发现输出结果错了,需要修改.下面列出的错误原因和修改方案中正确的是_________. A:输出语句错误,应改为:"Print "a", "b""B:调用swap过程的语句错误,应改为"Call swap a,b"C:过程的形式参数有错,应改为:"swap(ByRef a As Integer,ByRef b As Integer)"D:swap中3条赋值语句的顺序是错误的,应改为"a=b:b=c:c=a"答案:C在窗体上画一个名称为command1的命令按钮,然后编写如下事件过程:Option Base 1Private Sub Command1_Click()Dim ss = Array(9, 8, 7, 6, 5, 4, 3, 2, 1, 0)For i = 4 To 1 Step -2Print s(10 - i * 2);Next i程序运行后,单击命令按钮,则输出的结果是().A:8 4B:4 8C:8 6 4 2D:7 3答案:A删除字符串前导和尾随空格的函数是().A:Ltrim()B:Rtrim( )C:Trim()D:Lcase答案:C要把一个命令按钮设置成无效,应设置其哪一属性值(). A:VisibleB:EnabledC:DefaultD:Cancel答案:B下面语句中用来定义窗体或标准模块数组的是().A:DimB:ReDimC:Static答案:A下列关于Select Case之测试表达式的叙述中,错误的是 . A:可以是浮点类型B:只能是变量名C:可以是字符型D:可以是整型答案:B下列选项中,与List1.Text等价的表达式是( ).A:List1.List(List1.ListIndex-1)B:List1.List(List1.ListIndex+1)C:List1.List(List1.ListCount-1)D:List1.List(List1.ListIndex)答案:D语句listl.removeitem 1 将删除list.listindext等于()的项目.. A:0B:2C:3D:1答案:D执行X=7.835 :y=Int(x*100+0.5)/100 后结果是 .A:7.84B:7.8C:7.83D:7.835答案:AVisual Basic的过程有三种,它们是A:属性过程、通用过程和函数过程B:事件过程、通用过程和函数过程C:事件过程、函数过程和子程序过程D:通用过程、子程序过程和函数过程答案:C组合框的三种不同风格:下拉组合框、简单组合框和下拉列表框由()属性决定.A:StyleB:BoderStyleC:FillStyleD:DrawStyle答案:A使用Function语句定义一个函数过程,其返回值的类型为_______. A:只能是符号常量B:是除数组之外的简单数据类型C:可在调用时由运行过程决定D:由函数定义时As子句声明答案:D列表框控件中的列表内容是通过()属性设置的.A:NameB:CaptionC:ListD:Text答案:C工具栏中的"启动"按钮的作用是().A:运行一个应用程序B:运行一个窗体C:工程管理窗口D:打开被选中对象的代码窗口答案:A在窗体Form1的Click事件过程中有以下语句:Label1.Caption="Visual Basic"若本语句执行之前,标签控件的Caption属性为默认值,则标签控件的Name属性和Caption属性在执行本语句之前的值分别为(). A:"Label"、"Label"B:"Label1"、"Visual Basic"C:"Label1"、"Label1"D:"Caption"、"Label"答案:C要使得窗体在出现之前就完成相关的程序设置可在()事件中进行编程.A:linkopenB:KeyPressC:loadD:click答案:C图像框(Image)的何项属性设置为true时,可使图形自动调整大小,填满整个图像框().A:WidthB:PictureC:NameD:Stretch答案:D每建立一个窗体,工程管理器窗口中就会增加一个().A:工程文件B:窗体文件C:程序模块文件D:类模块文件答案:B表达式X+1>X是().A:算术表达式B:非法表达式C:字符表达式D:关系表达式要在垂直位置上移动控件,应利用控件的()属性.A:LeftB:WidthC:TopD:Height答案:C任何控件都具有的属性是().A:TEXTB:CAPTIONC:NAMED:FORECOLOR答案:C下列选项中,不属于列表框方法的是( ).A:AddItemB:DelItemC:ClearD:RemoveItem答案:B若i的初值为8,则下列循环语句的循环次数为次. Do While i<=17i=i+2A:4次B:3次C:6次D:5次答案:D下列不能用commondialog 控件调用的对话框是(). A:open/saveB:helpC:fontD:search答案:D一个菜单项是不是一个分隔条,由()属性决定.A:Name(名称)B:CaptionC:EnabledD:Visible答案:B选中复选框控件时,value属性的值,可以是().A:TrueB:falseC:0D:1Interger类型的变量可存的的最大整数是().A:250B:256C:32768D:32767答案:D获取字符串a 最右边5个字符的函数是 . A:RightStr(a,5)B:RightTrin(a,5)C:Last(a,5)D:Right(a,5)答案:DVB认为下面()组变量是同一个变量.A:A1和a1B:SUM和SUMMARYC:AVER和AVERAGED:A1和A_1答案:A下列控件中,没有Caption属性的是( ).A:框架B:复选框D:单选按钮答案:C要在图片框P1中打印字符串"HowAreYou",应使用语句(). A:Picture1.Print="HowAreYou"B:P1.Picture=LoadPicture("HowAreYou")C:P1.Print"HowAreYou"D:Print"HowAreYou"答案:C如果要给字体加删除线,可以选择下列那种属性().A:FontNameB:FontSizeC:FontStrikethruD:FontUnderLine答案:C下面哪些控件不会影响到界面设计效果().A:LabelB:TextC:CommonDialogD:Frame答案:C要改变控件的宽度,应修改该控件的()属性.A:TopB:WidthC:LeftD:Height答案:B变量未赋值时,数值型变量的值为().A:0B:空C:1D:无任何值答案:A设组合框Combo1中有3个项目,则以下能删除最后一项的语句是(). A:Combo1.RemoveItem TextB:Combo1.RemoveItem 2C:Combo1.RemoveItem 3D:Combo1.RemoveItem Combo1.Listcount答案:B用ReDim语句定义的数组是().A:多维数组B:永久数组C:临时数组D:静态数组答案:C只能用来显示字符信息的控件是( ).A:文本框B:标签C:图片框D:图像框答案:B以下4个选项中,属性窗口未包含的是 .A:属性列表B:工具箱C:对象列表D:信息栏答案:B窗体的Caption属性的作用是().A:确定窗体的名称B:确定窗体的标题C:确定窗体的边界类型D:确定窗体的字体答案:B启动VisualBasic后,系统为用户新建的工程起一个名为()的临时名称.A:工程1B:窗体1C:工程D:窗体答案:A若要使标签控件显示时,不覆盖其背景内容,应设置标签控件的()属性. A:BACKCOLORB:BORDERSTYLEC:FORECOLORD:BACKSTYLE答案:D以下不允许用户在程序运行时输入文字的控件是().A:标签框B:文本框C:下拉式组合框D:简单组合框答案:A引用列表框的最后一项应使用().A:List1.List(List1.ListCount-1)B:List1.List(List1.ListCount)C:List1.List(ListCount)D:List1.List(ListCount-1)答案:AInt( Rnd * 100 ) 表示的是范围内的整数.A:[1,100]B:[1,99]C:[0,99]D:[0,100]答案:C表达式2+3*4^5-SIN(X+1)/2中最先进行的运算是(). A:4^5B:3*4C:x+1D:SIN答案:C确定一个控件在窗体上的位置的属性是( ).A:Width和HeightB:Width或HeightC:Top和LeftD:Top或Left答案:C双击窗体的任何地方,可以打开的窗口是().A:代码窗口B:属性窗口C:工程管理窗口D:以上3个选项都不对答案:A下面()控件不具有Caption属性.A:标签框B:单选钮C:命令按钮D:文本框答案:D如果设计时在属性窗口将命令按钮的()属性设置为False,则运行时按钮从窗体上消失.A:VisibleB:EnabledC:DisabledPictureD:Default答案:A如果要在菜单中添加一个分隔线,则应将其Caption属性设置为(). A:=B:*C:&D:-答案:D下列()是窗体的扩展名.A:frmB:basC:clsD:dll答案:A定时器的Interval属性以()为单位指定Timer事件之间的时间间隔.A:分B:秒C:毫秒D:微秒答案:C在设计应用程序时,通过____窗口可以查看到应用程序工程中的所有组成部分. A:代码窗口B:窗体设计窗口C:属性窗口D:工程资源管理器窗口答案:DCls方法可以清除窗体或图片框中的()内容.A:在设计阶段使用Picture设置的背景位图B:在设计阶段放置的控件C:在运行阶段产生的图形和文字D:以上全部内容答案:C为使计时器控件每隔5秒钟产生一个计时器事件(Timer事件),则应将其Interval属性值设置为().A:5B:500C:300D:5000答案:DMSGBOX函数中有4个参数,其中必须写明的参数是().A:指定对话框中显示按钮的数目B:设置对话框标题C:提示信息D:所有参数都是可选的答案:C与传统的程序设计语言相比,Visual Basic 最突出的特点是 . A:子过程和函数功能的设计B:事件驱动运行机制C:调试技术D:结构化程序设计答案:B单击滚动条的滚动箭头时,产生的事件是().A:ClickB:ScrollC:ChangeD:Move命令钮标题热字的下划线,可通过( )符号来设置.A:\<B:&C:_D:\>答案:B下列语句中,属于合法的Visual basic 语句是().A:Option Base 4B:Option Base 2C:Option Base 1D:Option Base 3答案:C在列表框中当前被选中的列表项的序号是由下列哪个属性表示(). A:ListB:IndexC:ListIndexD:TabIndex答案:C用户可以通过设置菜单项的()属性值为FALSE来使该菜单项不可见. A:HideB:Checked答案:C下列()是日期型常量.A:"2/1/02"B:37258C:#2/1/02#D:|2/1/02|答案:CClear方法适用于() 控件.A:图片框B:窗体C:复选框D:组合框答案:D欲使某命令按钮失效,应修改命令按钮的()属性.A:VisibleB:CaptionC:EnableD:Enabled答案:D将通用对话框类型设置为"另存为"对话框,应修改( )属性.C:ActionD:Font答案:C若要把"XXX"添加到列表框List1中的第三项,则可执行语句( ). A:List1.AddItem "XXX", 3B:List1.AddItem 3,"XXX"C:List1.AddItem "XXX", 2D:List1.AddItem 2,"XXX"答案:C下列哪一种文件打开方式是以顺序文件方式打开文件并作写操作(). A:Open "c:\file1.dat"For Output as #1B:Open "c:\file1.dat" For Input as #1C:Open "c:\file1.dat" For Append as #1D:Open "c:\file1.dat" For Write as #1答案:A下面()对象在运行时一定不可见.A:LineB:TimerC:TextD:Option答案:B()对象不能作为控件的容器.A:FormB:PictureBoxC:ShapeD:Frame答案:C为了在按下Esc键时执行某个命令按钮的Click事件过程,需要把该命令按钮的一个属性设置为True,这个属性是( ).A:ValueB:DefaultC:CancelD:Enabled答案:C下列选项中不属于事件的是 .A:ShowB:KeyUpC:LoadD:Dblclick答案:A能够改变窗体边框线类型的属性是().A:FontStyleB:BorderStyleC:BackStyleD:Border答案:B标签框文本的对齐方式由( )属性来决定.A:AlignB:AlignmentC:AutosizeD:BackStyle答案:B在参数传递过程中,使用关键字_______来修饰参数,可以使之按值传递. A:ByValB:ByRefC:ValueD:reference答案:A要想返回文本框中输入的内容则可利用其()属性进行编程.A:captionB:textC:nameD:righttoleft答案:B当一个工程含有多个窗体时,其中的启动窗体是( ).A:在"工程属性"对话框中指定的窗体B:第一个添加的窗体C:启动 Visual Basic 时建立的窗体D:最后一个添加的窗体答案:A如下语句不能定义一个10×10的数组的是().A:Option Base 1:Dim s(10, 10)B:Dim s(2 To 11, -4 To 5)C:Dim s(10, 10) As IntegerD:Dim s(9, 9)答案:C若要设置文本框最大可接收的字符数,可通过( )属性来实现. A:MultiLineB:LengthC:MaxD:MaxLength答案:D数组Dim arr(-1 to 4,2 to 4,3) 的元素个数是().A:60B:36C:30D:72答案:D以下有关对象属性的说法正确的是( ).A:对象所有的属性都罗列在属性窗口列表中B:不同对象不可能有同名属性C:不同对象的同名属性的取值一定相同D:对象的某些属性既可以在属性窗口中设置,也可以通过程序代码设置或改变答案:Dvb 中的坐标系最小刻度为().A:缇B:象素C:厘米D:一个标准字符宽度答案:A如果要在命令按钮上显示图形文件,应设置命令按钮的().A:Style属性和Graphics属性B:Style属性和Picture属性C:Picture属性D:Graphics属性答案:B组合框控件是将()组合成一个控件.A:列表框控件和文本框控件B:标签控件和列表框控件C:标签控件和文本框控件D:复选框控件和选项按钮控件答案:A计时器的interval属性为0时,表示().A:计时器失效B:相隔0秒C:相隔0 毫秒D:计时器的enable属性为false答案:A清除列表框的所有选项应选择下列哪种方法().A:ClearB:ClsC:ClearItemD:RemoveItem答案:A以下叙述错误的是( ).A:下拉式菜单和弹出式菜单都用菜单编辑器建立B:如果把一个菜单项的Enabled属性设置为False,则菜单项不可见. C:内缩符号由4个点组成,它表明菜单项所在的层次.D:除分隔线外,所有菜单项都能接收Click事件.答案:B在Visual Basic代码中,将多个语句合并在一行上的并行符是() A:撇号(')B:冒号(:)C:感叹号(!)D:问号(?)答案:B工程文件的扩展名为 .A:.basB:.vbpC:.frxD:.frm答案:B将Visual Basic编制的程序保存在磁盘上,至少会产生何种文件 .A:.doc与.txtB:.vbp与.frmC:.com与.exeD:.bat与.frm答案:B为了在按下回车键时执行某个命令按钮的事件过程,需要把该命令按钮的一个属性设置为True,这个属性是().A:ValueB:DefaultC:CancelD:Enabled答案:B决定控件上文字的字体、字形、大小及效果的属性是().A:TEXTB:CAPTIONC:NAMED:FONT答案:D一、判断共204题在Visual Basic 中Dim a ,b,c as integer和Dim a as integer, b as integer,c as integer相同.答案:N有的对象属性既可在属性窗口中设定又可在程序代码中设定.答案:Y所有的控件在程序运行以后都是可见的.答案:NSingle 和Double型用于保存浮点数,在VB中定义单精度浮点8位,双浮点16位.答案:N时钟控件的属性Interval值为0时,表示屏蔽计时器.答案:Y有一个程序在属性窗口中设置了它的窗体字体大小为10号,而程序代码若设置了它的窗体字体大小为20号,那么当程序运行后实际的窗体字体大小为20号.答案:Y在过程中用Dim和Static定义的变量都是局部变量答案:Y对象是基本的运行实体,它既包括了数据(属性).也包括作用于对象的操作(方法)和对象的响应动作(事件).答案:Y事件过程与Sub过程,它们相同点都是事件驱动,而不同的只是事件过程由控件属性决定,而Sub过程是由户自定义.答案:Y图片框的属性Enabled设置为FALSE, 图片框上的控件仍可响应用户操作.答案:N声明形参处缺省传递方式声明,则为按值传递(ByVal).答案:NVariant是一种数据类型,因此只能存放象其它数据类型一样,无特殊值.答案:NVB若同一个工程有许多窗体,可以指定任一窗体为启始窗体.答案:Y定时将文本框中的数据保存到磁盘,应用于选用Timer计时器控件.答案:Y过程中的静态变量是局部变量,当过程再次被执行时,它的值是上一次过程调用后的值.答案:Y在VB中,函数 Fix(-3.6) 的返回值是–4.答案:N可以用"&","+"合并字符串,但是用在变异变量时,"+"可能会将两个数值加起来.答案:Y如果一个菜单项的Visible属性为False,则它的子菜单也不会显示.答案:YVB规定窗体文件的扩展名是 .vbp.答案:N当需要在同一窗体中建立几组相互独立的单选钮时,就要用框架将每一组单选钮框起来.答案:Y在打开一个Visual Basic工程进行修改后,要另存为一个版本,只需单击"工程另存为…"就行,因为系统将同时保存其他文件.答案:Y利用Private Const 声明的符号常量,在代码中不可以再赋值.答案:Y如果在过程调用时使用按地址传递参数(byref),则在被调过程中不可以改变实参的值.答案:N用通用对话框控件显示"字体"对话框前,必须先设置Flags属性,否则将发生"不存在字体"的错误.答案:Y用Cls方法能清除窗体或图片框图中用Picture属性设置的图形.答案:NDo/Loop While结构中的循环体,至少被执行一次.答案:Y要使定时器控件起作用,其属性Interval不可以设置为0.答案:Y对于文件系统控件,当驱动器控件Drive1中的驱动器符改变时,文件夹列表控件Dir1中显示的文件夹也作相应改变,可以在Drive1中的Change事件中使用如下命令:Dir1.Path=Drive1.Drive.答案:Y事件过程由某个用户事件或系统事件触发执行,它不能被其它过程调用.答案:NFor/Next语句中,循环控制变量只能是整型变量.答案:N关系表达式是用来比较两个数据的大小关系的,结果为逻辑值.答案:Y面向对象程序设计是一种以对象为基础,由事件驱动对象执行的设计方法.答案:YVisual Basic提供的几种标准坐标系统的原点都是在绘图区域的左上角,如果要把坐标原点放在其它位置,则需使用自定义坐标系统.答案:Y在框架控件内的几个单选按钮中,只能有一个单选按钮的Value属性为True.答案:Y设置框架时,可先在窗体上画好框架,再往框架内添置控件;也可以先设计控件,再建立框架,然后将已有控件拖动到框架中.答案:N在程序中Name属性是作为对象的标识而引用,不会显示在窗体上,而控件上显示的内容由Caption属性决定.答案:N由Visual Basic语言编写的应用程序有解释和编译两种执行方式.答案:Y在MsgBox 函数中 prompt 参数是必须的.答案:Y文件按照数据编码方式可以分为ASCII码文件和二进制文件.答案:Y在表达式中,运算符两端的数据类型要求一致.答案:Y计时器(Timer)控件的Interval属性的单位是毫秒,即若将此属性值设为10,则每0.01秒产生一次Timer事件.答案:Y数组控件形成之后,对于每一个控件的名称是相同的.答案:Y若要新建一个磁盘上的顺序文件,可用output,append方式打开文件.答案:Y清除combo1对象的内容是combo1.clear.答案:YDo/Loop Until结构的循环,是"先判断、后执行(循环体)"的循环结构.答案:N在盘驱动器列表框Drive1的Change事件过程中,代码Dir1.Path=Drive1.Drive 的作用是:当Drive1的驱动器改变时,Dir1的目录列表随不同驱动器的作相应改变.答案:Y命令 Picture1.Circle(500,800),800 能够在图片框Picture 1 中画出的图形是圆心在 (500,800)的一个圆.答案:Y用DIM定义数值变量时,该数值变量自动赋初值为0.答案:Y在面向对象的程序设计中,对象是指可以访问的实体.答案:Y通常访问数组内容需要使用循环结构.答案:Y在VB 6.0中,如果要使窗体上的多个控件具有相同的尺寸,在选择了这些控件之后,应执行VB"格式"菜单中的命令.答案:Y用关键字Public声明的过程可以被其他模块调用.答案:YVB支持弹出菜单,所谓"弹出菜单"是指单击鼠标后打开的菜单.答案:N用dim语句声明的局部变量能保存上一次过程调用后的值.答案:N"菜单编辑器"中至少要填"名称"和"标题"这两个框,才能真确完成菜单栏的设计.答案:Y在命令按钮的Click事件过程中,exit与end等效.答案:N在逻辑运算符Not、Or、And中,运算优先级由高到低依次为Not、And、Or.答案:YVisual Basic是以结构化的Basic语言为基础、以事件驱动作为运行机制的可视化程序设计语言.答案:Y设A=3,B=4,C=5,D=6,则表达式A>B And C<=D Or 2* A>C 的值是 False.答案:Y"事件过程"是用来完成事件发生后所要执行的程序代码.答案:Y某一过程中的静态变量在过程结束后,静态变量及其值可以在其它过程中使用.答案:N如果一个列表框一共有5个选项,而当选中第三项时,这时列表框的ListIndex属性为2.答案:YActiveX控件是扩展名为*.ocx的独立文件,使用时需用"工程"/"部件"载入或移去.答案:Y要设置一个图片按钮,除了设置按钮的Picture属性外,还应该将按钮的Style属性设置为1.答案:Y使用单选钮控件数组时,它们响应同一个Click事件,由Index参数值来区分不同的按钮.答案:Y组合框兼有文本框和列表框两者的功能,用户可以通过键入文本或选择列表中的项目来进行选择. 答案:Y图象框中的Stretch 属性为 true 时,其作用是图形自动调整大小以适应图象控件.答案:Y函数MsgBox的前3个参数分别表示默认按钮、按钮样式以及图标样式.答案:N在单行If语句中,关键字End If是必不可少的.答案:N创建数组控件的方法之一是选定控件后通过复制、粘贴的方式.答案:YFunction函数有参数传递,并且一定有返回值.答案:Y计算机在处理数据时必须将其装入内存,在高级语言中通过内存单元名来访问其中的数据,命名的内存单元就是常量或变量.答案:Y单击"启动"菜单项将窗体装入内存时,一定触发窗体的load事件.答案:YFor/Next循环正常(未执行Exit For)结束后,控制变量的当前值等于终值.答案:N多文档界面是指在一个父窗口下面可以同时打开多个子窗口.子窗口归属于父窗口,当父窗口关闭时,所有子窗口全部关闭.答案:YListl.clear是清除Listl的全部列表项,所以Clear是对象的方法.答案:Y在标准模块的声明部分中用Public声明的变量的有效范围是其所在的工程.答案:Y函数InputBox的前3个参数分别是输入对话框的提示信息、标题以及默认值.答案:Y将焦点主动设置到指定的控件或窗体上,应采用Setfocus方法.答案:YVisual_basic是合法的变量名.答案:Y填空共141题文本框中所显示的内容是它的【1】属性的值.答案 Text如果要指明mystring为固定15个字长的全局变量,应该在标准模块中用以下说明语句定义【1】.答案:public mystring as string*15如果:I=11:J=3:I=int(-8.6)+I\J+13/3 MOD 5,则I值是【1】.答案:-2新建工程时系统会自动将窗体标题设置为【1】.答案:Form1如果要使用命令按钮表面显示文字"退出(X)"(在字符X之下加下划线),则其Caption属性设置为【1】. 答案:退出(&X)拖动滚动条中的滚动框将会产生Scroll和【1】事件.答案:Change语句Print Not 10>15 And 8<5+2的输出结果为【1】.答案:FALSE对象具有属性和【1】.答案:方法当程序运行时,要求窗体中的文本框呈现空白,则在设计时,把此文本框的【1】属性设置成空白.答案:Text把整数0赋给一个逻辑型变量,则逻辑变量的值为【1】.答案:False要使同一类型控件组成一个控件数组,必须要求【1】.答案:Name 相同=或=名称相同滚动条控件有水平滚动条和【1】滚动条.答案:垂直Val("123.55ab456")的值是多少【1】.答案:123.55VB提供了列表框控件,当列表框中的项目较多,超过了列表框的长度时,系统会自动的在列表框边上加一个【1】.答案:垂直滚动条=或=滚动条把整型数1赋给一个逻辑型变量,则逻辑变量的值为【1】.答案:True运行时,若需要命令按钮为灰色,即不被击活,在设计时可以通过【1】属性来实现.答案:enabled列表框(ListBox)显示【1】,用户可以从中选择一个或多个项目.答案:项目列表=或==列表Visual Basic为添加到窗体上的第一个图片框picture提供的默认对象名为【1】.答案:Picture1求x与y之积除以z的余数的VB表达式为【1】.答案 x*y Mod z已知文本框的内容为"ABCDE",若文本框Selstart=4,Sellength=2,则SelText为【1】. 答案:DE文件按照存取方式及其组成结构可以分为顺序文件和【1】.答案:随机文件=或=随机显示弹出式菜单的方法是【1】.答案:PopupMenu要使一个按钮设为默认按钮,应把此按钮的【1】属性的值设为True.答案:DefaultVB的运算符包括算术运算符、【1】运算符、关系运算符、逻辑运算符和特殊运算符. 答案:连接设置计时器控件只能触发【1】事件.答案:timerVisualBasic6.0用于开发【1】环境下的应用程序.答案:WINDOWS一个工程可以包括多种类型的文件,其中,扩展名为.frm的文件表示【1】文件.答案:窗体VB6.0的连接运算符包括【1】运算符和【2】运算符两种.答案:& 或+答案2 & 或 +。
第1套您已经通过该套作业,请参看正确答案1、与传统的程序设计语言相比,Visual Basic语言最突出的特点是()。
A.结构化程序设计B.程序开发环境C.事件驱动编程机制D.程序调试技术参考答案:C您的答案:C2、Visual Basic集成环境的主窗口中不包括()。
A.标题栏B.菜单栏C.状态栏D.工具栏参考答案:C您的答案:C3、Visual Basic窗体设计器的主要功能是()。
A.建立用户界面B.编写源程序代码C.画图D.显示文字参考答案:A您的答案:A4、下列叙述中正确的是()。
A.只有窗体才是VB中的对象B.只有控件才是VB中的对象C.控件和窗体都是VB中的对象D.控件和窗体都不是VB中的对象参考答案:C您的答案:C5、为了把窗体上的某个控件变为活动的,应执行的操作是()。
A.单击窗体的边框B.单击该控件的内部C.双击该控件D.双击窗体参考答案:B您的答案:B6、确定一个控件在窗体上的位置的属性是()。
A.Width或HeightB.Width和HeightC.Top或LeftD.Top和Left参考答案:D您的答案:D7、在窗体上面画一个名称为Text1的文本框,然后编写如下的事件过程:Private Sub Text1_KeyPress(KeyAscii As Integer)......End Sub若焦点位于文本框中,则能够触发KeyPress事件的操作是()。
A.单击鼠标B.双击文本框C.鼠标滑过文本框D.按下键盘上的某个键参考答案:D您的答案:D8、为了装入一个VB应用程序,应当()。
A.只装入窗体文件(.frm)B.只装入工程文件(.vbp)C.分别装入工程文件和标准模块文件(.bas) D.分别装入工程文件、窗体文件和标准模块文件9、当窗体最小化时缩小为一个图标,设置这个图标的属性是()。
A.MouseIconB.IconC.PictureD.MousePoint参考答案:B您的答案:B10、为了取消窗体的最大化功能,需要把它的一个属性设置为False,这个属性是()。
vb实验作业参考答案VB实验作业参考答案引言:Visual Basic(VB)是一种基于事件驱动的编程语言,广泛应用于Windows操作系统的软件开发。
在学习VB编程过程中,实验作业是非常重要的一部分,通过实践来巩固所学知识。
本文将提供一些VB实验作业的参考答案,帮助读者更好地理解和掌握VB编程。
一、VB基础知识实验作业参考答案1. 实验题目:编写一个VB程序,实现两个整数的加法运算,并将结果显示在文本框中。
参考答案:```Private Sub btnAdd_Click()Dim num1 As IntegerDim num2 As IntegerDim result As Integernum1 = CInt(txtNum1.Text)num2 = CInt(txtNum2.Text)result = num1 + num2txtResult.Text = CStr(result)End Sub```2. 实验题目:编写一个VB程序,实现输入一个数字,判断该数字是奇数还是偶数,并在消息框中显示结果。
参考答案:```Private Sub btnCheck_Click()Dim num As Integernum = CInt(txtNum.Text)If num Mod 2 = 0 ThenMsgBox "该数字是偶数"ElseMsgBox "该数字是奇数"End IfEnd Sub```二、VB控件应用实验作业参考答案1. 实验题目:编写一个VB程序,实现一个简单的计算器功能,包括加法、减法、乘法和除法操作。
参考答案:```Private Sub btnAdd_Click()Dim num1 As DoubleDim num2 As DoubleDim result As Doublenum1 = CDbl(txtNum1.Text) num2 = CDbl(txtNum2.Text)result = num1 + num2txtResult.Text = CStr(result) End SubPrivate Sub btnSubtract_Click() Dim num1 As DoubleDim num2 As DoubleDim result As Doublenum1 = CDbl(txtNum1.Text) num2 = CDbl(txtNum2.Text)result = num1 - num2txtResult.Text = CStr(result) End SubPrivate Sub btnMultiply_Click() Dim num1 As DoubleDim num2 As DoubleDim result As Doublenum1 = CDbl(txtNum1.Text) num2 = CDbl(txtNum2.Text)result = num1 * num2txtResult.Text = CStr(result) End SubPrivate Sub btnDivide_Click() Dim num1 As DoubleDim num2 As DoubleDim result As Doublenum1 = CDbl(txtNum1.Text)num2 = CDbl(txtNum2.Text)If num2 = 0 ThenMsgBox "除数不能为0"Elseresult = num1 / num2txtResult.Text = CStr(result)End IfEnd Sub```2. 实验题目:编写一个VB程序,实现一个简单的登录界面,包括用户名和密码输入框以及登录按钮。
1、下面不是VB工作模式的是(C )A.设计模式B.运行模式C.编模汇式D.中断模式2、可视化编程的最大优点是(C )A.具有标准工具箱B.一个工程文件由若干个窗体文件组成C.不需要编写大量代码来描述图形对象D.所见即所得3、下列不能打开属性窗口的操作是(C )A.执行“视图”菜单中的“属性窗口”命令B.按F4键C.按Ctrl+TD.单击工具栏上的“属性窗口”按钮4、下列可以打开立即窗口的操作是(D )A.Ctrl+D B.Ctrl+E C.Ctrl+F D.Ctrl+G5、Visual Basic的编程机制是(D )A.可视化B.面向对象C.面向图形D.事件驱动1、以下能够触发文本框Change事件的操作是(D )A.文本框失去焦点B.文本框获得焦点C.设置文本框的焦点D.改变文本框的内容2、应用程序设计完成后,应将程序保存,保存的过程是(D )A.只保存窗体文件即可B.只保存工程文件即可C.先保存工程文件,之后保存窗体文件D.先保存窗体文件(或标准模块文件),之后还要保存工程文件3、VB应用程序的运行模式是(C)A.解释运行模式B.编译运行模式C.两者都有D.汇编模式4、任何控件都具有的属性是(C )A.TEXT B.CAPTION C.NAME D.FORECOLOR5、决定控件上文字的字体、字形、大小及效果的属性是(D )A.TEXT B.CAPTION C.NAME D.FONT6、在窗体上建立了多个控件,如TEXT、LABEL1、COMMAND1,若要使程序一运行焦点就定位在COMMAND1控件上,应将COMMAND1控件的(B )设置为0 A.INDEX B.TABINDEX C.TABSTOP D.ENABLED7、运行时,当用户向文本框输入新的内容,或在程序代码中对文本框的TEXT属性进行赋值从而改变了文本框的TEXT属性值时,将触发文本框的(D)事件A.CLICK B.DBLCLICK C.GOTFOCUS D.CHANGE8、在运行时,按TAB键跳过了一个可以获得焦点的控件(如文本框),则可能是因为(D )A.该控件的TABSTOP属性值为TRUE B.该控件的TABINDEX属性值为FALSE C.该控件的ENABLED属性值为TRUE D.该控件的ENABLED属性值为FALSE9、为了防止用户随意将光标置于控件上,应(D)A.将控件的TABINDEX属性设置为0B.将控件的TABSTOP属性设置为TRUEC.将控件的TABSTOP属性设置为FALSED.将控件的ENABLED属性设置为FALSE10、若要使标签控件显示时,不覆盖其背景内容,应设置标签控件的(D )属性A.BACKCOLOR B.BORDERSTYLEC.FORECOLOR D.BACKSTYLE11、如果要在文本框中输入字符时,只显示某个字符,如星号(*),运行时,在文本框中输入的字符仍然显示出来,而不显示星号,原因可能是(B )A.文本框的MULTILINE属性值为TRUEB.文本框的LOCKED属性值为TRUEC.文本框的MULTILINE属性值为FALSED.文本框的LOCKED属性为FALSE12、在运行阶段,要在文本框TEXT1获得焦点时选中文本框中所有内容,对应的事件过程是(A)A.Private Sub Text1_GotFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubB.Private Sub Text1_LostFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubC.Private Sub Text1_Change( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubD.Private Sub Text1_SetFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End Sub13、Visual Basic继承了Basic语言简单易用的语法特点,同时支持面向对象的编程机制,其中构成其控件(对象)的三要素是(D)A.属性、事件、事件过程B.控件、窗体、事件C.属性、过程、方法D.属性、事件、方法14、决定标签(Label)显示的属性是(C )A.Text B.Name C.Caption D.Alignment15、命令按钮的标题文字由(B )属性来设置。
《VB程序设计》作业参考答案一.选择题1-5 ABC CB 6—10 CCA DC 11-15 ABC DB 15-20CDA CB 21-25DBD CC25-30DAC AA 31-35 DAC AA 36-40 BCC CD 41-45 CCC AC 46-50DDB AD 51-55 ACA CD 56-60 BCA DA 61-65 BAADB 66-70DBDAC 71-75BBBAD 76—80CDABC 81-85ABCD C 86-90BAADD 91-95CBBAD 96.B二.填空题(1) E (2) 程序代码(3) CmdDisplay.Visible =False(4) t=a(j)(5) And(6) 回车符(7) text2.setfocus (8) 3 (9) D=B:B=C:C=D (10) Random(11)事件过程(12) 打开对话框(13) 3 (14) a(i,j)=0 (15) L1.text(16) Put # (17) True (18) I MOD 4=0 (19) AaBbCc (20)INT(Rnd*100) ;arr (21)Output ;Write #1,StuNo,StuName,StuEng (22)10 (23)4 (24) 顺序,随机(25)INPUT,OUTPUT,APPEND (26)程序代码窗口的字符过大或过小,可以通过(工具→选项→编辑器格式→大小)去改变。
(27)窗体、控件、对象(28)界面设计(29)对象、代码(30)窗体、标准模块、类模块、工程(31)窗体(Form)、图片框(PictureBox)、打印机(Printer)、立即窗口(Debug) (32)E D(33)81 (34)程序,数据(35)窗体、控件、对象(36)对象、代码(37)用户界面的窗体、执行具体操作的代码。
(38)Picture属性、剪切板把图形粘贴三.编程题1.Option Base 1Private Sub Form_click()Dim a(3) As Integer, m As IntegerDo While m <> -1 And i < 3m = InputBox("请输入第" & i + 1 & "条边")i = i + 1a(i) = mIf a(i) < 0 ThenMsgBox "输入错误,请重新输入!"i = i - 1End IfLoopIf a(1) + a(2) > a(3) And Abs(a(1) - a(2)) < a(3) Thens = (a(1) + a(2) + a(3)) / 2s = Sqr(s * (s - a(1)) * (s - a(2)) * (s - a(3)))Print "三角形的面积是"; sElseMsgBox "三条边不能构成三角形!"EndEnd IfEnd Sub2.Option Base 1Private Sub Form_click()Dim a, ba = Array(2, 8, 7, 6, 4, 28, 70, 25)b = Array(79, 27, 32, 41, 57, 66, 78, 80)Dim c(8)For i = 1 To 8c(i) = a(i) + b(i)Print c(i);Next iEnd Sub3.Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)Print spc(3); Chr$(KeyCode); spc(3); Hex$(KeyCode); spc(3); Oct$(KeyCode); spc(3); KeyCode End SubPrivate Sub Form_Load()PrintShowPrint spc(3); "按键"; spc(3); "16进制"; spc(3); "8进制"; spc(3); "10进制" PrintEnd Sub4.Dim a(3) As Long, s As Long, p As Long '通用-声明Sub Su(n As Long) '通用subp = 1For i = 1 To np = p * iNext iEnd SubFunction F(n As Long) As Long '通用Functionp = 1For i = 1 To np = p * iNext iF = pEnd FunctionPrivate Sub Command1_Click()s = 0For i = 1 To 3a(i) = InputBox("请输入第" & i & " 个数的值:")Call Su(a(i))s = s + pNext iPrint "用Sub过程求得"; a(1); "! +"; a(2); "! +"; a(3); "! ="; sEnd SubPrivate Sub Command2_Click()s = 0For i = 1 To 3a(i) = InputBox("请输入第" & i & " 个数的值:")s = s + F(a(i))Next iPrint "用Function过程求得"; a(1); "! +"; a(2); "! +"; a(3); "! ="; sEnd SubPrivate Sub Command3_Click()EndEnd Sub5. 如下图,在窗体上画一个图片框,一个文本框,再画两个标签。
①填写下表控件默认名称标题文本图片框Picture1 空白标签1 Label1 求偶数的和标签2 Label2 输入数的范围文本框Text1 空白②如图编写程序代码,要求键盘输入42,显示在文本框内;并将该整数范围内的偶数显示在图片框内。
(每行打印7个数)Private Sub Form_Load()Text1.Text = 42End SubPrivate Sub Picture1_Click()k = 0For j = 1 To 42If k Mod 7= 0 Then Picture1.PrintIf j Mod 2 = 0 ThenPicture1.Print Str$(j);k = k + 1End IfNext jEnd Sub6. 如图在窗体上画两个命令按钮和一个文本框,要求单击第一个命令按钮时,文本框消失,单击第二个命令按钮时,文本框复出,并在文本框中显示“编写程序乐趣无限”。
Private Sub Command1_Click()Text1.Visible = FalseEnd SubPrivate Sub Command2_Click()Text1.Text = "编写程序乐趣无限"Text1.Visible = TrueEnd Sub7. 如下图,在窗体上画一个图片框,一个文本框,再画两个标签。
①填写下表控件默认名称标题文本图片框Picture1 空白标签1 Label1 输出在此范围内能同时被3和5整除的整数标签2 Label2 输入数的范围文本框Text1 空白②编写程序代码,如图,要求键盘输入任意一个整数作上限,显示在文本框内;并将该整数范围内能同时被3和5整除的整数,显示在图片框内。
Public n As StringPrivate Sub Form_Load()n$ = InputBox("输入数的取值范围n")Text1.Text = n$End SubPrivate Sub Picture1_Click()n = Val(n$)k = 0For j = 1 To nIf j Mod 3 = 0 And j Mod 5 = 0 ThenPicture1.Print Str$(j);End IfNext jEnd Sub8. 输入任意一个字符串,检查字符串是否是“回文”.当一个字符串顺读倒读是一样的,则这样的字符串就是“回文”,如“LEVEL”, “MADAM”, “123321”等都是“回文”Private Sub Form_click()a$ = InputBox("a$=")n = Len(a$)For i = 1 To Int(n / 2)If Mid$(a$, i, 1) <> Mid$(a$, n - i + 1, 1) ThenPrint "不是回文": Exit ForEnd IfNext iIf i > Int(n / 2) Then Print "是回文"End Sub。