房屋租赁合同ppt课件_2.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文档。上传文档
查看更多
房屋租赁合同ppt课件_2

第 4 章;4.1 基本语句;4.1.1 代码行的书写规则; 按行书写 一行一句 在同一行上可以书写多条语句,语句间用:(西文冒号)分隔。 单行语句可分若干行书写,在本行后加入续行符空格和下划线“_”。 例如: X=10:Y=20:Z=30 Dim Name As String,Age As Integer,Sex As _ Boolean,ID As String; VB代码中不区分字母大小写 为了提高程序的可读性,VB对用户程序代码进行自动转换。 对于VB中的关键字,首字母总被自动转换成大写,并在其前后自动加上空格。 若关键字由多个英文单词组成,自动将每个单词的首字母转换成大写。;4.1.2 赋值、暂停与结束语句;一、赋值语句;说明: 变量有类型,属性也有类型,赋值时要注意类型匹配。 执行赋值语句时,首先计算出表达式的值,然后将该值赋予变量. 变量可以多次被赋值,最终取最后一次所赋予的值. 在程序中,赋值语句及各种操作对象的方法,都是顺序执行的.;2. 不同数据类型数据的赋值;②变量为字符型,表达式为数值类型(算术表达式)——把表达式的值转换成字符型。;③变量为逻辑型,表达式为数值型——所有非0值转换成True;0值转换成False.;④变量是整型,表达式是逻辑值True/False变量——值为 -1/0 如: Private Sub Form_Click( ) Dim a As Integer a=True print a ‘运行结果为 -1 a=False print a ‘运行结果为 0 End Sub ;⑤变量是字符型,表达式是逻辑值True/False ——值为 “True”/ “False”.;⑥变量是数值型,表达式是字符型——系统提示出错(数据类型不匹配!); 在赋值语句执行过程中所产生的数据类型转换,有时侯会出现不可预期的结果。为保险起见,建议在赋值语句中采用转换函数对数据进行强制转换。 ;数据类型转换举例: Private Sub Form_Click( ) Dim b as Boolean,n as Integer,s as String b=1 Print b ‘True b=0 Print b ‘False b=3 Print b ‘True n=b Print n ‘-1 s=b Print s ‘Ttue n=“asds” ‘类型不匹配! Print n End Sub;二、暂停与结束语句;注释内容仅供用户阅读,系统并不执行,注释有利于程序的维护和调试,方法有: Rem 注释 必须单独一行书写 ‘ 注释 可单独一行,也可在语句后书写;4.2 算法基础与流程图; 算 法;传统流程图;流程图示例;目前公认的具有“良好风格”的程序设计方法叫做 “结构化程序设计方法”.其核心是规定了算法的三种基本结构: 顺序结构 分支结构 循环结构 从理论上讲,无论多复杂的问题,都是由这三种最基本的算法结构组合而成。;A;4.3 顺序结构程序设计;示例;4.1 基本语句 4.2 算法基础与流程图 4.3 顺序机构程序设计 4.4 分支结构程序设计 4.5 循环结构设计;4.4 分支结构程序设计;4.4.1 If-Then-Else-End If 结构语句;If X0 then x=x+1 Else x=x-1 End IF;例4-3;输出S;e;If e1 Then [A1组语句] ElseIf e2 Then [A2组语句] ElseIf e3 T hen [A3组语句] …… [Else An+1组语句] End If;开始;【例4-4b1】 判别整数X的值范围;例4-5; Select Case e Case c1 A 组语句 Case c2 B 组语句 …… Case Else …… End Select ;e是测试表达式(可以是算术或字符型) c1,c2…是测试项,可取下列三种形式之一: 1)具体数值(如:3,5,7.2) 2)连续的数据范围(如:8 to 20, B to H) 3)满足某个判定条件(如:Is20, Is=“P”) 也可以是上述三种形式的组合,用逗号分隔开。 如:4,7 to 9, Is30; 示例: Private Sub Command1_Click( ) Dim x As Integer x=Val(Text1.Text) Select

文档评论(0)

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

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

1亿VIP精品文档

相关文档