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

Visual Basic 程序设计教程 4.5 打印机输出 4.5.1 打印表达式结果值 格式：Printer.Print 例 打印机输出测试 Private Sub Form_Click() Printer.FontName=“黑体“ Printer.FontSize=24 Printer.Bold=True Printer.UnderLine=True Printer.Print ”打印机输出测试“ Printer.EndDoc ‘结束打印文件 End Sub 霜致谬浊啼薛奠柏扒蜘愧吟皇洪陈恕忽搅良查远萄庸听裙靡筏舆氦偿痰矫VB程序设计 第四章 数据输入输出VB程序设计 第四章 数据输入输出 * ptc.imust.cn 内蒙古科技大学实践训练中心 第四章 数据输入输出 丹印诌矮梭萧锥墨纱邱壹仙仓泥活箱唯匡半吕央童挛箩景悄哼甜故掌盗旭VB程序设计 第四章 数据输入输出VB程序设计 第四章 数据输入输出 4.1 数据输入输出控件 4.1.1 用标签输出数据 标签主要用于显示文本信息。它所显示的内容只能用Caption属性来设置或修改。 例【4-1】利用两个标签显示具有浮雕效果的文字。 解题思路：所谓浮雕效果就是使显示的文字利用黑色和白色的错位叠加来实 现，第一个标签的背景必须为透明的，两个标签的文字、字体大小必须一致。 厂吊疫答畏皑泡子达辑蛊联驹侵薛废拄才菊厌叉桑瘦毁履痪搬肉龋沤秤邹VB程序设计 第四章 数据输入输出VB程序设计 第四章 数据输入输出 4.1 数据输入输出控件 4.1.2 用文本框输入输出数据 文本框是一个文本编辑区域，常用于在程序运行时接收用户输入的数据。 例【4-2】在一个文本框中输入字符，另一文本框输出其ASCII码值。 解题思路：利用文本框的KeyPress事件输出字符的ASCII码值。 Private sub text1_keypress(keyascii as integer) text2.text=keyascii End sub 脾仲眼竹技型叔很膳扇牢喧膝冀遥雷间甸梭京框瓢鼠但禾拱屑狮涪须歼坠VB程序设计 第四章 数据输入输出VB程序设计 第四章 数据输入输出 4.1 数据输入输出控件 4.1.2 用文本框输入输出数据 例【4-3】在利用文本框对输入的非数字数据进行字符串连接。 解题思路：在文本框中输入数据，可通过回车表示输入结束，在KeyPress事 件中对输入的键是否为回车符（ASCII码为13）进行判断；也可以通过按Tab 键或单击其他对象不是输入结束，本题采用第二种方式表示输入结束。 Private Sub Form_Load( ) text1.tabindex=0 End Sub Private sub Text1_LostFocus( ) if isnumeric(text1.text) then text1.setfocus text1.text=“” end if End Sub Private sub Text2_LostFocus( ) if isnumeric(text2.text) then text2.setfocus text2.text=“” end if End Sub Private sub Text3_GotFocus() text3.text=text1.text+text2.text End Sub 汉桥汁严辐黄外雾谐候盟隶猾锹犀竞拉耶邀欲玻香限贸搪腆绿届延瘩仆抬VB程序设计 第四章 数据输入输出VB程序设计 第四章 数据输入输出 4.2 数据输出方法 4.2.1 Print方法 Print方法可以在窗体上显示文本字符串和表达式的值，也可在其他图形对象或打印机上输出信息。 格式：[对象名.]Print[表达式表][,|;] 说明： ⑴“对象名”可以是窗体(Form)、立即窗口(Debug)、图片框(PictureBox)、 打印机(Printer)，若省略，则在当前窗体上输出。 例如： Print “Good Mor