沈阳农业大学vf学习教案

1、会计学1沈阳农业大学沈阳农业大学vf第一页，共44页。文件文件新建新建表单表单注意注意(zh y)： 控件窗口和属性窗口不小心关掉了，怎样找出控件窗口和属性窗口不小心关掉了，怎样找出？表单文件扩展名：表单文件扩展名：scx第1页/共44页第二页，共44页。一一. 窗体窗体 窗体是面向对象的程序设计的主窗口。窗体是面向对象的程序设计的主窗口。窗体默认名字窗体默认名字(mng zi)：formn (可以通过可以通过name属性属性改名改名)captionwidthheightautocenter : 自动自动(zdng)居中居中 alwaysontop: 总在最前总在最前第2页/共44页第三页，共

2、44页。二二. 标签控件标签控件 标签控件是按一定格式显示在表单上的文本信息标签控件是按一定格式显示在表单上的文本信息,用来显示表单中各种说明和提示。用来显示表单中各种说明和提示。标签默认名字标签默认名字(mng zi)：labeln (可以通过可以通过name属性改名属性改名)第3页/共44页第四页，共44页。标签标签(bioqin)的主要属性有的主要属性有:Caption 显示的内容。显示的内容。 Fontsize 字的大小。字的大小。 Autosize 自动调整标签自动调整标签(bioqin)大小。大小。Fontname 字体。字体。 Forecolor 字的颜色。字的颜色。Fontbo

3、ld 加粗。加粗。Fontunderline 加下划线。加下划线。Fontitalic 倾斜。倾斜。 left 左边距离。左边距离。 top 顶部距离。顶部距离。第4页/共44页第五页，共44页。三三. 计时器计时器 “计时器”控件主要是利用系统时钟来控制某些具有(jyu)规律性、周期性任务的定时操作。计时器控件默认计时器控件默认(mrn)名字：名字：timern 第5页/共44页第六页，共44页。1. interval2. enabled设置计时器触发的时间间隔。设置计时器触发的时间间隔。单位为单位为毫秒毫秒。取值范围：取值范围：065535。.t. 计时器启动。计时器启动。.f. 计时器关

4、闭。计时器关闭。 Timer Timer 事件：事件： 指定的时间每经过指定的时间每经过1 1次，就执行该事件次，就执行该事件1 1次。次。主要主要(zhyo)属性：属性：第6页/共44页第七页，共44页。四四. 命令按钮控件命令按钮控件 命令按钮控件主要命令按钮控件主要(zhyo)用来控制程序的执行过程和数用来控制程序的执行过程和数据表中数据的操作等。据表中数据的操作等。 默认名字：默认名字：commandn第7页/共44页第八页，共44页。命令按钮的主要属性有命令按钮的主要属性有:Name 名字。名字。Caption 显示的内容。显示的内容。 Fontsize 字的大小字的大小(dxio)

5、。 主要事件：主要事件：Click 单击单击第8页/共44页第九页，共44页。五五. 文本框文本框 文本框控件主要用于数据表文本框控件主要用于数据表中某些中某些(mu xi)字段的输入、字段的输入、输出，以及从窗口给内存变量输出，以及从窗口给内存变量赋值等操作。赋值等操作。默认名字：默认名字：textn 第9页/共44页第十页，共44页。文本框的主要属性文本框的主要属性(shxng)有有:Name 名字。名字。Fontsize 字的大小。字的大小。 Value 初始值。初始值。第10页/共44页第十一页，共44页。例例1 ：设计一个表单，实现标签文字：设计一个表单，实现标签文字(wnz)边移动

6、边变色。边移动边变色。 标签标签(bioqin)默认名字为默认名字为：label1名字：名字：la内容：太阳出来喜洋洋内容：太阳出来喜洋洋（name属性改名、属性改名、caption属性改内容）属性改内容）命令按钮（标题分别命令按钮（标题分别(fnbi)为：开始、暂停、退出为：开始、暂停、退出）第11页/共44页第十二页，共44页。退出退出(tuch)按钮的按钮的click事件：事件：thisform.release开始开始(kish)按钮的按钮的click事件：事件：暂停暂停(zn tn)按钮的按钮的click事件：事件：form1的的caption改为：移动变色改为：移动变色提示提示:计时

7、器的计时器的interval设置为：设置为：300计时器的计时器的enabled设置为：设置为：.f.标签的标签的name改为改为la标签的标签的caption设置为：太阳出来喜洋洋设置为：太阳出来喜洋洋第12页/共44页第十三页，共44页。计时器计时器timer事件事件(shjin)代码代码: else endifa=int(rand( )*256)b=int(rand( )*256)c=int(rand( )*256)变色变色(bins)移动移动(ydng)第13页/共44页第十四页，共44页。例例2 ：设计一个幸运七游戏，文件：设计一个幸运七游戏，文件(wnjin)名字为名字为my_fo

8、rmxy.scx。文本框：文本框：t1t2t3标签标签(bioqin)：lbl1标签标签(bioqin)lbl1(bioqin)lbl1的主的主要属性如下：要属性如下：CaptionCaption设为空设为空第14页/共44页第十五页，共44页。rand( )*10)rand( )*10)rand( )*10)赢赢else输输endif开始开始(kish)按钮按钮click事件代码如下：事件代码如下：第15页/共44页第十六页，共44页。例例3： 设计表单，要求如下设计表单，要求如下(rxi)：单击确认按钮判：单击确认按钮判断密码是否为断密码是否为aaa，是执行幸运七游戏，否则释放。要，是执行

9、幸运七游戏，否则释放。要求：求：text1的最大长度为的最大长度为8 ，密码输入时显示为，密码输入时显示为*。标签标签(bioqin)文本框文本框按钮按钮第16页/共44页第十七页，共44页。确认按钮确认按钮click事件事件(shjin)代码：代码：Do form 表单名表单名elsethisform.releaseEndif 文本框最大长度：文本框最大长度：maxlength 密码密码(m m)输入显示输入显示*: passwordchar提示提示(tsh)：第17页/共44页第十八页，共44页。六六. 列表框列表框列表框默认名字：列表框默认名字：listn 主要用来显示选择项，用户可以从

10、中选择一个或主要用来显示选择项，用户可以从中选择一个或多个数据项。多个数据项。 主要属性：主要属性： Rowsource Rowsourcetype 当当rowsourcetype = 1 表示值源类型为值。表示值源类型为值。 通过通过rowsource写出具体值，之间逗号写出具体值，之间逗号(duho)相隔相隔。 当当rowsourcetype = 6 表示值源类型为字段。表示值源类型为字段。 通过通过rowsource选择所需字段。选择所需字段。第18页/共44页第十九页，共44页。七七. 组合框组合框 组合框组合框(combon)用于在列表框中选取数据并显示在编辑窗口用于在列表框中选取数

11、据并显示在编辑窗口(chungku)。它有两种形式（它有两种形式（style): (下拉组合框可手写下拉组合框可手写(默认默认) (下拉列表框只能选择下拉列表框只能选择) 其它主要属性：其它主要属性： rowsourcetype和和 rowsource listindex ：指定索引值：指定索引值第19页/共44页第二十页，共44页。八八. 复选框复选框 默认名称：默认名称：checkn。 可以通过单击改变它的状态。可以通过单击改变它的状态。 复选框的主要属性是复选框的主要属性是: caption 显示在复选框边上的文本。显示在复选框边上的文本。 controlsource 指定数据来源。指定

12、数据来源。 alignment 文本的位置左或右。文本的位置左或右。 value =0 表示表示(biosh)没有选择复选框。没有选择复选框。 value =1 表示表示(biosh)选中了复选框。选中了复选框。第20页/共44页第二十一页，共44页。九九. 选项按钮组选项按钮组默认名字默认名字(mng zi)：optiongroupn作用：它可以包含多个选项，通常用于从多项选择作用：它可以包含多个选项，通常用于从多项选择中选择其一。中选择其一。主要属性：主要属性： buttoncount 指定按钮个数指定按钮个数 value 选择第几个按钮选择第几个按钮按钮组中按钮按钮组中按钮(option

13、)的主要属性：的主要属性： caption 显示在按钮边上的文本显示在按钮边上的文本注意：选项按钮组为容器注意：选项按钮组为容器(rngq)类控件，类控件，“右键右键-编辑编辑”设置按钮的具体属性。设置按钮的具体属性。第21页/共44页第二十二页，共44页。 例例4：文字：文字(wnz)变化变化标签标签(bioqin)2.下拉组合下拉组合(zh)框框4.选项按钮组选项按钮组3.复选框复选框1.列表框列表框第22页/共44页第二十三页，共44页。列表框，属性设置列表框，属性设置(shzh)如下：如下： Rowsourcetype =1 Rowsource = 黑体黑体,宋体宋体,华文行楷华文行楷

14、,隶书隶书列表框的单击事件列表框的单击事件(click)代码代码:name= this.value1.列表框列表框第23页/共44页第二十四页，共44页。属性属性(shxng)： style=0 Rowsourcetype = 1 Rowsource = 红红,黄黄,绿绿,黑黑2.下拉组合下拉组合(zh)框框输入输入form1的的init事件事件(shjin)代码：代码： 下拉组合框下拉组合框(combo1)的的click事件代码事件代码:do case case this.value=红红 endcase第24页/共44页第二十五页，共44页。复选框复选框1的的click事件事件(shjin

15、)代码代码:If this.value=1elseEndif或用或用 thisform.label1. fontunderline =.not.thisform.label1. fontunderline复选框复选框2和和3提示提示(tsh): 倾斜倾斜: fontitalic 加粗加粗: fontbold3.复选复选框框第25页/共44页第二十六页，共44页。选项按钮组的选项按钮组的click事件事件(shjin)代码代码:do case case this.value=1 case this.value=2 case this.value=3 case this.value=4endcas

16、e4.选项按钮组选项按钮组第26页/共44页第二十七页，共44页。属性主要包括：属性主要包括：Keyboardhighvalue 输入的最大值；输入的最大值；Keyboardlowvalue 输入的最小值；输入的最小值；Increment 每次单击按钮的增减值；每次单击按钮的增减值；Value 初始值；初始值；Spinnerhighvalue 单击按钮所能达到的最大值；单击按钮所能达到的最大值；Spinnerlowvalue 单击按钮所能达到的最小值；单击按钮所能达到的最小值；例例5：用微调控制标签文字的字号：用微调控制标签文字的字号(z hao)。（语句写到微调的（语句写到微调的intera

17、ctivechange事件中事件中。）。）十十. 微调控件微调控件第27页/共44页第二十八页，共44页。例例6：查阅学生成绩：查阅学生成绩(chngj)情况（三表联动）。情况（三表联动）。学生学生(xu sheng)成成绩绩(chngj)课程课程十一十一. 表格控件表格控件第28页/共44页第二十九页，共44页。设计步骤如下设计步骤如下(rxi)：（1）右击表单空白处）右击表单空白处/数据环境，数据环境， 填入学生、成绩、课程三填入学生、成绩、课程三个数据表，个数据表， 并连线。并连线。（2）将三个数据表分别拖入表单中。）将三个数据表分别拖入表单中。（3）适当）适当(shdng)调整三个表格

18、的宽度，运行。调整三个表格的宽度，运行。第29页/共44页第三十页，共44页。默认名字：默认名字： pageframen页框控件主要属性页框控件主要属性: pagecount 页数页数页框中每一页如第一页为页框中每一页如第一页为: pageframe1.page1对于对于(duy)每一页主要属性每一页主要属性: caption 页页标题标题注意注意:页框控件为容器类控件，页框控件为容器类控件，需按右键需按右键编辑编辑(binj)进入每一页。进入每一页。十二十二. 页框控件页框控件第30页/共44页第三十一页，共44页。默认名字默认名字(mng zi)：imagen主要属性主要属性: 1. pi

19、cture 图片图片 2. stretch 填充方式填充方式 十三十三. 图像控件图像控件第31页/共44页第三十二页，共44页。例例7：制作：制作(zhzu)美景欣赏。美景欣赏。第32页/共44页第三十三页，共44页。一般用于数据表中备注型字段的显示。一般用于数据表中备注型字段的显示。一般用于数据表中通用型字段的显示。一般用于数据表中通用型字段的显示。是包含是包含(bohn)一组命令按扭的容器，其作用与命令按一组命令按扭的容器，其作用与命令按扭相同。扭相同。十四十四. 编辑框编辑框(editn)十五十五. Activex绑定绑定十六十六.命令按钮组命令按钮组(commandgroupn)第3

20、3页/共44页第三十四页，共44页。例例8小型学生小型学生(xu sheng)信息管理系统信息管理系统重点掌握：各控件与数据表之间的链接重点掌握：各控件与数据表之间的链接第34页/共44页第三十五页，共44页。设计设计(shj)界面如下界面如下：文本框文本框组合组合(zh)框框单选钮单选钮复选框复选框Activex绑定绑定编辑编辑框框按钮组按钮组第35页/共44页第三十六页，共44页。设计提示：设计提示：1.设计界面设计界面2.进入数据环境，填入进入数据环境，填入“学生学生”表表3.分别设计各控件的分别设计各控件的controlsource属性属性4.组合组合(zh)框还需设框还需设: row

21、sourcetype 为字段为字段 rowsource为相应的字段为相应的字段5.按钮组的单击事件为按钮组的单击事件为: do case case this.value=1 go 1 第36页/共44页第三十七页，共44页。case this.value=2 skip -1 if bof( ) go 1 endifcase this.value=3 skip if eof( ) go bottom endifcase this.value=4 go bottom endcase Thisform.refresh第37页/共44页第三十八页，共44页。向导(xingdo)表单 利用表单向导利用表

22、单向导(xingdo)创建表单创建表单例例9:利用表单向导制作一个表单，要求利用表单向导制作一个表单，要求(yoqi)选择选择xsda表中所有字段，表单样式为阴影式，按钮类型表中所有字段，表单样式为阴影式，按钮类型为图片按钮，排序字段选择学号升序为图片按钮，排序字段选择学号升序,表单标题为表单标题为:学学生数据输入维护生数据输入维护.最后将表单存放在最后将表单存放在D盘下盘下,表单文件表单文件名为名为Xs2。第38页/共44页第三十九页，共44页。表单练习表单练习1设计一个名为设计一个名为 my_forma的表单的表单,实现加减实现加减乘除计算乘除计算(j sun)。（再把标签换成文本框实现。）。（再把标签换成文本框实现。）标签标签(bioqin)：名字为：名字为：la autosize=.t.微调：微调：名字名字(mng zi)分别为：分别为：s1、s2 ，初值：，初值：10，最小值，最小值1，最大值，最大值100。 第39页/共44页第四十页，共44页。 do casecase this.value=1thisform.la.caption=str(thisform.s1.value+thisform.s2.value)case this.value=2thisform.la.