VisualBasic程序设计案例教程 第3章 赋值与输入输出.ppt

1、第三章，赋值和输入输出，掌握VB中赋值语句和常用基本语句的用法，掌握打印方法，输出数据，理解并熟练使用表格和基本控件，并熟练使用对话框教重点和难点：VB编程中的数据输入和输入，掌握VB编程中数据输入和输出的两种实现方式：方法和相关控件，第三章，赋值和输入输出，案例说明 1知道a=5，b=7，并计算c=2的值设计一个“万年历”程序来检查元旦运行结果如图3.1:分析1所示：这个案例赋值语句的应用将在后面详细描述，平方根函数应该是(sqr)也将被使用。读者可以参考第2章的功能表。分析2:要求输入一年中的元旦。除了相关的赋值语句，确定任何一年的元旦的公式如下：k=f mod 7。其中，y表示整数，y表

2、示某一年的年数，k表示一周中的某一天，k=0表示周日。3.1在赋值语句的情况下，技术点如果a=5且b=7已知，则计算c=的值。表单点击事件流程代码如下：私有子表单_ click () dim a为单，b为单，c为单a=5 b=7 c=sqr (a * ab * b)打印 c=；C End子程序运行后点击表单，输出结果如下：C=8.602325，3.1赋值语句的情况，2设计一个“万年历”程序来检查某一年的元旦，运行结果如图3.1所示：(1)我们首先将程序中使用的数学公式转换成程序语言所表示的格式，对应的语言表达式为：f=y int (y/4) (3) Set对象属性。如表3.1所示。(4)编写程

3、序代码。编写如下Commandl click事件过程代码：private子命令1 _ click () dim y为整数，f为整数，K为整数y=val(文本1。text)-1 f=y int(y/4)-int(y/100)int(y/400)1k=f mod 7 text 2。text=k end sub，3.1赋值语句的情况，有关赋值语句的相关知识和注意事项：(1)表达式中的变量必须为例如：a=3c=a3，B为0(如果未赋值)，C为6(执行后)。(2)使用赋值语句，变量的值可以改变，所以同一个变量可以在不同的时间取不同的值。变量赋值示例。私有子窗体_单击()a=2打印* A=；a a=4打印

4、* * A=；a a=a * 2 2打印* * * A=；A End Sub运行程序并点击表单，输出结果如下：*A=2 *A=4 *A=10，3.1赋值语句案例，案例说明 1使用Print方法输出全班的平均年龄，已知为18岁10人，19岁20人，20岁21岁10人。2使用选项卡定位输出，输出结果显示在右图中。技术要点本申请的设计步骤如下。1使用案例说明的第一部分(1)启动VB后，进入代码窗口(可以直接双击窗口)，并在框中选择点击事件。(2)运行以下代码：私有子窗体_单击()将a作为整数，将b作为整数，将c作为整数，将d作为整数，将s作为整数，将M作为单个a=10: b=2033 360 c=2

5、033 360d=10s=a b c d M=(a * 18b * 19c * 20d * 21)/s舍入到一个小数位并打印平均年龄：Int(m * 10 0.5)/10 End Sub单击表单，结论是输入：平均年龄：19.5，3.3打印方法输出数据和特殊打印格式案例，2使用案例说明第二部分的Tab定位输出(1)启动VB后，进入代码窗口(可以直接双击窗口)，在框中选择点击事件。(2)运行以下代码：私有子窗体_单击()打印打印选项卡(15)；学生人数；选项卡(26)；名称；选项卡(36)；成就打印标签(14)；字符串(27，-)输出27个负字符“-”print tab(14)；19011001；

6、选项卡(26)；张明明；选项卡(36)；57打印标签(14)；19011003；选项卡(26)；李小月；选项卡(36)；69打印标签(14)；19011012；选项卡(26)；王小五；选项卡(36)；92打印标签(14)；字符串(27，-)输出27个负字符“-”结束子，3.3打印方法输出数据和特殊打印格式情况，相关知识和注意事项1打印方法打印方法用于在表单、图片框和打印机上显示或打印出文本。语法格式：对象名称打印表达式列表描述：(1)对象名称可以是表单、图片框或打印机的名称。如果省略了对象名，它将直接输出到当前表单上。例如，打印程序在当前表单上输出图片打印。(2)表达式列表可以是一个或多个表达

7、式。如果省略，将输出一个空行。例如，private subform _ click()a=3b=vv print 50 * a计算并输出表达式的值。打印b输出变量值。打印输出一个空行。打印总数是输出一个字符串常量结束子，3.3打印方法输出数据和特殊打印格式的情况。(3)当输出多个表达式时，表达式之间使用分号。或者逗号“，”。如果使用分号分隔符，它将以紧凑格式输出，也就是说，后一项将紧接着前一项输出。如果使用逗号分隔符，每个输出项将以区域格式输出。此时，系统将根据14个字符将输出行分成几个部分(部分的数量与行的宽度有关)，逗号后的表达式将输出到当前输出位置的下一部分。示例：私有子窗体_ clic

8、k () a=3:b=4print a，b，4a，print2 * bprint a，b print a=；a，b=；b End Sub的运行结果如图所示，3.3打印方法输出数据和特殊打印格式情况，(3)当输出多个表达式时，表达式之间使用分号。或者逗号“，”。如果使用分号分隔符，它将以紧凑格式输出，也就是说，后一项将紧接着前一项输出。如果使用逗号分隔符，每个输出项将以区域格式输出。此时，系统将根据14个字符将输出行分成几个部分(部分的数量与行的宽度有关)，逗号后的表达式将输出到当前输出位置的下一部分。示例：私有子窗体_ click () a=3:b=4print a，b，4a，print2 *

9、 bprint a，b print a=；a，b=；b端接头的运行结果如图(4)所示。如果语句行末尾没有分隔符，当前输出项将自动换行。如果以分号或逗号结尾，则在输出当前输出项后不会换行，下一个打印输出的内容将紧凑输出(以分号结尾)或输出到下一个部分(以逗号结尾)。在上面的示例中，第二行中的语句Print a、b和4 a以逗号结束，下一个打印输出的8显示在下一部分。3.3打印方法输出数据和特殊打印格式情况，2。SpC函数格式：Spc(n) 3.tab函数格式：Tab(n) 4Format函数格式：format(表达式)下面是一些简单的例子：private subform _ click()a=4

10、513.7: b=3456.78: timevar=# 8:336005am #打印格式(a # #，# # #。# #)打印格式(a，$ # #，# # # .00)打印格式(b，# #，# # # .#)打印格式(timevar，h:m3360s)结束sub的输出结果是：4，513.7 4，513.70 3，456 . 363636363663.3打印方法输出数据和特殊打印格式情况下，5个常见的基本语句(1)注释语句Rem交换变量a和b的值c=a，C是中间临时单位a=b=C描述：(2)加载对象语句加载形式加载形式加载选项(2)加载控件数组中的元素(3)卸载语句卸载如果卸载的对象是程序的唯一

11、形式，程序的执行将被终止。示例：私有子命令l _ click()卸载Me卸载当前表单。me是一个系统关键字，用来表示当前表单。(4) End语句End语句可以强制终止程序代码的执行，清除所有变量并关闭所有数据文件。当程序运行时，用户也可以点击工具栏上的“结束”按钮强制结束程序。3.3打印方法输出数据和特殊打印格式情况，(5)暂停语句停止语句可以在程序中设置断点。与End语句不同，在解释模式下，stop不会关闭任何文件和清除变量。关于停止语句的实际应用，请参考以下相关章节：3.3打印方法输出数据和特殊打印格式情况。【案例说明】显示的是唐诗“回乡(何)”的画面，需要以下三个命令按钮：“显示”按钮：

12、用于显示唐诗“回乡(何)”的画面。清除按钮：用于清除生成的文本。“结束”按钮：结束程序运行。程序的运行结果如右图所示：3.4表单案例，技术要点 (1)创建应用程序的用户界面并设置对象的属性。(2)编写程序代码。将三个按钮的点击事件流程代码写如下：Private Sub CmdPrt_Click()“显示”按钮背景色=RGB(255，255，255)背景色(白色)前景色=RGB(0，0，255)前景色(蓝色)字体名称=斜体_GB2312字体名称字体大小=20字体大小字体粗体=真粗体面当前值=1200横坐标当前值=350纵坐标打印返回家乡木偶书(何)字体名称=打印字体大小=0当你年轻和年老的时候，

13、你会回家，当地的口音不会改变。打印打印Spc(6)；孩子们彼此不认识，笑着问客人从哪里来。结束子，3.4表单案例，专用子CmdCls_Click()清除按钮Cls结束子专用子cmd end _ click()结束按钮结束子相关知识和注意事项1表单2表单的基本属性(1)名称：表单名称，如表单1。名称(2)标题(标题):(3)自动绘制(4)背景色和前景色(5)边框样式(6)控制盒(7)启用(8)字体，3.4表格大小写。要处理程序代码中的字体，应采用以下字体属性：字体名称：字体名称。字体大小：字体大小(FontSize)。字体粗体：是否是粗体；该值可以设置为真或假。字体：无论是斜体，该值可以设置为真

14、或假。删除线：是否删除线可以设置为真或假。下划线：下划线与否；该值可以设置为真或假。字体透明：确定显示的信息是否与背景重叠。当属性值为真(默认值)时，表示保留背景，使前景中的文本或图形与背景重叠；当属性值设置为False时，背景将被前景的文本或图形覆盖。要处理程序代码中的字体，应采用以下字体属性：字体名称：字体名称。字体大小：字体大小(FontSize)。字体粗体：是否是粗体；该值可以设置为真或假。字体：无论是斜体，该值可以设置为真或假。删除线：是否删除线可以设置为真或假。下划线：下划线与否；该值可以设置为真或假。字体透明：确定显示的信息是否与背景重叠。当属性值为真(默认值)时，表示保留背景，使前景中的文本或图形与背景重叠；当属性值设置为False时，背景将