欢迎来到天天文库
浏览记录
ID:37800385
大小:1.15 MB
页数:54页
时间:2019-05-31
《月二级VB等级考试辅导第1次》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、2013年9月等级考试辅导二级VisualBasic第一讲基础知识数据类型1常量与变量2运算符与表达式43常用内部函数数据的输入与输出5考点1数据类型不同类型的数据适用于解决不同类型的问题不同类型的数据在内存中的存放形式不同标准数据类型用户自定义数据类型数据类型标准类型字节型Byte逻辑型Boolean整型Integer长整型Long单精度型Single双精度型Double字符型String货币型Currency日期型Date对象型Object变体型Variant自定义类型关键字字节数1224482/字符884按需分配P112用户自定数据类型自定义数据类型定义位置1、标准模块中定
2、义,默认为Public2、窗体层定义,需要加上PrivateType自定义类型名元素名[(下标)]As类型名…[元素名[(下标)]As类型名]EndType用户自定义数据类型TypeBloodWbcAsDouble‘血细胞计数(单位109/L)RbcAsDouble‘红细胞数(单位109/L)HgbAsInteger‘血红蛋白含量(单位g/L)PltAsLong‘血小板(单位109/L)EndType类型名元素名用户自定义数据类型TypeStudentIDAsString*9NameAsString*4SexAsString*1AgeAsIntegerScoreAsSingleE
3、ndType类型名元素名字节数=9*1+4*1+1*1+2+4=20考点2常量在程序运行过程中,其值不能改变的量普通常量表示形式:&O205&H3AF123&-123!0.123E+3分界符:"abc""ABD""XYZ"#2004-9-27#逻辑常量:TrueFalse符号常量用一个符号来代替多次被使用的常量,具有含义清楚,一改全改的优点如:ConstPI[AsDouble]=3.1415926535系统常量由VB提供的应用程序和控件的系统定义常数Text1.BackColor=vbRed考点3变量在程序运行过程中,其值可以改变的量三要素:变量名、变量类型、变量值实质变量代表着
4、内存中一定的存储空间存储空间中存放的数据即变量的值存储空间的大小取决于变量的类型变量名代表对应存储空间的起始地址10a整型2字节变量命名规则以字母开头,由字母、数字和下划线组成的字符串变量变量使用方法建议先声明,后使用声明显式声明如:DimcountAsInteger,sumAsSingle等价于Dimcount%,sum!DimI,kAsInteger隐式声明VB允许用户不声明变量而直接使用所有隐式声明的变量都是Variant数据类型VB根据程序中赋予变量的值来自动调整变量类型强制显式声明OptionExplicit语句变量变量的初值声明一个数值型的变量后,VB自动为其赋初值0
5、声明一个字符型的变量后,VB自动为其赋初值空串声明一个逻辑型的变量后,VB自动为其赋初值False变量赋值变量名=表达式先计算表达式值,再将结果保存到变量所代表的内存空间中变量类型转换规则教材P26变量变量的作用域–过程级(局部变量)声明位置:事件过程、普通子过程或函数过程内部。声明符:Dim可见范围:在声明变量的过程或者函数中。–模块级声明位置:窗体级代码的通用声明部分(.frm)模块级代码的通用声明部分(.bas)声明符:Private或Dim可见范围:在声明变量的整个窗体或模块中变量–全局变量声明位置:模块代码的通用声明部分声明符:Public可见范围:整个工程P26考点4
6、常用内部函数一、数学函数1.三角函数Sin(x)、Cos(x)、Tan(x)、Atn(x)2.取整函数Int(x):求不大于x的最大整数。Cint(x):把x的小数部分四舍五入变为整数(四舍六入五凑偶)。Fix(x):去掉x的小数部分,保留整数部分。3.随机函数:Rnd(x)(参数x一般省略)产生[0,1)的随机数。Randomize‘初始化随机数生成器如何产生[200,300]之间的随机整数Int((300-200+1)*Rnd+200)不要把括号忘记了!Int(Rnd*(b-a+1)+a)的取值范围是多少?常用内部函数4.其它数学函数平方根函数Sqr(x)、绝对值函数Abs(
7、x)、对数函数Log(x)、符号函数Sgn(x)、指数函数Exp(x)历年真题2005年9月选择题第15题设a=5,b=10,则执行c=Int((b-a)*Rnd+a)+1后,c值的范围为__。(A)5~10(C)6~10(B)6~9(D)5~9练习题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()x=-5IfSgn(x)Theny=Sgn(x^2)Elsey=Sgn(x)EndIfPrintyEndSub
此文档下载收益归作者所有