课后作业。
1、控件的使用户能够移动控件并调节其大小。
a.拖曳柄b.标题栏c.工具箱d.工程资源管理器。
2、将命令按钮的什么属性设置为true，当用户按下“esc”键时可以激发对应命令按钮的click事件。
3、在**编辑中有命令按钮的cmdok_click()事件，则命令按钮的名称是什么？4、使用什么方法可以将新的项添加到一个列表框中？5、使用什么属性，可取得列表框中项数？
6、如果单击一个当前没有被选中的复选框，则复选框组中其它已被选中的复选框会处于什么状态？7、针对下列程序**，说法正确的是。
a. text1对象左边界距窗体的左边界800twip,上边界距窗体的上边界2000twipb. text1对象左边界距屏幕的左边界800twip,上边界距屏幕的上边界对象的高度为800twip，宽度为对象的高度为800点，宽度为2000点8、以下说法正确的是。
a.默认情况下属性visible的值为true
b.如果设置控件的visible属性值为false，则该控件消失c. visible的值可设为0或1
d.设置visible属性同设置enabled属性的功能是相同的，都是使控件处于失效状态9、如果设置窗体的controlbox属性值为false，则。a.
窗口边框上的最大化和最小化按钮失效仍起作用。
c.窗口边框上的最大化和最小化按钮消失。
d.运行时还可以看到窗口左上角显示的控制框，可以单击该控制框进行窗体的移动，关闭等操作。
10、实现**框的大小自动适应图像大小，应将**框的什么属性设置为true？11、vb程序运行时，单击窗体可将窗体的前景色设为红色的**段是。 sub form_click() sub
sub form_click() sub
sub form_click()backcolor=vbredend sub
sub form_click()forecolor=vbredend sub
12、在vb中，修改窗体的哪几个属性的值，可改变窗体的大小？
13、如果希望文本框中的文本处于不能被编辑状态，应该将文本框的什么属性设置为true？
14、下面哪一个不是标签控件的方法。
a. refreshb. setfocusc. dragd. move15、下面控件没有picture属性。
a.复选框b.单选按钮c.标签d.命令按钮16、通常用什么控件将窗体上的对象进行分组？
17、什么属性用于自动调节图像框控件中的图形内容大小？
18、在程序运行期间什么函数可以将图形装入窗体、**框或图像框。19、与属性相同的是。
a. 单击滚动条的滚动箭头时，产生什么事件？
21、当滚动滑块位于滚动框最左端或最上端时，value属性被设置为。
a. maxb. minc. max和min之间d. max和min之外22、当在滚动框中拖动滚动滑块时，产生什么事件。
23、为了使计时器控件每隔5秒种产生一个计时事件，则应将interval属性设置为多少？
vb使用工程来管理构成应用程序的所有不同的文件。一个工程主要包括：跟踪所有部件的工程文件（.
vbp）窗体文件（.frm）标准模块文件（.bas）类模块文件（.
cls）资源文件（.res）
一、模块。模块是vb将不同类型过程**组织到一起的一种结构。在vb中具有三种类型的模块：窗体模块、标准模块和类模块。
1.窗体模块。
应用程序中的每个窗体都有一个对应的窗体模块（也称窗体模块文件或窗体文件）。窗体模块不仅包。
含窗体及窗体内各种对象的属性设置，而且还包含用于处理发生在窗体中各个对象上的事件过程。一个vb应用程序至少应包含一个窗体模块。
2.标准模块。
标准模块主要用于将应用程序中可被多个窗体共享的**（通用过程）组织在一起，对于作用范围遍。
及应用程序各个模块的变量（全局变量），通常也定义在标准模块中。标准模块文件的扩展名为。bas。一个应用程序可以没有标准模块，也可以包含多个标准模块。
3.类模块。
类模块与c++中的类相似，用于定义类的数据成员（属性）和成员函数（方法）。
二、过程。所谓过程，就是指具有特定书写格式，包含若干可作为一个整体被执行的**行的组合。根据执行的方式，可把过程分为事件过程和通用过程。
1.事件过程。
针对由用户或系统引发的事件，事先编写好的用于改变对象的状态和行为、对相关的信息进行处理的程序**段称为事件过程。
2.通用过程。
一个应用程序中的多个窗体可以共享一些**，或者一个窗体内不同的事件过程可以共享一些**。
为减少编写**的工作量和使程序结构更加清晰，可以将这些被共享的**单独设计为一个过程，这个过程称为“通用过程"。
商店打折售货，不同的购货金额有不同折扣。参照下列打折标准(m：购货金额，d：折扣率)，设计程序计算实际付款额。
private sub command1_click()m≤250(元) d=0%
dim i as integer ,n as integer,sum as integer250n=val(sum=01000i=1m>2000 d=15%
do while i<=nsum=sum+i程序**设计：
i=i+1private sub command1_click()
loopdim m as single ,d as single, f as single
end subselect case m
case is<=250
private sub command1_click()d=0
dim i ,n,sum as integercase 250 to 500
n=val(
sum=0case 500 to 1000
i=1d=7.5
do until i>ncase 1000 to 2000
sum=sum+id=10
i=i+1case is>2000
loopd=15
select
end subf=m*(1-d/100.0)
end sub
private sub command1_click()dim i ,n,sum as integern=val(
sum=sum+ii=i+1
loop while i<= sub
private sub command1_click()
dim i as integer,n as integer,sum as integern=val(
for i=1 to nsum=sum+inext isub
VB课后作业
四 实验步骤。第一题 1 在新建的窗体上画1个命令按钮。2 命令按钮的属性设置如下 3 控件布局如下。4 双击命令按钮，打开 窗口并输入如下 private sub command1 click dim a 3 as integer dim i as integer print 输入的数据为 for...
VB课后作业
第一题 1 新建一个窗体。2 窗体属性设置如下 3 窗体布局如下。4 双击窗体，打开 窗口并输入如下 private sub form click dim x as integer dim y as integer x 0 y 0 do while x 100 y y x x x 1 looppri...
vb实验课后作业
实验名称 算术运算符的简单应用 实验目的 进一步熟悉visual basic 6.0的友好界面，掌握常用控件的布局与使用，理解并熟练应用八个算术运算符号，并创建一个名为 将一个三位正整数逆序输出 的应用程序。实验要求 在第一个textbox中任意输入一个三位的正整数，在第二个textbox中显示其逆...