- 1、本文档共10页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
图4.1使用Print方法图4.2建立程序界面表4-1属性设置与Print方法有关的函数为了使数据按指定的位置输出,VB提供了几个与Print相配合的函数。Tab函数在Print方法中,可以使用Tab函数来对输出进行定位。Spc函数在Print方法中,还可以使用Spc函数来对输出进行定位。【例4-2】使用Tab和Spc函数进行对齐输出,如图4.3所示。图4.3使用Tab和Spc函数进行对齐输出PrivateSubForm_Click()PrintPrintTab(5);学号;Tab(20);姓名;Tab(30);性别;Tab(40);入学成绩PrintPrintTab(5);2000101;Tab(20);丁叮;Tab(30);女;Tab(40);650PrintTab(5);2000102;Tab(20);柳洋洋;Tab(30);男;Tab(40);668PrintTab(5);2000103;Spc(8);李骊;Spc(6);女;Spc(8);640PrintTab(5);2000132;Spc(8);杜小红;Spc(4);女;Spc(8);635;EndSub使用位置属性要精确地把文本输出到窗体、图片框或打印页上,可以用位置属性CurrentX和CurrentY。这两个属性分别表示当前输出位置的横坐标与纵坐标。如果要控制所显示或打印文本的大小和外观,可以用VB中的字体属性,各字体属性及其名称如表4-2所示。表4-2字体属性及名称【例4-3】如图4.4所示,按指定尺寸、颜色和外观,把字符串“风光无限好”输出到窗体的中间。设计步骤如下:建立应用程序用户界面与对象属性的设置参见例4-1。编写命令按钮的Click事件代码:图4.4使用位置属性CurrentX和CurrentY示例PrivateSubCommand1_Click()DimaAsString,textWAsInteger,textHAsIntegerFontName=隶书 设置输出文本的字体FontSize=30 设置输出字体的大小ForeColor=QBColor(15) 设置输出文本的前景色,即字体的颜色BackColor=QBColor(8) 设置输出文本的背景色,即窗体的颜色a=风光无限好textW=TextWidth(a)/2 TextWidth(a)表示字符串a的宽度textH=(TextHeight(a)+Command1.Height)/2 TextHeight(a)表示字符串a的高度1CurrentX=ScaleWidth/2-textW 设置输出的水平位置2CurrentY=ScaleHeight/2-textH 设置输出的垂直位置3Printa 输出文本4EndSub清除方法ClsCls方法可以清除Form或PictureBox中由Print方法和图形方法在运行时所生成的文本或图形,清除后的区域以背景色填充。设计时使用Picture属性设置的背景位图和放置的控件不受Cls影响。Cls方法的语法为[〈对象名称〉.]Cls123图4.5Cls方法示例【例4-4】在例4-3中使用Cls方法清除窗体中由Print方法所生成的文本,如图4.5所示。【例4-5】使用Print方法在图片框中输出字符串或数值表达式的值。设计步骤如下:01建立应用程序用户界面。02按表4-3设置对象属性。03(3)设计代码。命令按钮Command1的Click事件代码为PrivateSubCommand1_Click()Picture1.PrintPicture1.Print6+10=;6+10Picture1.PrintPicture1.Print山重水复,Picture1.Print疑无路Picture1.PrintPicture1.Print柳暗花明又一村EndSub程序运行结果如图4.6右所示。A【例4-6】如图4.7所示,在图片框中使用位置函数。设计步骤如下:B建立应用程序用户界面并按例4-5的方法设置对象属性,结果如图4.7左所示。C编写事件代码。“击我”命令按
您可能关注的文档
最近下载
- 2024年内蒙古自治区专升本考试大学医学综合模拟试卷含解析 .pdf VIP
- 海底管道铺设无人化技术.docx
- 2025年全国自学考试外国法制史核心真题及权威解析汇编.doc
- 中职单招专业职业技能考试(畜牧兽医+动物医学+宠物医疗技术+宠物养护.pdf
- 加乘原理初步.pptx VIP
- GB T 15825.3-2008_金属薄板成形性能与试验方法 第3部分:拉深与拉深载荷试验_高清版_可检索.pdf
- 2025年浙江机电职业技术学院单招职业适应性测试题库有答案.docx VIP
- 2025年河北省初中学业水平摸底考试数学试卷(保定)(原卷版+解析版).docx VIP
- 2025年浙江机电职业技术学院单招职业适应性测试题库及一套答案.docx VIP
- 2018年版《广东省安装工程定额说明及计算规则》C.4 电气设备安装工程(上).pdf
文档评论(0)