第4讲 程序的顺序结构.pptVIP

  1. 1、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
第4讲 程序的顺序结构

* * * * * 2. FontSize 功能:可以对输出文字或字体大小进行设置 格式:FontSize=[点数] 例如 FontSize=“12” * 例4.10 Cls FontName = system FontSize = 12 ForeColor = vbRed Print system 12号字:; 学习visual basic 6.0 Print FontName = 宋体 FontSize = 12 ForeColor = vbBlue Print 宋体 12号字:; 学习visual basic 6.0 Print FontName = 隶书 FontSize = 12 ForeColor = vbGreen Print 隶书 12号字:; 学习visual basic 6.0 Print FontName = 华文行楷 FontSize = 12 ForeColor = vbYellow Print 华文行楷 12号字:; 学习visual basic 6.0 Print FontName = 华文彩云 FontSize = 12 ForeColor = vbWhite Print 华文彩云:; 学习visual basic 6.0 * 本讲知识点小结 输入输出的概念 InputBox函数 MsgBox函数 Print语句 字形 * 实验四 程序的顺序结构 一、实验目的:掌握程序的顺序结构设计、常用输入输出函数和赋值语句的使用。 二、实验内容 1.设计一个窗体,窗体上有一个标签控件,和六个按钮,单击输入按钮,通过键盘输入数据(使用inputbox),通过标签显示数据,如图1所示。单击加减乘除四个命令按钮,执行两位数的运算,运算结果由msgbox输出。 2.编写程序,按图2所示的格式在窗体上显示相关内容。表头为隶书10号,表内记录为宋体10号。 三、实验结果: 源程序(包括*.frm,*.exe)和实验报告提交教师机。 * 图1 实验4-1参考结果 * 图2 实验4-2 参考结果 * * * * * 一般说来,计算机程序由三部分组成: 输入、处理、输出 一般说来,计算机程序由三部分组成:输入、处理、输出 * * * * * * * * * * * * * * * * * * * * * * Visual Basic 可视化程序设计 * * 主要内容 4.1 数据输入 4.2 数据输出 4.3 字形 * 教学目标 掌握Inputbox函数 掌握MsgBox函数的一般用法 掌握print方法 * 4.1 数据输入 计算机程序由三部分组成:输入、处理、输出 Vb中可以通过赋值语句、 文本框、inputbox、 msgbox等多种方式实现数据的输入。 * 1. 文本框输入 单击文本框获得焦点 在代码中用SetFocus方法来设置焦点。 例如: Text1.SetFocus ′把焦点设置在文本框Text1 焦点 焦点(Focus)是对象接收鼠标或键盘输入的能力。 按Tab键或Shift+Tab键在当前窗体的各对象之间切换焦点 * 例4.1 文本框输入 * 程序代码 Private Sub Command1_Click() Command2.SetFocus End Sub Private Sub Command2_Click() Text1.Text = Text2.Text = Command1.SetFocus End Sub Private Sub Command3_Click() End End Sub * 2. 输入对话框 功能:用于产生一个能接收用户输入的对话框 格式: 变量=InputBox(提示信息[,对话框标题][,缺省值][,x坐标位置][,y坐标位置][,helpfile,context]) 说明 提示信息:必选项,提示用户操作信息 对话框标题 缺省值:可选项,显示在文本框中的内容 坐标位置 InputBox函数返回值的默认类型为字符串 每执行一次InputBox函数,只能输入1个值 对话框显示的信息若要分行,必须加回车换行符,chr(13),chr(10),vbcrlf * filename$=InputBox(“请输入文件名(不超过8个字符)”,”文件名”,”vbfile”) filename$=InputBox(请输入文件名 + Chr(13) + (不超过8个字符), 文件名, vbfile) 例4.2 * nuA=InputBox(“请输入第一个数:”) nuB=InputBox(“请输入第二个数:”) 例4.

文档评论(0)

qwd513620855 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档