- 1、本文档共13页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
总结 变量 交换两个变量的值的程序 自学课本P27: 变量的命名规则 变量名必须以字母或汉字开头,后面可以有字母、数据或下划线,长度不得超过255个字符。 不能在变量名中出现空格、小数点、标点符号、等号等特殊字符。 自学课本P28: 表达式分类 把数学表达式b2-4ac写成VB表达式 分析程序代码 * * 生活经验: 如何将两个瓶子中的液体交换? 需要一个存放液体的容器 需要一个存放数据的容器 第4节 数据的存储箱——变量 变量名的命名规则,P27 在生活中,我们选容器时,通常会考虑哪些限制因素呢? 存放物质的类型、大小、名称等 存放数据的容器(变量)也需要考虑的数据类型等因素。 数据的存储箱(变量)从哪里借来呢? 数据可以为哪些类型?见P28表4-2 如:实数型:single,字符串型:string,…… 不同类型的数据在计算机中存储时,所占的空间大小不一样。 当然是从计算机的存储器中借来。借数据的存储箱(变量)时,我们需要告诉计算机,将用此存储箱(变量)存放哪种类型数据,还要给你借用的这个存储箱(变量)起一个名字(变量名)。当然给这个存储箱(变量)命名是要遵守规则的。 定义变量的语句格式: Dim 变量名 As 类型 如:Dim n As Single 意思是, 定义一个名称为n的变量,用该变量存放实数型数据 Dim n As String是什么意思? 把数据放入到的数据存储箱(变量)的过程,叫变量的赋值 说明变量的名称和类型的过程叫定义变量 数据的存储箱 (变量) n 数据 3.1415926 给变量赋值 = n “你好!” = Label9.Caption = z与z = Label9.Caption有区别吗? A=2 B=3 A=B 在数学中,n=n+1成立吗? 在VB程序中,n=n+1表示什么? 在VB中“=”为赋值,表达式从右向左读,n=n+1表示:将n中的值加1之后,再放回n中,因此,n不是具体的数,n的本质是数据的存储箱,变量的值是最后一次所赋的值。 定义变量名称和数据类型 给变量赋值 Dim 变量名 As 数据类型 变量名 = 表达式 目的:系统为数据分配“存储箱” Label9.Caption = z与z = Label9.Caption是不一样的。 目的:把数据存入“存储箱” 在VB中“=”为赋值,表达式从右向左读,n=n+1表示:将n中的值加1之后,再放回n中,因此,变量不是具体的数,变量的本质是数据的存储箱,变量的值是最后一次所赋的值。 Dim n As String 定义变量 变量赋值 n=text1.text text1.text=text2.text text2.text=n 这三条语句的顺序可不可以颠倒? 下列变量名中哪些不正确?为什么? a1 student K_2 S-2 3name age.a c80 abc=4 学号 x:4 姓 名 a^2 表达式的类型 运算符 表达式举例 值 算术表达式 +、-、*、 /(除)、\(整除) ^(乘方) 28/4 27\7 4^2 7 3 16 关系(条件)表达式 =、、、 (不等于)、=(大于等)、=(小于等于) 34 true 逻辑表达式 not(非)、 and(与)、 or(或) 9=6 and 6=10 not(95) or 81 true false b^2-4*a*c 写出下列程序运行后text1和text2显示的结果 private sub command1_click() dim a as integer, i as integer i=5 a=16 i=i+sqr(a)+1 text1.text=i text2.text=a end sub 课本P28标准函数 abs(x)求x的绝对值 sqr(x)求x的算术平方根 val(x)把字符串型的x转换成数值 str(x)把数值型x转换成字符串 private sub command1_click() dim r , π, c as single r=val(text1.text) π=3.1415926 c=2*π*r label3.caption=c end sub private sub command1_click() dim r , π, s as single r=val(text1.text) π=3.1415926 s=π*r^2 label3.caption=s end sub 通过这些代码,你能知道程序界面中一定有
文档评论(0)