VB程序设计第四章数据输入输出.ppt

《VB程序设计第四章数据输入输出.ppt》由会员分享，可在线阅读，更多相关《VB程序设计第四章数据输入输出.ppt（36页珍藏版）》请在装配图网上搜索。

VisualBasic程序设计教程,,内蒙古科技大学实践训练中心,第四章数据输入输出,4.1数据输入输出控件,4.1.1用标签输出数据标签主要用于显示文本信息。它所显示的内容只能用Caption属性来设置或修改。例【4-1】利用两个标签显示具有浮雕效果的文字。解题思路：所谓浮雕效果就是使显示的文字利用黑色和白色的错位叠加来实现，第一个标签的背景必须为透明的，两个标签的文字、字体大小必须一致。,4.1数据输入输出控件,4.1.2用文本框输入输出数据文本框是一个文本编辑区域，常用于在程序运行时接收用户输入的数据。例【4-2】在一个文本框中输入字符，另一文本框输出其ASCII码值。解题思路：利用文本框的KeyPress事件输出字符的ASCII码值。,Privatesubtext1_keypress(keyasciiasinteger)text2.text=keyasciiEndsub,4.1数据输入输出控件,4.1.2用文本框输入输出数据例【4-3】在利用文本框对输入的非数字数据进行字符串连接。解题思路：在文本框中输入数据，可通过回车表示输入结束，在KeyPress事件中对输入的键是否为回车符（ASCII码为13）进行判断；也可以通过按Tab键或单击其他对象不是输入结束，本题采用第二种方式表示输入结束。,4.2数据输出方法,4.2.1Print方法Print方法可以在窗体上显示文本字符串和表达式的值，也可在其他图形对象或打印机上输出信息。格式：[对象名.]Print[表达式表][,|;]说明：⑴“对象名”可以是窗体(Form)、立即窗口(Debug)、图片框(PictureBox)、打印机(Printer)，若省略，则在当前窗体上输出。例如：Print“GoodMorning”‘将字符串GoodMorning显示在窗体上Picture1.print“GoodMorning”‘把字符串GoodMorning显示在图片Picture1上Printer.Print“GoodMorning”‘将“GoodMorning”输出到打印机,4.2数据输出方法,4.2.1Print方法⑵“表达式表”是一个或多个表达式。对于数值表达式，先计算出表达式的值，再输出；而字符串则原样输出；若省略，则输出一个空行。例如：Print180/3’输出表达式的值60Print’输出一空行Print“X=180/3”’输出字符串”X=180/3”⑶表达式表中各表达式之间用分隔符（逗号或分号）隔开。①用逗号分隔：按标准输出格式显示数据项，以14个字符位置为单位将输出行分成若干个区域，每区段输出一个表达式的值。②用分号分隔：以紧凑格式输出。例如：a=10:b=15:c=30Printa,b,c,”ABCD”PrintPrint“X=“;a+b+c,4.2数据输出方法,4.2.1Print方法⑷Print方法具有计算和输出的双重功能，对于表达式，则先计算后输出；例：x=5:y=10Print(x+y)/3‘结果为5⑸分号或逗号为结尾符号。一般每执行一次Print方法要自动换行，而以逗号或分号作为结尾符号则不换行，仍按紧凑格式或标准格式显示下一个信息。例如：print1,2,print3;print4结果：□1□□□□□□□□□□□□2□□□□□□□□□□□□□3□□4□,4.2数据输出方法,4.2.2与Print方法有关的函数1、Tab函数格式：Tab[(n)]与Print方法一起使用，在参数n指定的位置输出其后的表达式的值。例：PrintTab（25）；“ABC”‘将在第25个位置显示”ABC”说明：⑴参数n为一整数，用来指定表达式输出的起始列数；若省略，则Tab将输出点移动到下一个输出区的起点；⑵若n>”;strx$fontsize=18fontname=“Terminal”print“Terminal>>”；strx$endsub,4.4字体、字形和颜色,4.4.3其他属性1、粗体字：由FontBold属性设置格式：FontBold[＝Boolean]省略选项时，FontBold属性返回其当前值。参数Boolean取值为True时，FontBold属性为粗体，否则文本按正常字体输出，默认为False。2、斜体字：由FontItalic属性设置格式：FontItalic[＝Boolean]3、加中划线：由FontStrikethru属性设置格式：FontStrikethru[＝Boolean]4、加下划线：由FontUnderLine属性设置格式：FontUnderLine[＝Boolean]5、重叠显示：当以图形或文本为背景显示新的信息时，有时需要保留原来的背景，使新显示的信息与背景信息重合，可由FontTransparent属性设置。格式：FontTransparent[＝Boolean],4.4字体、字形和颜色,4.4.3其他属性注意：①除重叠显示属性（FontTrasparent）只适用于窗体和图片控件外，其他属性适用于各种控件及打印机。默认对象名为窗体，否则应加对象名：Printer.FontItalic=True②设置一种属性后，该属性即开始起作用，只有再次设置该属性，才会改变其值。,4.4字体、字形和颜色,4.4.3其他属性例【4-11】字体风格的设定Privatesubform_click()sample$=“VB程序设计”fontsize=20‘字体大小为20printsample$fontbold=true‘字体加粗printsample$fontitatlic=true‘字体为斜体printsample$fontstrikethru=true‘加中划线printsample$fontunderline=true‘加下划线printsample$fonttransparent=true‘设置变量重叠printsamplecurrentx=1000‘设置当前光标的x、y坐标currenty=1500print“AAAAAAAAAA”‘在(x,y)处输出EndSub,4.4字体、字形和颜色,4.4.4颜色及颜色参数1、调色板⑴从属性窗口中找到要设置的颜色属性；⑵从“视图”－>“调色板”中设置颜色属性；2、颜色参数◆使用RGB函数格式：RGB(红色值，绿色值，蓝色值)3个参数均为整数，取值范围：0～255；0－亮度最低，255－亮度最高例如，黄色－RGB(255,255,0),其中0代表没有蓝色白色－RGB(255,255,255)Form1.Backcolor=RGB(0,128,0)‘设定窗体背景色为绿色Form1.Forecolor＝RGB(255,255,0)‘设定窗体前景色为黄色,4.4字体、字形和颜色,4.4.4颜色及颜色参数2、颜色参数◆QBColor函数格式：QBColor(颜色值)“颜色值”的取值范围为：0～15例如：Forme1.BackColor=QBColor(3)‘设置窗体背景色为青色◆颜色常数VisualBasic定义了8种常用颜色和Windows控制面板使用的系统颜色。具体见教材列表。,4.4字体、字形和颜色,4.4.4颜色及颜色参数常用颜色常量,4.4字体、字形和颜色,4.4.4颜色及颜色参数2、颜色参数◆直接使用颜色设置值通常用十六进制表示颜色值：Printer.Page‘输出结果为9⑵NewPage方法：用于结束对象中的当前页，实现换页操作格式：Printer.NewPage一般情况下，打印机打完一页后自动换页。若调用NewPage方法，则可强制打印机换页，将打印机位置重置到新页面的左上角，Page属性自动加1;⑶EndDoc方法：用于结束文件打印，并将Page属性加1格式：Printer.EndDoc,4.5打印机输出,4.5.2窗体输出格式：[窗体].PrintForm“窗体输出”是先将要输出的信息送到窗体上，然后用printform方法把窗体的内容打印出来。【例】通过窗体将指定信息输出打印机privatesubform_click()fontname=“courier”fontsize=24currentx=800currenty=500print“printtest”fontname=“黑体”currentx=800currenty=1000print“打印机测试”printformendsub,4.5打印机输出,4.5.2窗体输出说明：⑴窗体打印可以先在屏幕上修改要输出的内容格式，满意后再在打印机上输出。⑵为实现窗体打印，必须在属性窗口中把窗体的AutoRedraw属性设置为True，该属性可以保存窗体上的信息。⑶用PrintForm方法不仅可以打印窗体上的文本，而且可以打印窗体上的任何可见控件和图形；,4.5打印机输出,4.5.3打印源程序代码1、直接打印菜单“文件”－>”打印“命令实现。2、间接打印选用文本编辑器（Notepad、Word等）打印.frm、.bas等文件。,