vb6.0练习题及答案

合集下载

vb6.0第六章 习题解答

vb6.0第六章 习题解答

习题六一、选择题答案Aadcc dc二、填空题答案1、a(I,j)+b(I,j)2、下标越界3、64、1 2 2 4 3 6第六章选择题部分解析3、sum表示a数组各元素的和X表示a数组元素和的平均值最后打印出a数组中大于平均值的元素Sum=1+2+3+4+5=15,x=3大于3的有4,55、倒着看文本框中显示什么?答:显示的是array1(1,3)+array2(2,3)的和接着往前看程序发现array1(i,j)=i+j所以array1(1,3)=1+3=4Array2(2,3)=2+3=5所以4+5=9二、填空题解析2、x数组最大元素是x(6)退出for循环时,i=7然后print x(i)相当于print x(7)但是没有x(7)这个元素,超出最大下标了。

若把print x(i)改为print x(a)则值是36第六章编程题1、Private Sub Form_Click()Dim a(1 To 20) As Integer, i As IntegerDim j As Integerj = 0 '用来表示小于60的个数Picture1.Print "产生的数组为:"Picture1.PrintPicture2.Print "其中小于60的元素有:"Picture2.PrintFor i = 1 To 20a(i) = Int(Rnd * 100 + 1)Picture1.Print a(i);If i Mod 10 = 0 Then Picture1.PrintIf a(i) < 60 Thenj = j + 1Picture2.Print a(i); " ";If j Mod 10 = 0 Then Picture2.PrintEnd IfNext iEnd SubPrivate Sub Form_Load()RandomizeEnd Sub2、Private Sub Form_Click()Dim a(1 To 10) As IntegerDim max As Integer, min As Integer, i As IntegerFor i = 1 To 10a(i) = Int(Rnd * 90 + 10)Picture1.Print a(i);If i Mod 5 = 0 Then Picture1.PrintNext imax = a(1)min = a(1)For i = 2 To 10If a(i) > max Then max = a(i)If a(i) < min Then min = a(i)Next iLabel1.Caption = "最大数为:" & maxLabel2.Caption = "最小数为:" & minEnd SubPrivate Sub Form_Load()RandomizeEnd Sub3、Dim a(1 To 20) As IntegerPrivate Sub Command1_Click()Dim x As Integer, flag As Integer, i As Integerflag = 0 '标志,表示数组中是否存在xx = InputBox("请输入x的值,为整数", "输入", 1) For i = 1 To 20If x = a(i) Thenflag = 1 'flag改变,说明存在Exit ForEnd IfNext iIf flag = 1 ThenPrint "数组中存在" & xPrint "位置:" & iElsePrint "数组中不存在" & xEnd IfEnd SubPrivate Sub Form_Click()Dim i As IntegerFor i = 1 To 20 '生成数组a(i) = Int(Rnd * 100) '题目没要求,随便的范围Next iFor i = 1 To 19 '冒泡排序For j = 20 To i + 1 Step -1If a(j) > a(j - 1) Thent = a(j)a(j) = a(j - 1)a(j - 1) = tEnd IfNext jNext iFor i = 1 To 20 '打印数组Print a(i);If i Mod 5 = 0 Then PrintNext iEnd SubPrivate Sub Form_Load()RandomizeEnd Sub4、Private Sub Form_Click()Dim a(1 To 15) As SingleDim i As Integer, c1 As Integer, c2 As Integer, c3 As Integer, avg As SingleFor i = 1 To 15a(i) = InputBox("请输入第" & i & "个学生的成绩", "输入成绩", 60)avg = avg + a(i)Next iavg = avg / 15For i = 1 To 15If a(i) > avg Then c1 = c1 + 1If a(i) < 60 Then c2 = c2 + 1If a(i) >= 90 Then c3 = c3 + 1Next iPrint "高于平均分的人数"; c1Print "<60的人数"; c2Print ">=90的人数"; c3End Sub5、Dim a(1 To 4, 1 To 4) As Integer, b(1 To 4, 1 To 4) As Integer, c(1 To 4, 1 To 4) As IntegerPrivate Sub Command1_Click()‘(2)题For i = 1 To 4For j = 1 To it = a(i, j)a(i, j) = a(j, i)a(j, i) = tNext jNext iPicture2.ClsPicture2.Print "a转置后:"Picture2.PrintFor i = 1 To 4For j = 1 To 4Picture2.Print a(i, j); " ";Next jPicture2.PrintNext iEnd SubPrivate Sub Command2_Click()‘(3)题Picture2.ClsMax = c(1, 1)t1 = 1t2 = 1For i = 1 To 4For j = 1 To 4If c(i, j) > Max ThenMax = c(i, j)t1 = it2 = jEnd IfNext jNext iPicture2.Print "max=", MaxPicture2.Print "c("; i; ","; j; ")"End SubPrivate Sub Command3_Click()‘(4)题Picture1.ClsPicture2.ClsFor i = 1 To 4For j = 1 To iPicture1.Print a(i, j); " ";Next jPicture1.PrintNext iFor i = 1 To 4For j = i To 4Picture2.Print Tab(j * 5); b(i, j);Next jPicture2.PrintNext iEnd SubPrivate Sub Command4_Click()‘(5)题Picture1.ClsFor i = 1 To 4t = a(1, i)a(1, i) = a(3, i)a(3, i) = tNext iFor i = 1 To 4For j = 1 To 4Picture1.Print a(i, j); " ";Next jPicture1.PrintNext i End SubPrivate Sub Command5_Click()‘(1)题Picture3.Print "c矩阵:"Picture3.PrintFor i = 1 To 4For j = 1 To 4c(i, j) = a(i, j) + b(i, j)Picture3.Print c(i, j); " ";Next jPicture3.PrintNext iEnd SubPrivate Sub Form_Load()ShowPicture1.Print "a矩阵:"Picture1.PrintPicture2.Print "b矩阵:"Picture2.PrintFor i = 1 To 4For j = 1 To 4a(i, j) = Int(Rnd * 40 + 30)b(i, j) = Int(Rnd * 35 + 101)Picture1.Print a(i, j); " ";Picture2.Print b(i, j); " ";Next jPicture1.PrintPicture2.PrintNext iEnd Sub。

vb6.0实验六习题与答案

vb6.0实验六习题与答案

vb6.0实验六习题与答案实验六专业_1、认识常用控件:单选按钮、复选框、框架、列表框、组合框、滚动条、滑动器(slider)、时钟、图形控件;2.学习在表单中创建常用控件2、学习在属性窗口和在程序代码中设置属性3、学习调用控件的方法4.学习编写每个控件、鼠标和键盘的事件过程。

二、实验内容1、单选按钮、复选框、框架1)将表格F1的标题设置为“复选框、框架和单选按钮”;将表格中复选框ch1、ch2ch1和CH2的高度和宽度分别设置为360和1000;程序运行时,check2处于非零状态。

FR1帧包含单选按钮OP1和op2。

2)设计窗体,要求①标题为“设置字体”;② 带边框的标签控件Label1以表格形式设置,高度和宽度分别为450和3800,标题为“欢迎VB”,字体大小为“4”,并显示在中间;③标题为“字体”框架包含两个标题分别为“楷体_gb2312”和“华文新魏”的单选按钮op1和op2;④ 标题为“Italic”的框架包含两个标题为“是”和“否”的单选按钮。

⑤ 编写相应控件的事件进程,使程序运行时,点击“Kaiti_gb2312”,标签控件的字体为Kaiti_gb2312,点击“Chinese New Wei”,标签控件的字体为Chinese New Wei;单击Yes,label控件的字体将为斜体。

单击“否”取消标签控件字体的斜体化。

privatesuboption1_click()标签1。

fontname=option1。

说明文字endsubprivatesuboption2_uu单击()label1.fontname=option2.captionendsubprivatesuboption3_click()label1.fontitalic=trueendsubprivatesuboption4_click()label1.fontitalic=falseendsub3)在窗体是设置设置框text1,其中文字为:黑体、四号、居中;设置单选按钮option1和option2,标题分别为“福州大学”和“阳光学院”,编写行当的事件过程,使得程序时,单击“福州大学”或“阳光学院”,在文本框中显示“福州大学”或“阳光学院”。

vb6.0实验指导答案

vb6.0实验指导答案

第1章Visual Basic程序设计基础一、填空题1、过程、对象2、事件3、现存、新建、最新4、工程、窗体、标准模块、.ocx5、F4、属性、视图、属性6、响应事件后所执行的程序代码第2章可视化编程方法一、选择题1、B2、C二、简单题(1)MsgBox "在这里书写消息的内容", vbYesNoCancel, "注意"(2)MsgBox "在这里书写" & vbCrLf & "消息的内容", vbYesNo, "注意"(3)MsgBox "在这里书写" & vbCrLf & "消息的内容", 256 + 1 + 16, "注意"第3章Visual Basic语言基础一、选择题1、C2、A3、C4、C5、A6、C7、A8、B9、A 10、C11、D 12、B 13、C 14、D 15、B 16、C二、简答题第4章Visual Basic程序控制结构(一)顺序结构一、选择题1、B2、A B3、B4、C5、A6、A二、上机实验题1、HELLO!CHANG!GOOD MORNING(二)选择结构一、选择题1、D2、A3、D4、B D5、D6、A7、B8、A9、B二、上机实验题1、(1)y mod 4=0 and y mod 100 <>0 OR y mod 400=0(2)max min C>max C<min(三)循环结构一、选择题1、A2、C3、C4、A5、D6、C7、A二、上机实验题1、(1)1.5 (2)2 (3)S=42 (4)M1=120,M2=63 -3 84.5 -1018 -11-1 12。

《VB6.0》练习题一

《VB6.0》练习题一

09微机升学班《Visual Basic6.0》练习题一一、选择题:1、窗体上有一个列表框和一个文本框,编写如下两个事件过程:Private Sub Form_Load()List1.Additem"Beijing"List1.Additem "Tianjin"List1.Additem"Shanghai"Text1.Text= ""End SubPrivate Sub List1_DblClick()x=List1.TextPrint X+Text1.TextEnd Sub程序运行后,在文本框中输入"China",然后双击列表框中的"Shanghai",则输出结果为________。

A.China BeijingB.China TianjinC.China ShanghaiD.Shanghai China2、在窗体上画一个列表框和一个文本框,然后编写如下两个事件过程;Private Sub Form_Load()List1.AddITem"357"List1.AddITem"246"List1.AddITem"123"List1.AddITem"456"Text1.Text=""End SubPrivate Sub List1.DblClickOM=List1.TextPrint M+Text1.TextEnd Sub程序运行后,在文本框中输入“123”,然后双击列表框中的“456”,则输出结果为________。

A.1245B.456123C.123456D.03、在列表框中当前被选中的列表项的序号是由下列________属性表示的。

A.ListB.IndexC.ListlndexD.False4、在Visual Basic中,组合框是文本框和________特性的组合。

A.复选框B.标签C.列表框D.目录列表框5、为组合框Combol增加一个数据项"计算机",下列命令正确的是________bol.Text="计算机"bol.ListIndex="计算机"bol.Addltem "计算机"bol.ListCount="计算机"6、执行了下面的程序后,组合框中数据项的值是________。

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. 以下程序的输出结果是______。

VB6.0总复习题

VB6.0总复习题

VB6.0总复习题一、基本概念1、在设计窗体时双击窗体的任何地方,可以打开的窗口是(代码窗口,而F4键不能打开)2、以下说法正确的是(一个窗体对应一个窗体文件)。

工程文件的扩展名是.vbq3、设置窗体最小化时的图标可通过(Icon )属性来实现p18表2-14、如果要实现当鼠标暂时停留在一命令按钮上时,显示提示信息,应设置此命令按钮的(ToolTipText)属性。

5、如果要实现窗体从内存中卸载,其实现的方法是(UnLoad)。

6、当文本框的MaxLength属性值取(0 )时,该文本框能容纳的字符数最多。

7、焦点:使文本框获得焦点的方法是(SetFocus)。

8、当运行程序时,系统自动执行启动窗体的某个事件过程。

这个事件过程是(GotFocus)GotFocus 事件过程用以指定当控件或窗体首次接收焦点时发生的操作。

9、若使用Textbox控件时,为对用户输入的内容立即进行检查,就对Textbox控件的(Change)事件编程。

10、所有控件都具备的属性是(Name)。

11、命令按钮对象不支持DblClick事件。

12、下列4个选项中,不是VB数值常量的是(2E1.4 )。

13、变量名不合法的是(M-d),合法的是(k_name )14、表达式"321" & 100 + "200"的值是("321300”)。

15、VB6.0中执行时出现错误的是(x = Sqr(-4)x = Exp(800))16、Sgn(x)的值为-1,则x的值是(小于0的数)。

// Sgn(x): 返回自变量x的符号,即当x为负数时,返回-1;当x为0时,返回0;当x为正数时,返回117、VB的叙述中正确的是(数组下标的下界在默认情况下从0开始)。

18、VB的叙述中不正确的是(使用ReDim语句可以改变数组的类型)。

19、在VB中声明了Variant变量,但未赋值,则系统默认其初始化值为(Empty)p40。

vb6.0练习题及答案

vb6.0练习题及答案

一、选择题一、选择题1.在设计应用程序时,可以查看到应用程序工程中的所有部分的窗口是(.在设计应用程序时,可以查看到应用程序工程中的所有部分的窗口是( )。

A.窗体设计.代码C.属性D.工程资源管理器窗口.工程资源管理器窗口 >> 答案:d 2.窗体的Load事件的触发时机是(事件的触发时机是( )。

A.用户单击窗体时B.窗体被加载时C.窗体显示之后D.窗口被卸载时.窗口被卸载时 >> 答案:b答案:b3.与传统的程序设计语言相比,Visual Basuc最突出的特点是(最突出的特点是( )。

A.结构化程序设计B.程序开发环境C.事件驱动编程机制D.程序调试技术.程序调试技术答案:C 4.VB6.0集成开发环境的主窗口不包括(集成开发环境的主窗口不包括( )。

A.标题栏.状态栏 D.工具栏.工具栏.标题栏 B.菜单栏.菜单栏 C.状态栏答案:c 5.如果对象的名称为Mytext,而且对象有一个属性Text,那么在代码中引用该属性的正确格式是( )。

格式是(A.Text.Mytext B.Mytext.text C.Mytext.(Text)D.Mytext*Text 答案:b 6.下列可以激活属性窗口的操作是(.下列可以激活属性窗口的操作是( )。

A.用鼠标双击窗体的任何部位命令 C.按Ctrl+F4 用鼠标双击窗体的任何部位 B.执行“工程”菜单中的“属性窗口”命令D.按F4键答案: b d 答案:7.假定已在窗体上画了多个控件,并有一个控件是活动的,为了在属性窗口中设置窗体的属性,预先应制造的操作是( )。

属性,预先应制造的操作是(A.单击窗体上没有控件的地方.不执行任何操作 D.双击窗体.单击任一个控件 C.不执行任何操作.单击窗体上没有控件的地方 B.单击任一个控件的标题栏的标题栏答案:a 8.如果在文本框中键入字符时,应设置文本框的(()属性。

只显示某个字符,如星号(*),应设置文本框的如果在文本框中键入字符时,只显示某个字符,A.Caption B.PasswordChar C.Text D.Char 答案:b 9.如果想让文本框中的内容在运行时不能编辑,需将文本框的(.如果想让文本框中的内容在运行时不能编辑,需将文本框的( )属性设置为True。

[终稿]vb6.0实验二习题与答案

[终稿]vb6.0实验二习题与答案

实验二专业_____________ 班级________年级________姓名______________学号_______________一、实验目的1、认识各种数据类型及其常量的描述2、熟悉各种数据类型变量的命名及变量的定义3、熟悉各类函数4、熟悉各种数据类型的运算符及其运算等级5、能正确书写VB表达式二、实验内容1、数据类型及表示法1)创建窗体,在From_Click输入:Dim a As Bytea = 256Print a并运行,并分析结果。

超出范围,出错2)把上述程序改为:Dim a As Integera = -32768Print aa = -32768 - 1Print a并运行,并分析结果。

超出范围,出错3)把上述程序改为:Dim a As Integer, b As Integera = &O177777b = &O100000Print a, b -1,-32768,&O表示8进制并运行,并分析结果。

4)把上述程序改为:Dim a As Integer, b As Integera = &HFFFFb = &H8000Print a, b 结果同上,&H表示16进制并运行,并分析结果。

5)把上述程序改为:Const pi As Single = 3.14pi = 5.9Print pi并运行,并分析结果。

常量Pi重复赋值,出错6)把上述程序改为:Dim a As String, b As Datea = -32768b = #4/21/1977 10:23:30 AM#Print a, b并运行,并分析结果。

正确,但a是字符型2、VB变量、函数与表达式1)以下(④⑨⑩⑾)是不合法的常量。

① False ② #2009-12-26# ③ const pi=3.14 ④ 2009-12-26⑤ True ⑥ "1999-12-1" ⑦ 100 ⑧ "AB" ⑨10^2 ⑩1/2⑾ &032768 ⑿ &H327682)用(Static)语句声明的变量Z是静态变量。

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

一、选择题
1.在设计应用程序时,可以查看到应用程序工程中的所有部分的窗口是()。

A.窗体设计.代码C.属性D.工程资源管理器窗口>>
答案:d
2.窗体的Load事件的触发时机是()。

A.用户单击窗体时B.窗体被加载时C.窗体显示之后D.窗口被卸载时>>
答案:b
3.与传统的程序设计语言相比,Visual Basuc最突出的特点是()。

A.结构化程序设计B.程序开发环境C.事件驱动编程机制D.程序调试技术
答案:C
4.VB6.0集成开发环境的主窗口不包括()。

A.标题栏B.菜单栏C.状态栏D.工具栏
答案:c
5.如果对象的名称为Mytext,而且对象有一个属性Text,那么在代码中引用该属性的正确格式是()。

A.Text.Mytext B.Mytext.text C.Mytext.(Text)D.Mytext*Text
答案:b
6.下列可以激活属性窗口的操作是()。

A.用鼠标双击窗体的任何部位B.执行“工程”菜单中的“属性窗口”命令C.按Ctrl+F4 D.按F4键
答案:b d
7.假定已在窗体上画了多个控件,并有一个控件是活动的,为了在属性窗口中设置窗体的属性,预先应制造的操作是()。

A.单击窗体上没有控件的地方B.单击任一个控件C.不执行任何操作D.双击窗体的标题栏
答案:a
8.如果在文本框中键入字符时,只显示某个字符,如星号(*),应设置文本框的()属性。

A.Caption B.PasswordChar C.Text D.Char
答案:b
9.如果想让文本框中的内容在运行时不能编辑,需将文本框的()属性设置为True。

A.Locked B.MultiLine C.TabStop D.Visible
答案:a
10.对于定时器(Timer)控件,设计其定时是否开启的属性是()。

A.Index B.Tag C.Enabled D.Left
答案:c
11.要在窗体Form1内显示“myfrm”,使用的语句是()。

A.Form.Caption=“myfrm”B.Form1.Caption=“myfrm”C.Form1.Print=“myfrm”D.Form.Print=“myfrm”
答案:b
12.对象的性质和状态特性称为()。

A.事件B.方法C.属性D.类
答案:c
13.下列正确的赋值语句是()。

A.x+y=20 B.y=x+20 C.3x=y D.s=π*r*r
答案:b
14.当使用上下文相关的帮助时,选择要帮助的内容,然后按()键,就可出现MSDN窗口直接显示所需的帮助信息。

A.Help B.F10 C.ESC D.F1
答案:d
15.将调试通过的工程经“文件”菜单的“生成.exe.文件”编译成名.exe后,就该可执行文件放到其它机器上不能运行的主要原因是()。

A.运行的机器上无VB系统B.缺少.frm 文件C.该可执行文件有病毒D.以上原因都不对
答案: d
二、填空题
1.当进入VB集成开发环境后,发现没有显示“工具箱”窗口,应选择( )菜单的( )选项,使“工具箱”窗口显示。

答案:视图工具箱
2.在VB中,事件过程名由() 和() 构成。

答案:Sub 事件名称()
3.工程文件的扩展名是() ,窗体文件的扩展名是() 。

答案:vbp .frm
4.对象是代码和数据的集合,例如,Visual Basic中的() 、() ()、等都是对象。

答案:窗体文本框命令按钮
5.对象的方法应用于() 。

当对象不需要任何参数并且也没有返回值时,调用对象的方法的格式为() 。

例如,对窗体Form1使用Show方法,应写成() 。

答案:程序代码中对象名.方法名Form1.Show
6.要使文本框显示滚动条,需要将其() 属性设置为() 。

答案:Multiline True
7.欲设置定时器的时间间隔为4秒,则属性的Interval属性设置为()。

答案:4000
8.要使标签框的大小随Caption属性作自动调整,应将()属性设置为()。

答案:AutoSize True
9.通过()可以在设计时直观地调整窗体在屏幕上的位置。

答案:StartUpPosition
10.要想在代码中给名为txtshow的文本框赋予文本:GOOD WORK!时,应当编写的语句是()。

答案:txtshow.Text=”GOOD WORK !”
11.若命令按钮的名称为Cmdopen,程序要求单击以上命令按钮时,打开一个窗口frm1时,请对以下事件过程填空。

Private Sub Cmdopen()()End Sub
答案:Click( ) frm1.Show
12.事件就是在对象上所方式的事情,Visual Basic中的事件如()()()等。

一个对象响应的事件可以有()个,用户不能建立新的事件。

事件过程是指()。

假设一个事件过程如下:Private Sub cmd1_Click( ) Form1.Caption=”VB示例”End Sub 则响应该过程的对象名是(),事件名是()。

答案:Click事件DbClick事件Load事件多由事件来驱动应用程序执行一段VB代码cmd1 cmd1_Click( ) True
13.对象的方法应用于()。

当对象不需要任何参数并且也没有返回值时,调用对象的方法的格式为()。

例如,对窗体Form1使用Show方法,应写成()。

答案:程序代码中对象名.方法名Form1.Show
14.为了在编写代码时能自动进行语法检查,必须执行()菜单中的()命令,打开()对话框,然后选择“编辑器”选项卡中的()。

答案:“工具”“选项”“选项”“自动语法检测”
15.定时器控件可识别的事件是(),发生该事件的时间间隔由定时器的()属性设置,其单位为()。

答案:Timer Interval 毫秒
三、简答题
1.什么是可视化编程和事件驱动?
答案:编程人员只需针对某个事件编写程序代码称为可视化编程。

应用程序是在响应不同的事件时执行不同的代码片段称为事件驱动。

2.对象、属性、事件和方法指的关系任何?
答案:窗体和控件是创建应用程序所使用的对象,方法是对象的动作,事件是对象的响应,属性可看作对象的性质。

3.简述事件驱动编程机制与传统编程方式的不同。

答案:传统编程方式是结构化程序设计,它从系统的功能入手,按照工程的标准和严格的规范将系统分解为若干功能模块,系统是实现功能模块的函数和过程的集合。

事件驱动编程则是从所处理的数据入手,以数据为中心而不是以服务(功能)为中心来描述系统。

它把编程问题视为一个数据集合,数据相对于功能而言,具有更强的稳定性。

事件驱动编程与传统编程方式相比,最大的区别在于:前者首先关系关心的是所要处理的数据,而后者首先关心的是功能。

4.简述事件驱动的工作过程。

答案:答:事件驱动的工作过程为: 1.启动应用程序,装载和显示窗体。

2.窗体或窗体上的控件等待事件的发生。

3.当某个事件发生后,执行其对应的事件过程代码。

4.重复执行第2和第3步,直到遇到End语句或单击结束按钮停止程序的运行。

四、程序设计题
1.在窗体上添加一个文本框和两个命令按钮,并把两个命令按钮的标题分别色绘制为“隐藏文本框”和“显示文本框”。

当单击第一个命令按钮时,文本框消失;而当单击第二个命令按钮时,文本框重新出现,并在文本框显示“VB程序设计”(字体大小为16)程序运行界面如图1所示。

图一
答案:程序代码:Private Sub Command1_Click() Text1.Visible = False End Sub Private Sub Command2_Click() Text1.Visible = True Text1.Text = "VB程序设计" End Sub
2.设计一个计算程序。

该程序用户界面如图2所示,由四个文本框:文本框1(text1)、文
本框2(text2)、文本框3(text3)、文本框4(text4),和三个命令按钮:命令按钮1(command1)、命令按钮2(command2)、命令按钮3(command3)组成。

程序运行后,用户按清除按钮,则清除文本框中显示的内容,按计算按钮,则计算三科平均成绩。

单击退出按钮则退出。

图二
答案:程序代码:Private Sub Command1_Click() Text1.Text = "" Text2.Text = "" Text3.Text = "" Text4.Text = "" End Sub Private Sub Command2_Click() Text4.Text = Trim(Str((Val(Text1.Text) + Val(Text2.Text) + Val(Text3.Text)) / 3)) End Sub Private Sub Command3_Click() End End Sub。

相关文档
最新文档