- 1、本文档共44页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第3章 顺序结构程序设计 一个完整的VB应用程序,一般都包含三部分内容,即 输入 → 处理 → 输出 可通过VB语句、各种控件实现输入输出操作 本章主要内容 赋值与输入输出 1. 赋值语句[Let]变量名=表达式 示例:x = 5 * 1.4 2. 注释、结束和暂停语句 (1) 注释语句 Rem 注释内容 或 ′ 注释内容 (2) 结束语句 End (3) 暂停语句 Stop 也可以通过单击工具栏上的“中断”按钮来实现 使用Ctrl + Break组合键,可强制程序暂停运行 说明 (1)表达式中的变量必须是赋过值的,否则变量的初值自动取零值(变长字符串变量取空字符)。例如: a = 1 c = a + b + 3 ′b未赋过值,为0 执行后,c 值为 4 (2)赋值语句跟数学中等式具有不同的含意,例如 x = x + 1 表示把变量x的当前值加上1后再将结果赋给变量 “先读后写”:读出x的内容 → 加1 → 写回x(覆盖原有内容) 说明 (3)变量出现在赋值号的右边和左边,其用途是不相同的。出现在右边表达式中时,变量是参与运算的元素(其值被读出);出现在左边时,变量起存放表达式的值的作用(被赋值)。例如 x = 2 a = 3 x = 2*a + 5 当执行第3行语句“x=2*a+5”时,将读出变量a的值(即3),把该值乘2后加5,然后将结果(11)赋值给变量x。 (4)赋值号两边的数据类型必须一致,即同时为数值型或同时为字符型。 编写的窗体单击事件过程代码如下: Private Sub Form_Click() Dim x As Integer, a As Integer Dim b As Integer, c As Integer x = 36 a = Int(x / 10) 求十位数 b = x Mod 10 求个位数 c = b * 10 + a 生成新的数 Print 处理后的数: ; c End Sub 运行程序后单击窗体,输出结果是: 处理后的数:63 编写的VB程序代码如下: Private Sub Form_Click() Dim x As Integer, a As Integer Dim b As Integer, c As Integer x = InputBox(“输入一个2位数”) ‘运行时由用户任意给定一个2位数 a = Int(x / 10) 求十位数 b = x Mod 10 求个位数 c = b * 10 + a 生成新的数 Print 处理后的数: ; c End Sub 执行后,弹出一个输入对话框,若用户输入“83”,输出结果: 处理后的数: 38 例3.2 设计程序,实现两个文本框内容的交换 (1)在窗体上建立两个标签、两个文本框和一个命令按钮 (2)编写程序代码 借助于另一个变量(假设为 t) ,并直接在控件中交换数据 Private Sub Command1_Click() ′“交换”按钮 Dim t As String t = Text1.Text Text1.Text = Text2.Text Text2.Text = t End Sub 采用变体型变量 编写的程序代码如下 : Pr
您可能关注的文档
最近下载
- 25题固定收益分析岗位常见面试问题含HR问题考察点及参考回答.pdf
- 韶关市2025届高三一模(综合测试一) 英语试卷(含答案).docx
- 工作报告及设计心得20160831.pdf VIP
- SPC导入的钢箱截面在生成变截面时,消隐显示各板件连接错乱.pdf VIP
- Lessonsinlifesaving英国短片剧本.docx VIP
- 2019年注册土木工程师(道路工程)考前培训南京班文件-李 雪.pdf VIP
- 上海市2018-2022年近五年中考数学试卷附答案.pdf VIP
- 城轨车站施工与维护——开挖作业.pptx VIP
- 城轨车站施工与维护——围护结构施工及基坑开挖.pptx VIP
- 铁道概论——单元7.7铁路专用通信系统.pptx VIP
文档评论(0)