VB语言基础.docx
《VB语言基础.docx》由会员分享,可在线阅读,更多相关《VB语言基础.docx(26页珍藏版)》请在冰豆网上搜索。
VB语言基础
VB语言基础
一、数据类型
1、数值型:
取值范围:
Byte(字节型)━占1字节;0~255无符号
Integer(整型)━占2字节;-32768~32767
long(长整型)━占4字节;-48~47
single(单精度浮点)━占4字节;略
Double(双精度浮点)━占4字节;略
Currency(货币型)━占8字节小数点左15位,右4位
(精确定点数据类型)
2、逻辑型:
Boolean(布尔型)━占2字节;true或false
3、字符串型:
String¡ª¡ª定长型占字符串长度,变长型再加10
4、日期型:
Date(日期型)━占8字节100-1-1~99-12-31
5、对象型:
Object━占4字节;任何Object引用
6、变体型:
Variant━变体型数字占16字节,变体型字符占22字节+字符串长
注:
此类型还包含三种特定值:
Empty;Null;Error;•7、用户定义的数据类型:
•用户可以利用Type语句定义自己的数据类型。
格式如下•Type数据类型名
•数据类型元素名As类型名
•……
•EndType
•用Type可定义类似于C语言中的结构体类型。
例如:
•TypeDate_Rec
•RYearAsInteger
•RMonthAsString*3
•RDayAsInteger
•EndType
•注:
记录类型中的元素可以是字符串,但必须是定长字符串,其长度由类型名加上一个星号和常数指明。
•数据类型转换函数:
•函数名及书写格式转换结果
•CBool(表达式)xx型
•CCur(表达式)货币型
•CByte(表达式)字节型
•CDate(表达式)日期型
•CDbl(表达式)双精度
•CSng(表达式)单精度
•CInt(表达式)整型
•CLng(表达式)长整型
•CStr(表达式)字符串
•Cvar(表达式)变体型
•二.变量•1.变量名V中变量的命名遵从标识符命名原则:
必须以字母开头;变量中间不能有空格;不能使用VB关键字;•
2.变量的声明VB允许使用不声明的变量,即一个变量未经声明就可以在程序中使用。
这种变量使用方式称为隐含变量声明。
(使用隐含变量时,VB会自动创建变量,并赋予它变体类型。
在为其指定值之前,其值为Empty,当为它赋值后,会采用所赋值的类型作为自己的类型。
)
•显式声明:
•①用类型说明符:
将类型说明符加在变量名的尾部;
•②定义变量时指定其类型:
•格式:
Declare变量名As类型名
•其中的Declare可以是Dim,Static,Redim,Public中之一•③用Deftype语句:
Deftype字母范围
•这里的Type是类型标志,Def是系统保留字,它们之间没有空格。
例如:
DefIntD-J
•该定义声明了
D、E、
F、G、H、I、J都是整型变量,而且以这些字母开头的变量名也都是整型变量。
•类型说明符:
•%:
整型;
•&:
长整型;
•!
:
单精度浮点型;
•#:
双精度浮点型;
•@:
货币型;
•$:
字符串型;
•字节、布尔、日期、对象及变体型没有类型说明符。
•注意:
•①Dima,b,cAsInteger是错误的。
只有c被声明成Integer,而a,b缺省为Variant类型。
•②如果使用DimxAsInteger语句声明了变量x为Integer,而在后面又使用带有类型说明符的该变量,如x$,x!
,x@和x#,程序运行时就会产生“duplicatedefinition”错误。
•③使用不带As的Dim语句,会被声明成变体类型的变量。
•④通过不带长度说明的字符串声明语句可以声明变长字符串。
•⑤对于声明布尔型的变量,其缺省值为False;•⑥为声明为Date类型的变量赋值时,日期值应放在一对#之间,且多种日期和时间格式在VB中都是有效的。
•3.变量的作用域和生存期:
•变量的作用域——指变量的有效作用范围,也就是变量可•••
•以被访问的范围。
按以下三种方式来定义变量的作用范围:
范围说明
过程在过程内使用Dim或Static
私有在模块开头加上Dim或Private
公共在模块开头加上Public
变量的生存期——指VB保存该变量值的时间,是变量在整个程序运行过程中的有效生存时间•1)过程层变量——过程层变量是指在过程或函数内部定义的变量,这种变量无论是用Dim还是Static声明,其作用域都只是该过程或函数体,在过程或函数外不能引用;
2)窗体层变量——窗体层变量是指在窗体的通用部分声明的变量,即不是在任何一个窗体内的过程或函数中声明的变量。
它的作用范围至少是窗体的存在范围,也就是说在窗体内的每个过程或函数中都可以使用窗体层变量。
•窗体层变量的声明有三种方式:
•用Dim语句声明。
•用Private语句声明。
•用Public语句声明。
•对于用Dim和Private声明的窗体层变量,其作用范围都是在所声明的窗体范围内。
用Public声明的窗体层变量作为窗体公用数据成员,可以在其他窗体或模块中以“窗体名.变量”方式引用。
其作用可以大于当前窗体范围。
窗体层变量在本窗体所有过程中都是可见的。
•3)模块层变量——模块(Module)是构成VB工程(Project)的一部分,是包含数据和过程的集合。
定义模块层变量只需在模块的通用部分加入Dim,Private,Global或Public等声明语句即可。
用Dim和Private声明的模块层变量作用域为所在模块范围,而用Public和Global定义的模块层变量则可以全局使用。
•注:
全局变量必须用Public或Global声明,不能用Dim•三.常量
•常量是一个有意义的名字,用来表示程序运行时不变的数值和字符串。
•VisualBasic中的常量分为文字常量和符号常量两种,文字常量又可分为数字常量和字符串常量。
•符号常量(自定义常量):
在程序中程序员用Const声明的常量。
•使用常量时应注意:
•
(1)用Const声明的常量在程序运行过程中是不能被重新赋值的。
•
(2)在常量声明的同时赋值。
•(3)可以为声明的常量指定数据类型,如ConstconValAsCurrency=3.78,缺省时为所赋值的类型。
•(4)在用常量为常量初始化时注意,不可有循环引用。
例如:
•模块1中:
•Publicconstcon1=con2+8……
•模块2中:
•PublicConstcon2=con1*3……
•四.数组•1.数组的定义:
•必须用Global或Dim语句定义。
Dim语句的语法格式如下:
•Dim数组名([lowerTo]upper,[[lowerTo]upper])[Astype]
•在这里,每对lower和upper为数组的一维,lower是该维下标的下限,upper是该维下标的上限,如不标明lower,其默认值为0。
Upper不可省略。
•例如:
•
(1)一维数组的定义:
•DimRecord
(5)AsInteger
•定义了一个有六个数据元素的整型数组•
(2)二维数组的定义
•DimMatrix(2,3)AsInteger
•该数组定义了一个二维数组,可以存储12个整型数,三行四列下标:
00,01,02,03,10,……23•2.动态数组
•带有空()的Dim可以声明一个动态数组,如:
•DimdynArray()
•然后,可用ReDim语句在一个过程或函数中定义动态数组的维数和元素个数。
申请或重申请存储空间的一般格式为:
•ReDim[Preserve]数组名([lowerTO]upper[,[lowerTo]upper])[AsType]
•其中,Preserve为可选项,表示是否保护己有数据。
缺省时为不保护。
•例如:
ReDimdynArray
(10)//为动态数组申请10个单元
•ReDimPreservemyArray(Ubound(myArray)+10)•其中,Ubound函数返回数组的指定维的上限。
•这是一个保留原数据的增量分配数组
•五、枚举类型:
•当一个变量只有几种可能的值时,可将这个变量定义为枚举类型。
•枚举类型的声明放在窗体模块、标准模块或公用类模块中的声明部分,用Enum语句来定义,格式如下:
•[Public|Private]Enum类型名称
•成员名[=常数表达式]
•成员名[=常数表达式]
•¡¡
•EndEnum••默认情况下,枚举类型中的第一个常数被初始化为0,其后的常数逐项递增1。
•例如:
EnumDays
•Saturday
•Sunday
•Monday
•Tuesday
•Wednesday
•Thursday
•Friday
•EndEnum
•例如在如上定义的Days枚举类型的基础上,有如下单击某按钮的过程:
•PrivateSubCommand1_Click()
•DimMyDayAsDays
•MyDay=Saturday
•IfMyDay•MsgBox“It‟stheweekend!
”
•EndIf
•EndSub
•MyDay是一个枚举变量,Saturday的值为0,而Monday的数值为2,If中的条件成立
•六、运算符与表达式•1.赋值运算符:
VisualBasic中的赋值运算符是“=”。
•2.数学运算符:
••••••••••优先级运算符说明
高^指数运算,如2^3=8
-负号运算符
*/乘除运算,其中除法(/)的所得结果
为实数
\整除。
所得结果为实际结果
的整数部分
Mod取模运算符,两数相除取余数
+-加、减运算
低&连接字符串。
•3.关系运算符:
=(等于);<>或><(不等);
•<(小于);>(大于);<=(小于等于);>=(大于等于);like(比较样式);Is(比较对象变量)•4.逻辑运算符:
•逻辑运算用于判断操作数之间的逻辑关系。
VB提供了非(Not)、与(And)、或(Or)、异或(Xor)、相等(Eqv)和隐含(Imp)逻辑运算。
逻辑运算符的优先级低于数学运算符和关系运算符。
逻辑运算符本身也有优先级,其顺序为Not,And,Or,Xor,Eqv,Imp。
•5、表达式的执行顺序:
:
•1)函数运算;
•2)算术运算;
•3)关系运算;(优先级:
=,<,>,<>,<=,>=)•4)逻辑运算;
•注:
乘除法同时出现时,遵循从左到右顺序;括号的运算总是优先;字符串连接(&)不是算术运算符,但其优先顺序在所以算术运算符之后,又优先于其他运算符
•七、输入与输出:
•InputBox函数:
InputBox函数可以产生一个对话框,用于将用户从键盘输入的数据作为函数的返回值返回到当前程序中。
•①返回数值型数据。
格式如下:
•InputBox(prompt
[,title][,defualt][,xpos,ypos][,helpfile,context])•②返回字符串型数据。
格式如下:
•InputBox$(prompt
[,title][,defualt][,xpos,ypos][,helpfile,context])•其中的参数含义为:
•prompt:
一个字符串,显示出现在对话框中的用来提示用户的信息,最大长度为1024个字符。
•Title:
一个字符串,显示出现在对话框的顶部的标题信息。
•default:
一个字符串,用于显示输入缓冲区的默认信息,即用户在执行了InputBox函数后如果没有输入任何信息,则可用此字符串作为默认的输入值。
•xpos:
整数值,用于表示对话框与屏幕左边界的距离。
•ypos:
整数值,用于表示对话框与屏幕上边界的距离。
•Helpfile:
字符串型变量或字符串表达式,用于表示要用的帮助文件的名字。
•context:
整数型变量或表达式,用于表示相关帮助主题的目录号。
•Print方法——用于输出显示。
它既可以用于窗体,也可以用于其他控件上;它可以在窗体上显示文本字符串和表达式的值,也可以在其他图形对象或打印机上输出信息。
格式:
•[对象名称。
]Print[表达式表][,|;]
•对象名称是一个可选项,可以是窗体、图片框或打印机,如果省略,则在当前窗体上直接输出;
•表达式表是一个或多个字符串或数值表达式,用以原样输出字符串或表达式的值。
也是可选项。
如果省略,则输出一个空行;
•当需要输出多个字符串或表达式值时,各表达式间用逗号、分号或空格分隔,其中逗号分隔为标准输出格式,14个字符位为一个输出区段单位,逗号后面的表达式在下一区段输出,分号和空格分隔,则是按照紧凑格式输出;
•Print方法兼有输出和计算双重作用,即可以先计算表达式的值后输出;
•每执行一次Print方法将自动换行,要显示在同一行上,可以在前一Print方法行的末尾加上一个逗号或分号。
•与Print方法相关的还有一些函数和方法:
•
(1)Tab函数:
可以把光标移动到由参数n指定的位臵,并从这个位臵开始输出信息。
格式为:
•Tab(n)
•其中n为一个整数值,指出下一个输出位臵的列号,如果当前位臵已经超出n,则自动下移一行,默认最左边的列号为1;•当n大于行宽时,显示位臵为nMod行宽;
•当一个Print方法对应n个Tab函数时,每个Tab函数对应一个输出项,各输出项之间用逗号分隔。
•
(2)空格函数:
用空格函数可以返回n个空格,格式为:
•Space$(n)•(3)Spc函数:
在用Print输出时可以用Spc函数跳过n个空格,格式为:
•Spc(n)•(4)Cls方法:
使用Cls方法可以清除Print方法显示在对象上的内容,并将光标移动到对象的左上角(0,0)位臵。
格式为:
•[对象。
]Cls
•其中,“对象”为可选项,如果省略,则清除当前窗体内的内容。
•例1:
设计一个程序,输入一组学生信息:
学号、姓名、性别、年龄和入学成绩。
用窗体单击事件激发。
•解:
PrivateSubForm_Click()
•num$=“请输入学号:
”•msgtitle$=“学生登记表信息”
•nname$=“请输入姓名:
”•sex$=“请输入性别:
”•age$=“请输入年龄:
”•sco$=“请输入入学成绩:
”•••••••Studentnum$=InputBox$(num$,Msgtitle$)
Studentname$=InputBox$(nname$,Msgtitle$)
Studentsex$=InputBox$(sex$,Msgtitle$)
Studentage%=InputBox(age$,Msgtitle$)
Studentsco%=InputBox$(sco$,Msgtitle$)
Cls
PrintStudentnum$;“,”;Studentname$;“,”Studentsex$;“,现年”
•PrintStudentage%;“岁”;“,入学成绩”;Studentsco%;“分”•EbdSub•(5)MsgBox函数:
VisualBasic中除了可以用Print方法在窗体或控件上输出程序执行结果等信息外,还提供了一种在适当的时候可在屏幕上显示一个对话框,让用户进行选择,并根据选择确定后续操作的功能。
•格式:
•MsgBox(prompt[,buttons][,title]
[,helpfile,context])
•各参数含义为:
•prompt:
一个字符串,最大长度1024字符,输出的提示信息,当一行显示不下时,自动换行;
•buttons:
整数值或符号常量,指示显示按钮的数目及形式,使用的图标样式,默认按钮是什么以及消息框的强制回应等等。
如果省略,其缺省值为0;
•title:
显示在对话框标题栏中的信息,缺省值为该应用程序名;•helpfile:
字符串表达式,识别用来向对话框提供上下文相关帮助的帮助文件,如果有这个选项,则必须有context选项;
•context:
数值表达式,由帮助文件的作者指定给适当帮助主题的帮助上下文编号,同理,如果有这一选项,则必须有helpfile选项。
•表中的数值分为四类:
0~5为对话框中命令按钮的类型和数量,每个数值表示一种组合方式;
16、32、
48、64为指定对话框所显示的图标;
0、256、
512、768指定默认的活动按钮;
0、4096用于应用程序和系统强制返回。
Buttons的参数值由这四类数值组成,其组成原则是从每一类中选择一个值,把这几个值加起来就获得了Buttons参数的值,在大多数应用中,只使用前三类,不同的组合会得到不同的结果。
例如:
•19=3+16+0:
显示“是”、“否”和“取消”按钮和“暂停”图标;•34=2+32+0:
显示“终止”、“重试”和“忽略”按钮和“疑问”图标;MsgBox的返回值如下表:
•例2:
设计一个窗体单击事件过程,要求程序执行时出现提示信息:
“请确认操作正确否?
”,并在消息框的标题上显示“操作确认”标题,如果回答“是”,则将返回值6赋予变量a,并在窗体上显示返回值的平方,否则,如果选择“否”,则返回值为7,在窗体上显示“重新操作并确认!
”
•该程序产生的对话框中有三个按钮即“是”、“否”、“取消”•程序代码如下:
••••••••••••PrivateSubForm_Click()
DimMsgAsString,titleAsString
DimaAsInteger
Msg="请确认操作正确否?
"
title="操作确认"
a=MsgBox(Msg,19,title)
Ifa=6Then
Printa^2
ElseIfa=7Then
Print"请重新操作并确认!
"
EndIf
EndSub
•八、语句与控制流•1、注释语句:
•注释用来说明程序中某些语句的功能和作用。
在VB中用“„”和Rem来标识一条注释语句。
VB程序在解释运行或编译过程中,不会处理Rem后面那一行注释语句。
•2、赋值语句:
•目标操作符=源操作符
•//操作符两边的数据类型必需一致!
•3、暂停语句:
•格式:
Stop
•//当程序执行到Stop时,自动打开立即窗口•4、结束语句:
格式:
End//常用于结束程序•5、条件分支结构•••••
(1)If…语句的三种格式:
第一种是单分支格式:
If条件Then
[语句]
EndIf//其中加“[]”部分为可选择部分。
第二种是双分支格式:
•If条件Then
•[语句块1]
•[Else
•语句块2]
•EndIf
这里是双分支,即如果条件满足,执行语句块1,否则,执行语句块2。
注意:
语句块中的语句不能与其前面的Then在同一行上!
第三种格式:
•If条件1Then
•[语句块1]
•[ElseIf条件2Then
•语句块2]
•……
•Elseif条件nThen
•语句块n
•[Else
•语句块]
•EndIf•
(2)IIf函数
•VB提供了一种用来执行简单条件判断的函数IIf,它是“If……Then……Else”结构的简单版本,格式如下:
•Result=IIf(条件,为“True”的执行语句,为“False”的执行语句)
•这里的Result是函数的返回值,括号中的三项均不能省略,执行的操作为首先判断条件,当“条件”为真的时候,执行“为“True”的执行语句”,否则执行“为“False”的执行语句”。
••••••••
•例如有如下判断条件:
Ifa>8Then
x=3
Else
x=0
EndIf
用IIf函数替代,则可简化为:
x=IIf(a>8,3,0)
类似于C语言中的条件表达式:
•表达式1?
表达式2:
表达式3
•例:
Max=(a>b)?
a:
b;•2.SelectCase…语句
•SelectCase…语句很适合多重条件判断。
它的书写格式为:
•Selectcase测试表达式
•Case表达式结果1
•[语句块1]
•[Caset表达式结果2
•语句块2]
•……
•[Casetelse
•语句块n]
•EndSelect
•测试表达式既可以是数值表达式,也可以是字符串表达式,通常为变量或常量;每个语句块由一行或多行合法的VisualBasic语句构成;表达式结果
1、表达式结果2……被称为域值,它可以是:
表达式[,表达式]……、表达式To表达式或者Is关系运算表达式(运算符可以是:
<,<=,>,>=,<>,=)之一。
例如:
•Case1,3,5,7
•Case1To6
•CaseIs>=a-b
•这三种表现形式均合法,但应该注意表达式结果中的表达式必须与测试表达式的类型一致。
•例:
从键盘上输入学生考试成绩的等级,然后按照考试成绩的等级显式出百分制的分数段,可以用SelectCase…语句来实现:
•SubForm_click()
•DimgradeAsString,Msg
•Msg=”请输入学生的成绩等级:
”•grade=InputBox$(Msg)
•IfNotIsNull(grade)Then
•SelectCasegrade
•Case“A”
•Msg=”85~100”
•Case“B”••••••••••
•Msg=“70~84”
Case“C”
Msg=“60~69”
Case“D”
Msg=“<60”
CaseElse
Msg=“error!
”
EndSelect
EndIf
MsgBoxMsg
EndSub•6、循环结构:
•1.For…Next语句
•语句格式:
•For循环变量=初值To终值[Step步长]
•[语句]
•[ExitFor]‟用于在特定条件下退出循环
•[语句]
•Next[计数器]
•其中:
•①循环变量:
数值型变量,用于统计循环次数的变量。
•②初值:
数值型变量,用于设臵循环变量的初始值。
•③终值:
数值型变量,用于设臵循环变量的终结值。
•④步长:
数值型变量,用于决定每次循环变量的变化值。
可为正值亦可为负值,默认为1。
•这里遵循:
“先检查、后执行”的原则,循环次数由初值、终值和步长决定;
•For语句和Next语句必须成对出现,且For语句必须在Next语句之前;•For-Next循环是可以嵌套的,且嵌套层数没有限制,但每个循环必须有唯一的一个变量名作为循环变量,内层循环的Next语句必须位于外层循环的Next语句之前,不可相互交叉;
•当内循环与外循环有相同的终值时,可以共用一个Next语句,但不能省略变量名;
•循环控制值既可