窗体、标签、文本框、命令按钮作业一参考

作业：

例8（保存文件名为2.frm ,2.vbp）

由于本题未说明标签和文本框中显示的字号大小，故结果无统一要求，一般情况下用默认的字号即可。

注意：更改两个文本框的名称属性T1，T2

代码为：

Private Sub T1_Change()

T2.Text = T1.Text

End Sub

例10（保存文件名为3.frm ,3.vbp）

运行程序出现如下界面：

拖相应控件（标签label1,命令按钮到界面上），设置label1的caption属性为“努力学习”，三个commandButton 的caption属性为相应值；且command2的Enabled属性值为False.

单击command1,效果如下图：

Private Sub Command1_Click()

Label1.Caption = "报效祖国"

Command2.Enabled = True

Command2.SetFocus

Command1.Enabled = False

End Sub

注意，两条蓝色代码不能颠倒，先可用才能获得焦点。其

他两行位置随意。下同。

单击command2,效果如下：

Private Sub Command2_Click()

Label1.Caption = "努力学习"

Command1.Enabled = True

Command1.SetFocus

Command2.Enabled = False

End Sub

结束按钮的代码为:End

第5题（保存文件名为5.frm ,5.vbp）在名称为Form1的窗体中

建立一个名称为Cmd1，标题为"显示"的命令按钮，如图2-1所示。要求程序运行后，如果单击"显示"按钮，则执行语句Form1.Print "显示"；如果单击窗体，则执行语句Form1.Cls。

图2-1

此题需要说明的是：根据运行同学们学到一新知识—即form1.cls 的功能为清除窗体上使用print方法输出的信息。Cls为窗体的一种方法。（对象名.方法名）

第6题（保存文件名为6.frm ,6.vbp）在名称为Form1的窗体上

建立一个名称为Text1的文本框，一个名称为Cmd1，标题为"输出"的命令按钮，如图4-1所示。要求程序运行后，在文本框输入几个字符，单击"输出"

按钮，则在窗体上显示文本框中的文字。

图4-1

此题大家注意，Text1的Text属性值初始为“空”，运行程序时输入字符，完成相应功能。此题与第7题均考核print方法。

第7题（保存文件名为7.frm ,7.vbp）在名称为Form1的窗体上

建立一个名称为Cmd1，标题为"显示"的命令按钮，编写适当的事件过程。

程序运行后，如果单击"显示"命令按钮，则在窗体上显示"等级考试"，如图6-1所示。程序中不能使用任何变量，直接显示字符串。

图6-1

第9题（保存文件名为9.frm ,9.vbp）在窗体Form1上画出一个

文本框，名称为Txt1，程序运行时，在文本框中输入字符，文本框中的字符将赋值到窗体的标题栏中。注意，本程序代码中不得使用任何变量。程序运行时的窗体界面如图46-1所示。

图46-1

此题窗体的caption属性初值不需要更改，文本框的Text属性初值

设为空。

功能代码放哪里？运行程序，向文本框中输入字符，即不断更改文本框的内容，触发了Txt1的Change事件。

功能代码是什么？使得窗体的标题栏中文本信息随着文本框中输入的内容而改变，即form1.caption的值应为txt1.text,围绕对象名.属性=值

Private Sub Txt1_Change()

Form1.Caption = Txt1.Text

End Sub

第13题（保存文件名为13.frm ,13.vbp）

注意：此题的第3）需要在属性窗口中将 command1的visible属性设置为False

第15题（保存文件名为15.frm ,15.vbp）

Private Sub Command1_Click()

Label1.Visible = False

Text1.Visible = False

Form1.Print Text1.Text

End Sub

第16题（保存文件名为16.frm ,16.vbp）

Private Sub C1_Click()

Form1.BackColor = &HFF&

End Sub

最后两题完全做对同学不多，虽然部分同学实现了效果，但代码的通用性差，故请所有同学注意：第17题（保存文件名为17.frm ,17.vbp）

解答：标签的位置发生变化，属性中描述位置的为left,top,考虑到标

签的容器为窗体，故left,top属性值为标签相对于窗体（窗体小点区域的左上角为坐标原点，小点顶端为X轴，左边界为Y轴）

Private Sub Form_Click()

Label1.Top = 0

Label1.Left = Form1.Width - Label1.Width

End Sub

图4-2 图4-3

按钮一与按钮二大小完全相同，否则没办法重合。

有的同学是这样的思路：让按钮一上的文本内容变为按钮二，而让按钮二的visible属性变为false,能这样做的同学是花了心思思考的，但注意此方法是消极的，不可取。

思考：

Cmd2与cmd1重合意味着cmd2的位置发生了变化，而描述位置的属性为Left,Top，故无论cmd1的left，Top属性值是多少，只要将该值设置为cmd2的相应属性值即可。

下面的做法是错误的：

先观察cmd1的属性窗口中left和Top是多少（假设为480,1200）,然后写代码cmd2.left=480 cmd2.top=1200

你的程序代码并不具备通用性，换个地方画cmd1，你的代码是不是又要变了？

方法一：

Private Sub Cmd1_Click()

Cmd2.Left = Cmd1.Left

Cmd2.Top = Cmd1.Top

End Sub

自学了P17的同学可能会用这种方法：

Private Sub Cmd1_Click()

Cmd2.Move Cmd1.Left, Cmd1.Top 注意绿色部分不可写数值End

Sub

X

vb试题及答案

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. 标签框的边框，由属性的设置值决定。

VB实验报告(含答案)

实验报告 课程名称_程序设计基础Visual Basic_ 班级______ _____＿姓名_____ ____

实验一 VB环境和创建一个简单的VB程序 一．实验目的： 1.了解VB系统对计算机软件、硬件的要求。 2.掌握启动和退出VB的方法。 3.了解和使用VB集成开发环境各窗口、菜单的一般功能。 4.熟悉建立、编辑、运行、保存一个简单的VB应用程序的全过程。 5.了解文本框、标签框、命令按钮的构造及其属性、事件和方法。 二．实验内容： 1．设计一个简单的应用程序，要求在窗体上画一个文本框、一个标签和两个命令按钮编一程序，并把命令按钮分别设置为”显示”和”清除”。程序运行后，单击”显示”按钮，在文本框中输出一行信息；单击”清除”按钮，则清除文本框中的内容，运行界面如图所示。 图实验1-1 运行界面 三．实验结果：对象属性设置 对象属性属性值说明 caption我的第一个vb程序窗体Form1 caption请输入姓名标签Label1 text““文本框Text1 caption显示命令按钮Command1 caption清除命令按钮Command2 四．实验思考： 1.标签label控件设置的属性代码有哪些 =“请输入姓名” =24 =True 2.两个按钮所使用的是什么事件代码分别是什么 Private Sub Command1_Click() =“姓名”

实验二简单程序设计数据类型及常用内部函数的简单应用 一．实验目的： 1．掌握Visual Basic数据类型的基本概念。 2．掌握用Visual Basic的各种运算符及表达式。 3．学习使用Visual Basic内部函数和数据输入、输出方法。 4．掌握命令按钮、文本框和标签。 5．设计顺序程序。 二．实验内容： 1．编写一个华氏温度和摄氏温度之间的转换程序，如图2-2所示,要求用inputbox函数输入华氏温度，用msgbox输出转换后的摄氏温度。转换公式是：C= 5 / 9(F - 32)。F为华氏温度，C为摄氏温度。 2.用三种除法运算（/ 、\、Mod）做计算。 要求:在窗体上画五个标签、五个文本框和一个命令按钮，如图2-2所示。程序运行后，在第一个文本框中输入被除数，在第二个文本框中输入除数，然后单击命令按钮，即可得到三种不同的相除结果。 图2-1 图2-2 三．实验结果：对象属性设置 1.温度转换 对象属性属性值说明 Form1Caption Inputbox与msgbox窗体

VB题库

作业一简单VB程序设计 1.在VB程序设计中，响应对象的外部动作称为_____，而对象可以执行的动作或对象本身的行为则称为_____。 （A）方法，事件（B）事件，方法 （C）属性，方法（D）过程，事件 2.在VB6.0集成开发环境中不能完成的工作是_____。 （A）输入和编辑源程序（B）编译生成可执行程序 （C）调试运行程序（D）自动查找并改正程序中的错误 3.VB6.0集成开发环境不包括_____。 （A）DOS界面窗口（B）窗体窗口 （C）代码窗口（D）属性窗口 4.当运行程序时，系统自动执行启动窗体的_________事件过程。 （A）Load （B）Click （C）Unload （D）GotFocus 5.用一个程序段对一对象被单击(或双击)作出响应，从而实现指定的操作，称为______。（A）可视画化程序设计（B）事件驱动编程机制 （C）过程化程序实际方法（D）非过程化程序设计语言 6.Visual Basic有三种工作模式，它们分别是______模式。 （A）设计、编译和运行（B）设计、运行和中断 （C）设计、运行和调试（D）编译、运行和调试 7.Visual Basic的一个应用程序至少包含一个_______文件，该文件存储窗体上使用的所有控件对象和有关的_______、对象相应的_______过程和_______代码。 （A）模块、方法、事件、程序 （B）窗体、属性、事件、程序 （C）窗体、程序、属性、事件 （D）窗体、属性、事件、模块 8.在VB集成环境创建VB应用程序时，除了工具箱窗口、窗体中的窗口、属性窗口外，必不可少的窗口是______。 （A）窗体布局窗口（B）立即窗口 （C）代码窗口（D）监视窗口 9.保存新建的工程时，默认的路径是_________。 （A）My Documents （B）VB98 （C）\ （D）Windows 10.若要使标签控件显示时不覆盖其背景内容，要对______属性进行设置。 （A）BackColor （B）BorderStyle （C）ForeColor （D）BackStyle 11.文本框没有______属性。 （A）Enabled （B）Visible （C）BackColor （D）Caption 12.不论何控件，共同具有的是______属性。 （A）Text （B）Name （C）ForeColor （D）Caption 13.要使Form1窗体的标题栏显示"欢迎使用VB"，以下______语句是正确的。 （A）Form1.Caption=“欢迎使用VB” （B）Form1.Caption='欢迎使用VB '

VB程序设计练习题及参考答案

Visual Basic程序设计练习题1．Visual Basic是一种面向对象的可视化程序设计语言，采取了A的编程机制。 A．事件驱动B．按过程顺序执行C．从主程序开始执行D．按模块顺 序执行2．在Visual Basic中最基本的对象是C，它是应用程序的基石，是其他控件的容器。 A．文本框B．命令按钮C．窗体D．标签3．多窗体程序是由多个窗体组成。在缺省情况下，VB在应用程序执行时，总是把B 指定为启动窗体。 A．不包含任何控件的窗体B．设计时的第一个窗体 C．包含控件最多的D．命名为Frm1的窗体 4．若有程序代码如下： text1.text="Visual Basic" 则：text1，text和"V isual Basic" 分别代表C。 A．对象，值，属性B．对象，方法，属性 C．对象，属性，值D．属性，对象，值 5．Visual Basic是一种面向对象的程序设计语言，A不是面向对象系统所包含的三要素。 A．变量B．事件C．属性D．方法6．在VB集成环境创建VB应用程序时，除了工具箱窗口、窗体中的窗口、属性窗口外，必不可少的窗口是C。 A．窗体布局窗口B．立即窗口C．代码窗口D．监视窗口7．保存新建的工程时，默认存放的位置是B。 A．My Documents B．VB98 C．\ D．Windows 8．若要使标签控件显示时不覆盖其背景内容，要对D属性进行设置。 A．BackColor B．BorderStyle C．ForeColor D．BackStyle 9．若要使命令按钮不可操作，要对A属性设置。 A．Enabled B．Visible C．BackColor D．Caption 10．文本框没有D属性。 A．Enabled B．Visible C．BackColor D．Caption 11．不论何控件，共同具有的是B属性。 A．Text B．Name C．ForeColor D．Caption 12．要使Form1窗体的标题栏显示“欢迎使用VB”，以下D语句是正确的。 A．Form1.Caption = “欢迎使用VB” B．Form1.Caption= ' 欢迎使用VB ' C．Form1.Caption = 欢迎使用VB D．Form1.Caption = "欢迎使用VB" 13．要使某控件在运行时不可显示，应对B属性进行设置。 A．Enabled B．Visible C．BackColor D．Caption 14．当运行程序时，系统自动执行启动窗体的A事件过程。 A．Load B．Click C．Unload D．GotFocus

编程题题目及答案

编程题目及答案 第二章 1．在窗体上添加3 个命令按钮（“显示”、“清除”与“结束”）。单击“显示”按钮时，将在窗体上显示唐诗“静夜思”，如图2-1 所示，单击“清除”按钮时，将清除所显示的内容，单击“结束”按钮时，结束程序的运行。 2．在窗体上添加5 个标签、4 个文本框和2 个命令按钮。程序运行时，通过文本框输入一个总秒数，单击“计算”按钮，总秒数将传换成小时、分钟和秒数并在文本框中输出（运行界面如图2-2 所示） 图2-1 图2-2 3．在窗体上添加3 个标签，3 个文本框和2 个命令按钮。程序运行时，在第1 个文本框中输入文字时，在另外两个文本框中显示相同的内容，但显示的字号和字体不同。单击“清除”按钮则可清除3 个文本框中的内容（运行界面如图2-3 所示）。 4．设计计算语文、数学、英语这三门课程总成绩和平均分的程序，利用文本框做数据的输入和输出（运行界面如图2-4）所示。

图2-3 图2-4 5．单击窗体，弹出一个输入框，用户输入一个两位数（如36），交换个位数和十位数的位置，并把处理后的数（63）用消息框显示给用户。 6．在窗体上添加2 个文本框（它们的初始值均为0）、4 个命令按钮（标题分别为“+”“-”“*”“/”）和1 个标签（初始标题为空）。要求在2 个文本框内输入2 个数字，单击“+”（或“-”、“*”、“/”）按钮时，标签将显示两数相加（或减、乘、除）的结果。 7．某门课程的考试成绩分为笔试和机试成绩，其中笔试占60％，机试占40％，利用输入框分别输入该课程的笔试和机试成绩，用消息框输出其总成绩。 8．设计一个电子计时器，以秒为单位计时，单击“计时开始”按钮计时开始。此时“计时开始”按钮变灰，“停止计时”按钮可用，在标签内显示经过的秒数。单击“停止计时”按钮，计时结束，弹出消息框提示“您的记录是？秒”（这里的？代表标签最后显示的秒数值）。

作业说明1(参考答案)

. 下列叙述中正确地是（） .只有窗体才是中地对象.只有控件才是中地对象资料个人收集整理，勿做商业用途.窗体和控件都是中地对象.窗体和控件都不是中地对象资料个人收集整理，勿做商业用途 . 以下不能运行工程地操作是 ..执行"运行"菜单中地"启动"命令.单击工具栏中地"启动"命令 .按下键.按下键 .下列关于面向对象程序设计地叙述不正确地是 .对象具有属性、方法等特性 .对象之间地通信产生了消息 .一个对象是一个软件构造块，它包含数据与相关地操作 .对象地属性不能被改变 . 当窗体被加载时运行，发生地事件是（） ．．．． . 用于程序设计地控件在（） .工程窗口中.工具箱中 .工具菜单中.工具栏上 . 假定窗体地名称(属性)为，则把窗体地标题设置为“ ”地语句为（）资料个人收集整理，勿做商业用途 . " " . " " . " " . " "资料个人收集整理，勿做商业用途 、在中，下面叙述中错误地是. ）一个工程可以包括多种类型地文件 ）应用程序既能以编译方式执行，也能以解释方式执行 ）程序运行后，在内存中只能驻留一个窗体 ）对于事件驱动型应用程序，每次运行时地执行顺序可以不一样 、刚建立一个新地标准工程后，不在工具箱中出现地控件是. ）单选按钮）图片框）普通对话框(通用框) ）文本框 、下列不是中地事件. ）））） 、在设计阶段，当鼠标双击窗体上地某个控件时，所打开地窗口是 . ）工程资源管理窗口）工具箱窗口）代码窗口）属性窗口 、为了把焦点移动某个指定地控件，所使用地方法是. ）））） 、在中，能够改变窗体边框类型地属性是. ) ) ) )资料个人收集整理，勿做商业用途 、在中，标准工具箱中地控件. )数目是固定不变地)包含了所有控件 )数目可以增加或减少)在窗体建立对象时不一定被使用 、下列不能打开代码窗口地操作是（） .双击窗体上地某个控件.双击窗体 .单击视图菜单中地“代码窗口” .单击窗体或控件 、下列说法中正确地保存一个应用程序，应当是（） .只保存窗体模块文件() .只保存工程文件() .分别保存工程文件和标准模块文件()

VB第八章,窗体习题

VB第八章,窗体习题 7 、要在窗体上显示图片，需设置窗体的( ) 属性。 A ) Caption B ) Icon C ）Picture D ）ControlBox 设a=10 ，b=5 ，c =1 ，执行语句Print a > b > c 后，窗体上显示的是（）。 A ）True B ）False C ）1 D ）出错信息 结束当前程序的语句是（）。 A、quit B、exit C、end D、sub 5、要改变窗体的标题时，应当在属性窗口中改变的属性是（）。 A、Caption B、Name C、Text D、Label 6、窗体能够响应的事件是（）。 A、ActiveForm B、Drive C、Load D、Change 7、能显示窗体的方法是（）。 A、Visible

B、Show C、New D、Open 双击窗体中的对象后，VB将显示的窗口是（）。 A、工程窗口 B、工具箱 C、属性窗口 D、代码窗口 10、VB是一种面向对象的程序设计语言，构成对象的三要素是（）。 A、属性、事件、方法 B、控件、属性、事件 C、窗体、控件、过程 D、窗体、控件、事件 如果要把某个图片作为程序窗体的背景，下列方法最合理的是（）。 A、直接修改窗体的Picture属性实现插入图片。 B、在窗体中插入Image控件，再修改该控件的Picture属性插入图片。 C、在窗体中插入PictureBox控件，再修改该控件的Picture属性插入图片。 D、选择“插入”→“图片”菜单命令实现。 卖多文档MDI 纵时，父窗体为一切子窗体提供劳动空间，卖子窗体最小化时，它的图标显如今（A ）-A. 形态栏B. 父窗体中C. DblClick D. MouseMove 把控件移到相应的位置，并能改变其大小的方法是（）。 A．Cls B．Move C．format D．Tab 、下列叙述正确的是（） A．对象是包含数据又包含对象数据进行操作的方法的物理实体 B．对象的属性只能在属性窗口中设置

VB习题1-2含答案

习题 1 二、单选题 1．VB是用于开发________环境下应用程序的工具。 A．DOS或Windows B．DOS C．Windows D．UNIX 2．VB采用了________的编程机制。 A．可视化B．事件驱动C．面向过程D．面向对象3．窗体编辑器的主要功能是________。 A．设计窗体的外观B．编写源程序代码 C．设计用户界面D．设置对象属性4．VB是________的应用程序的开发工具。 A．8位B．16位C．32位D．64位5．VB集成开发环境开发的应用程序不适宜的运行环境是________。 A．Windows32 B．Windows 9X C．WindowsNT D．Windows2000 6．VB共有三个版本，按功能从弱到强的顺序排列应是________。 A．学习版、专业版和工程版B．学习版、工程版和专业版 C．学习版、专业版和企业版D．学习版、企业版和专业版7．VB集成开发环境有三种工作模式，工作模式显示在________。 A．状态栏的最左方B．状态栏的最右方 C．状态栏的中括号内D．标题栏的中括号内8．下面不属于VB集成开发环境三种工作模式之一的是________。 A．设计状态B．编写代码状态 C．运行状态D．中断状态 9．不能打开代码窗口的操作是________。 A．双击窗体设计器的任何地方 B．按下F4键 C．单击工程窗口中的“查看代码”按钮 D．选择“视图”下拉菜单中的“代码窗口” 10．工程文件的扩展名是________。 A．.frm B．.vbp C．.bas D．.frx 11．窗体文件的扩展名是________。 A．.frm B．.vbp C．.bas D．.frx 12．标准模块文件的扩展名是________。 A．.frm B．.vbp C．.bas D．.vbg 13．VB集成开发环境可以________。 A．编辑、调试、运行程序，但不能生成可执行程序 B．编辑、生成可执行程序、运行程序，但不能调试程序 C．编辑、调试、生成可执行程序，但不能运行程序 D．编辑、调试、运行程序，也能生成可执行程序

窗体--选择题答案

1：在“窗体视图”中显示窗体时，窗体中没有记录选定器，应将窗体的“记录选定器”属性值设置为 A、是 B、否 C、有 D、无 2：如果在文本框内输入数据后，按Enter键或按Tab键，输入焦点可立即移至下一指定文本框，应设置的属性是______。 A、"制表位"属性 B、"Tab键索引"属性 C、"自动Tab键"属性 D、"Enter键行为"属性 3：在教师信息输入窗体中，为职称字段提供"教授"、"副教授"、"讲师"等选项供用户直接选择，最合适的控件是______。 A、标签 B、复选框 C、文本框 D、组合框 4：在学生表中用"照片"字段存放相片，当使用向导为该表创建窗体时，照片字段使用的默认控件是______。 A、图形 B、图像

C、绑定对象框 D、未绑定对象框 5：下列属性中，属于窗体的"数据"类属性的是______。 A、记录源 B、自动居中 C、获得焦点 D、记录选择器 6：在Access中为窗体上的控件设置Tab键的顺序，应选择"属性"对话框的______。 A、"格式"选项卡 B、"数据"选项卡 C、"事件"选项卡 D、"其他"选项卡 7：若在"销售总数"窗体中有"订货总数"文本框控件，能够正确引用控件值的是______。 A、Forms.[销售总数].[订货总数] B、Forms![销售总数].[订货总数] C、Forms.[销售总数]![订货总数]: D、Forms![销售总数]![订货总数] 8：主窗体和子窗体通常用于显示多个表或查询中的数据，这些表或查询中的数据一般应该具有的关系是______。 A、一对一 B、一对多

C、多对多 D、关联 9:能够接受数值型数据输入的窗体控件是______。 A、图形 B、文本框 C、标签 D、命令按钮 10:下列可用于创建窗体或修改窗体的视图是______。 A、设计视图 B、窗体视图 C、数据表视图 D、透视表视图 11：设计窗体时，可通过设置命令按钮的一个属性来指定按钮上要显示的文字，该属性是______。 A、名称 B、标题 C、格式: D、图像 12：在窗体设计时，要设置标签文字的显示格式应使用______。 A、格式工具栏 B、字段列表框 C、工具箱

VB题目及答案(2)

十五次作业 1. 在名为Form1的窗体上建立一个名为Text1的文本框，将MultiLine属性设置为True，ScrollBars属性设置为2。同时建立两个名称分别为Cmd1和Cmd2的命令按钮，标题分别为Read和Save(如下图所示)。 要求程序运行后，如果单击Read按钮，则读入in1.txt文件中的100个整数，放入一个数组中(数组下界为1)，同时在文本框中显示出来；如果单击Save按钮，则计算数组中大于或等于l并且小于400的所有数之和，把求和结果在文本框text1中显示出来，同时把计算结果存入考生文件夹中的文件out1.txt中。程序中对文件的操作统一使用相对路径；窗体文件名为execise1.frm，工程文件名为execise1.vbp，计算结果存入outl．txt。 Dim b%(1 To 100) Private Sub Command1_Click() Dim i% i = 1 Open App.Path + "\in1.txt" For Input As #1 Do While Not EOF(1) Input #1, b(i) Text1 = Text1 + Space(2) & b(i) i = i + 1 Loop Close #1 End Sub Private Sub Command2_Click() Dim sum! For i = 1 To 100 If b(i) < 400 Then sum = sum + b(i) Next i Text1 = sum Open App.Path + "\out1.txt" For Output As #2 Write #2, Text1 Close #2

vb考题 (1)

VB 期末复习 一、选择题 (1) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Move 500，500 End Sub 程序运行后，单击命令按钮，执行的操作为 A) 命令按钮移动到距窗体左边界、上边界各500的位置 B) 窗体移动到距屏幕左边界、上边界各500的位置 C) 命令按钮向左、上方向各移动500 D) 窗体向左、上方向各移动500 (1) B (2) 在窗体上有若干控件，其中有一个名称为Text1的文本框。影响Text1的Tab 顺序的属性是 A) TabStop B)Enabled C) Visible D)TabIndex (2) D (3) 下列语句合法的是_____ A x + y = 2 B x > 2 = y C x = y > 2 D x = y++ 参考答案： C (4) 在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为 A) For i=0 To List1.ListCount-1 …… Next C) For i=1 To List1.listCount …… Next (4) A (5) 以下Case 语句中错误的是 A) Case 0 To 10 B) Case Is>10 C) Case Is>10 And Is<50 D) Case 3,5,Is>10 (5) C (6) 以下关于图片框控件的说法中，错误的是 A) 可以通过Print 方法在图片框中输出文本 B) For i=0 To ListCount-1 …… Next D) For i=1 To ListCount …… Next

Access窗体操作题

Access窗体操作题 2、考生文件夹下存在一个数据库文件"Access3.mdb"，里面已经设计好窗体对象"教师"。试在此基础上按照以下要求补充窗体设计： （1）在窗体的窗体页眉节区位置添加一个标签控件，其名称为"bTitle"，标题显示为"教师奖励信息"；（2）在主体节区位置添加一个选项组控件，将其命名为"opt"，选项组标签显示内容为"奖励"，名称为"bopt"；（3）在选项组内放置二个单选按钮控件，选项按钮分别命名为"opt1"和"opt2"，选项按钮标签显示内容分别为"有"和"无"，名称分别为"bopt1"和"bopt2"。 （4）在窗体页脚节区位置添加两个命令按钮，分别命名为"bOk"和"bQuit"，按钮标题分别为"确定"和"退出"； （5）将窗体标题设置为"教师奖励信息"。 注意：不允许修改窗体对象"教师"中已设置好的属性。 等级：3 难度：3 知识点：access知识点/窗体题 3、考生文件夹下存在一个数据库文件"Access3.mdb"，里面已经设计好窗体对象"教师"。试在此基础上按照一下要求补充窗体设计： （1）在窗体的窗体页眉节区位置添加一个标签控件，其名称为"bTitle"，标题显示为"教师基本信息输出"；（2）在主体节区中"年龄"标签右侧的文本框显示内容设置为"年龄"字段值，并将文本框名称更名为"tAge"；（3）在主体节区添加一个标签控件，该控件放置在距左边0.1厘米、距上边5.0厘米，标签显示内容为"出生地"，名称为"bMem"； （4）在窗体页脚节区位置添加两个命令按钮，分别命名为"bOk"和"bQuit"，按钮标题分别为"确定"和"退出"； （5）将窗体标题设置为"教师基本信息"。 注意：不允许修改窗体对象"教师"中未涉及的控件和属性。

实验报告标准答案

课程名称: 实验报告1 成绩评定: 实验项目名称: 指导教师 实验项目编号: 实验项目类型: 实验地点: 学生姓名: 学号: 学院: 系专业: 实验时间年月日午～月日午 一、实验目的 1.熟悉VB编程环境，能够建立、编译和运行VB程序。 2.掌握窗体、标签、文本框、命令按钮、图形框的作用、常用属性、事件和方法。 3.理解并掌握赋值语句、掌握表达式的书写规则。 4.掌握使用Inputbox函数和MsgBox消息函数进行输入输出。 5.熟悉VB的数据类型和类型转换。 二、实验内容 (一)字幕滚动 1.设计如下图所示的界面实现字幕从上到下进行滚动，“欢迎使用VB”是一个字幕标 签，两个命令按钮分别实现自动滚动和手动滚动。 a)在窗体水平居中的地方放置一个标签。 b)当字幕向下移出窗体时，重新从窗体顶端开始继续往下移动。

c)单击“手动”按钮一次字幕将向下移动一下，单击“自动”按钮字幕将连续移动， 具体移动的速度或幅度、窗体和按钮上的图片由自己设定。 d)以EX1-1分别保存窗体和工程。 2.实验要求 a)对于标签应对其什么属性设置什么值才能够使窗体的背景不被遮挡？ Backstyle----1 b)使标签在窗体中水平居中需要设置什么属性，如何设置？设置的依据是什么？ label1.Left ---form1.width/2-label1.width/2 c)要想在命令按钮上显示图片，需要设置哪些属性，如何设置？ Style -----1 d)写出标签从上往下移动的代码，注意，当标签移出窗体后要从窗体上顶端开始继续 往下。 Label1.Move Label1.Left, Label1.Top + 50 If Label1.Top > Form1.Height Then Label1.Top = 0 e)要使Timer控件启用，必须设置哪两个属性，属性值设置为多少？ Timer1.Interval=100 Timer1.enabled=true f)单击“手动”按钮时，如何使Timer控件停用？需要在什么地方编写代码？请写出 代码？ Timer1.Interval=0 或 Timer1.enabled=false

程序设计语言VB习题集含答案

程序设计语言VB》课程习题 集 一、单选题 1.Visual Basic 是一种面向（ D ）的程序设计语言。 A.用户 B.事件 C.程序 D.对象 2.在Visual Basic6.0 中规定工程文件的扩展名是（ A ）。 A.vbp B.for C.frm D.bas 3.Visual Basic6.0 中规定窗体文件的扩展名是（ B ）。 A.for B.frm C.vbp D.bas 4.如何使一个标签或按钮控件在运行时不可用（ C ）。 A.把它的Visible 属性设置成False B.把它的Visible 属性设置成True C.把它的Enabled 属性设置成False D.把它的Enabled 属性设置成True 5.控件的字体可在属性窗口的（ A ）属性中调整？ A.Font B.Color C.Text D.Caption 6.若要将某命令按钮设置为默认命令按钮。则应设置 True 的属性是（ C ）。 为 A.Value B.Cancel C.Default D.Enabled

7.在VB 中，记录对象数据的是（ C ）。 A.方法 第1 页共22 页 B.事件 C.属性 D.语句 8.在文本框上显示文本的属性是（B）。 A.Value B.Text C.Print D.Enabled 9.InputBox 函数返回值的类型为（ A ）。 A.字符串 B.数值 C.变体 D.数值或字符串（视输入的数据而定） 10.设有语句： a = InputBox（" 请输入数值:","输入示例", "100"）程序执行后,若从键盘上输入数值20 并按回车键,则变量a的值是（ A ）。 A.字符串"20" B.字符串"120" C.默认值100 D.数值120 11.下列控件中可用于接受用户输入文本，又可用于显示文本的是（B）。 https://www.sodocs.net/doc/2019369827.html,bel 控件 B.TextBox 控件 C.Timer 控件 https://www.sodocs.net/doc/2019369827.html,mandButton 控件 12.语句PRINT "25*4" 的输出结果是（A）。 A.25*4 B."100" C.100 D.出现错误信息 13.只能用来显示字符信息的控件是（B）。 A.文本框 B.标签框 C.图片框 D.图像框 14.下列可作为Visual Basic 变量名的是（ D ）。 A.A%A

VB练习题(上机)含答案

第一部分 1 在窗体上添加一个命令按钮(名称为Cmd1，标题为"输出平均值")。程序运行后，单击命令按钮完成以下工作： ①随机产生20个0到1000的整数，将其放入一个一维数组中 ②求出所有元素的平均值，并显示在窗体上(如下图所示) Private Sub Cmd1_Click() Dim a%(19), i%, sum!, aver! Randomize For i = 0 To 19 a(i) = Int(Rnd * 1001) sum = sum + a(i) Next i aver = sum / 20 Print aver End Sub 2 请在名称为Form1的窗体上添加一个名称为Text1的文本框和一个名称为C1、标题为"转换"的命令按钮，如下图所示。在程序运行时，单击"转换"按钮，可以把Text1中的小写字母转换为大写，把大写字母转换为小写，其他字符不变。 Private Sub C1_Click() Dim ch As String, ch1 As String, i% ch = Text1 For i = 1 To Len(ch) If Asc(Mid(ch, i, 1)) >= 65 And Asc(Mid(ch, i, 1)) <= 90 Then ch1 = ch1 + LCase(Mid(ch, i, 1)) Else

ch1 = ch1 + UCase(Mid(ch, i, 1)) End If Next i Text1 = Text1 + vbCrLf Text1 = Text1 + ch1 End Sub 3 在窗体上添加一个命令按钮(名称为MyCmd1，标题为"输出最大值")。程序运行后，单击命令按钮完成以下工作： ①随机产生30个0～1000的整数，将其放入一个一维数组中 ②求出其中的最大值，并显示在窗体上。 Private Sub MyCmd1_Click() Dim a%(29), i%, max% Randomize For i = 0 To 29 a(i) = Int(Rnd * 1001) Next i max = a(0) For i = 1 To 29 If a(i) > max Then max = a(i) Next i Print max End Sub 4 请设计如下图所示窗体界面。程序运行时，在选中一个或两个复选框和一个单选按钮时，单击命令按钮，则对文本框中的文本内容做相应的设置。请编写适当的事件过程，完成上述功能。

VB程序设计基础练习题-2

VB程序设计基础练习题 一、窗体设计题 1.标签显示隐藏窗体标题 --------------------------------------------------------------------- 【窗体设计】 --------------------------------------------------------------------- 在名称为Form1的窗休上添加一个名称为Label1的标签， 字号大小为四号，标题为“等级考试”，如图1所示。 通过设置属性使标签初始为不显示。 请编写适当的程序，使得运行程序时，窗体的标题立即变为“标签”， 单击窗体时，显示标签，如图2所示。 注意：程序中不得使用变量，事件过程中只能写一条语句。 ----------------------------------------------------------------- 2.显示日期和时间 --------------------------------------------------------------------- 【窗体设计】 --------------------------------------------------------------------- 在名称为Form1的窗体上添加1个名称为Label1的标签，使其初始内容为空， 且能根据其标题内容自动调整标签的大小；再添加2个命令按钮， 标题分别为“日期”和“时间”，名称分别为Command1、Command2。 请编写2个命令按钮的Click事件过程，使得单击“日期”按钮时， 标签内显示系统当前日期；单击“时间”按钮时，标签内显示系统当前时间。如图所示。 要求：程序中不得使用变量，每个事件过程中只能写一条语句。 --------------------------------------------------------------------- 3.InputBox函数参数设置 ------------------------------------------------------------------- 【窗体设计】

VB习题

第一讲Visual Basic程序设计概述 一、选择题 1.在VB程序设计阶段，双击窗体或窗体上的任何对象，打开的窗口是 A.代码窗口 B.属性窗口 C.布局窗口 D.工程窗口 2.任何控件都具有的属性是 A.Caption https://www.sodocs.net/doc/2019369827.html, C.FillColor D.DrawStyle 3.下列关于窗体Name属性的叙述错误的是 https://www.sodocs.net/doc/2019369827.html,属性的值是显示窗体标题栏的文本 https://www.sodocs.net/doc/2019369827.html,属性的值不可以是空 C.运行期间不能改变Name的属性值 https://www.sodocs.net/doc/2019369827.html,属性是指窗体的名称，用来标识一个窗体 4.下列叙述中错误的是 A.不同的对象可以具有相同名称的方法 B.事件过程是指附在该对象上的程序代码，是事件触发后处理的程序 C.方法是在对象上可操作的过程，是VB系统提供的一种特殊的过程和函数 D.对象事件的名称可以由编程者制定 5.有程序代码如下：Text1.Text=”欢迎”，则Text1、Text、”欢迎”分别代表 A.对象、值、属性 B.对象、方法、属性 C.对象、属性、值 D.属性、对象、值 6. 下列叙述中正确的是（）。 A 只有窗体才是Visual Basic中的对象 B 只有控件才是Visual Basic中的对象 C 窗体和控件都是Visual Basic中的对象 D 窗体和控件都不是Visual Basic中的对象 二、填空题 1.VB采用的是面向对象、驱动的编程机制。 2.VB编程的三大基本步骤是界面设计、属性设置和代码编写 3.当对象获得焦点时会触发 __lostfocus_________ 4.应用程序建立在工程的基础之上，一个工程是各种类型文件的集合，它包括_____ （标准模块文件）.bas_______、_（工程文件）_.vbp____________、______（窗体 文件）_.frm_______、_ ___（资源文件）.res_________、__（工程组文件）_.vbg____ 和__（类模块文件）.cls__________。 5.每个窗体对应一个窗体文件，窗体文件的扩展名是.frm 。 三、编程题 1.设计一个显示信息的窗口(见图),要求在文本框中输入文本信息,单击按钮,文本信息 显示在窗体上.

实验报告簿(程序设计基础VB答案)

实验日期_____________________ 实验名称：实验一常用标准控件一 【实验目的与要求】 1.掌握Visual Basic的启动与退出。 2.熟悉Visual Basic的集成开发环境。 3.掌握在窗体中放置控件的方法。 4.掌握在“属性窗口”中设置控件属性的方法。 5.掌握在“代码编辑器”窗口中输入程序代码的方法。 6.掌握工具栏上启动按钮、结束按钮的使用方法。 7.掌握标签、文本框、命令按钮、列表框等控件的使用方法。 【实验内容与步骤】 实验1.1.1 标签的使用(一) 1.题目与要求：在名称为Form1、标题为“标签”的窗体上画一个名称为Label1的标签，并设置适当属性以满足以下要求： 1)标签的内容为“计算机等级考试”； 2)标签可根据显示内容自动调整其大小； 3)标签带有边框，且标签内容显示为三号字。 2.实验步骤 1)界面设置：在名称为Form1的窗体上放置一个标签控件Label1； 2)属性设置（请将表格补充完整） 表1.1.1 对象属性 3)保存文件：存盘时必须存放在C:\VB\Sy01文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。 实验1.1.2 标签的使用(二) 1.在名称为Form1的窗体上画一个名称为 Label1的标签，标签的宽和高分别为2000、300，有边框，并利用属性窗口设置适当的属性，使其居中显示“等级考试”，并使标签的外观如图所示。

2．属性设置（请将表格补充完整） 表1.1.2 对象属性 sjt2.frm。 实验1.1.3 文本框的使用 1.题目与要求：在名称为Form1的窗体上画两个文本框，名称分别为T1、T2，初始情况下都没有内容。请编写适当的事件过程，使得在运行时，在T1中输入的任何字符，立即显示在T2中。程序中不得使用任何变量。 2.实验步骤 1)界面设置：在名称为Form1的窗体上放置两个文本框； 2)属性设置 3)完善程序代码 Private Sub T1_Change() T2.Text=T1.Text (T2=T1) End Sub 3)保存文件：存盘时必须存放在C:\VB\Sy01文件夹下，工程文件名为sjt3.vbp，窗体文件名为sjt3.frm。 实验1.1.4 命令按钮的使用(一) 1.在名称为Form1的窗体上画一个名称为C1、标题为“变宽”的命令按钮，窗体标题为“改变按钮大小”。编写程序，使得单击命令按钮时，命令按钮水平方向的宽度增加100。要求：程序中不得使用变量，每个事件过程中只能写一条语句。