欢迎来到天天文库
浏览记录
ID:39756974
大小:356.50 KB
页数:46页
时间:2019-07-10
《顺序结构程序设计2》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、第三章顺序结构程序设计本章内容及要求:3.1VB语法和注释3.2语句和函数3.3基本控件(命令按钮、标签、文本框、滚动条)3.4定时器控件3.5调试VB程序3.6程序举例在20世纪60年代,软件曾出现过严重危机,由软件错误而引起的信息丢失、系统报废事件屡有发生。为此,1968年,荷兰学者E.W.Dijkstra提出了程序设计中常用的GOTO语句的三大危害:破坏了程序的静动一致性;程序不易测试;限制了代码优化。此举引起了软件界长达数年的论战,并由此产生了结构化程序设计方法,同时诞生了基于这一设计方法的程序设计语言Pascal。程序设计思想的进步结构化程序设计结构化程序设计
2、:用三种基本结构作为构成程序的基本单元顺序结构选择结构循环结构每个基本结构具有单入口单出口的特点。一般一个程序由这三种结构结合而成。VB是融合了面向对象和结构化编程两种思想的一个编程工具。顺序结构顺序结构的主要特点是:按自然顺序(即编写的顺序)执行程序的流程,即先执行第一句,再执行第二句,一句一句执行下去,直到执行最后一句。PrivateSubForm_Click()Constpi=3.1415Dimr%Dims!s=pi*r*rr=Text1.TextText2.Text=sEndSub为什么Text1中无论输入什么Text2中都显示是0?3.1VB的语法和注释1.V
3、B代码中不区分字母的大小写。2.同一行可以书写多条语句,但语句间要用冒号“:”分隔。3.若一个语句行不能写下全部语句,可以换行。换行时需在本行后加入续行符,1个空格加下划线,即:“_”。4.一行最多允许255个字符。3.1.1语法1.注释以Rem开头,也可以使用单引号“‘”。REM语句单独放在一行,也可以将之放在另一语句后的行上。REM语句必须是该行上最后的语句。如果它跟在另一语句后面,则REM与该语句间必须用冒号隔开。单引号(‘)可以使用在同一行上的语句后面,也可以单独在一行。不能使用行继续符序列( _)来延续REM语句。注释开始后,编译器将不检查字符是否具有特殊含义
4、。对于多行注释,请在每行上使用另一个REM语句或者使用一个注释符号(')。2.注释有利于程序的维护和调试Rem开始或单撇‘。例如:‘ThisisaVBREMThisisaVB3.1.2注释3.2语句和函数语句:VB程序的组成部分。Stop语句:暂停语句Stop语句用来暂停程序的执行,相当于在事件代码中设置断点。语法格式为:Stop说明:1.Stop语句的主要作用是把解释程序置为中断(Break)模式,以便对程序进行检查和调试。可以在程序的任何地方放置Stop语句,当执行Stop语句时,系统将自动打开立即窗口。2.与End语句不同。End语句:终止程序的运行。卸载所有窗体
5、模块退出运行。格式:End3.2.1语句要求掌握常用函数的功能及使用。调用方法:函数名(参数列表)有参函数函数名无参函数说明:(1)使用函数要注意参数的个数及其参数的数据类型(2)要注意函数的自变量或参数的取值范围例如:sqr(x)要求:x>=0VB函数:内部函数和用户自定义函数内部函数:把一些常用功能预先编好程序,以固定的格式提供给用户使用。3.2.2函数数学函数、转换函数、字符串函数、日期函数、格式输出函数、颜色函数-43Int(-3.5)Int(3.5)不大于N的最大整数Int(N)4Cint(3.5)四舍五入,转为整数Cint-33Fix(-3.5)Fix(3.
6、9)取整,截尾Fix(N)20.086Exp(3)enExp(N)1Cos(0)余弦函数Cos(N)3.5Abs(-3.5)取绝对值Abs(N)结果实例含义函数名在三角函数中的自变量是以弧度为单位。如:sin300sin(3.14159/180*30)3.2.2.1数学函数例:Int(198.555*100+0.5)/100的值为?如果是Cint呢?Int((198.555*100+0.5)/100)?0Tan(0)正切函数Tan(N)3Sqr(9)平方根Sqr(N)-1Sgn(-3.5)符号函数Sgn(N)0Sin(0)正弦函数Sin(N)-44Round(-3.5)
7、Round(3.5)将N1四舍五入保留N2位小数Round(N1,N2)[0,1)之间的数Rnd产生随机数Rnd[(N)]结果实例含义函数名Rnd函数返回0和1(包括0但不包括1)之间的双精度随机数.产生a~b的之间的随机整数:Int(Rnd*(b-a)+a)本章目录3.2.2.1数学函数Int(Rnd*32+1)取的是什么范围的值?"123.45"Str$(123.45)数值转换为字符串Str(N)"ABC"Ucase$("abc")123Val("123AB")数字字符串转换为数值Val(C)"abc"Lcase$("ABC")大写字
此文档下载收益归作者所有