资源描述：
《VB第1讲 语言基础.doc》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。
1、VB第1讲语言基础1.1VB的数据类型1.1.1系统基本类型类型符前缀字节数数据范围整型Integerint2-32768-32767长整型Longlng4--单精度Singlesng4双精度Doubledbl8字节型Bytebyt10-255逻辑型Booleanbln1True-1False0字符串Stringstr不定0-65535格字符日期型Datedtm8100.1.1-9999.11.31货币型Currencycur8对象型Objectobj4任何对象引用变体型Variantvnt不定根据实际类型数据形式类型符常量形式VarTyp
2、e的返回值Integer23、-234、45%&O12(8进制)&H12(16进制)vbIntegerLong45&、234&vbLongSingle-123!vbSingleDouble11.345、11.345#、0.123E-3vbDoubleString"String123""我爱VB"vbStringDate#2007-2-2212:34:56#vbDateCurrency123.45@、123@vbCurrency 算术运算中类型的转换方向： Integer→Long→Single→Double→Currency1.1.2用户自
3、定义类型看示例，学语法。TypeStudentidasStringnameasStringScoreAsSingleEndType一般定义于标准模块文件中，全局可用。若定义于窗体中，需加Private前缀，且只能本窗体使用。1.2常量与变量1.1.1常量直接常量：数值/字符/逻辑/日期常量、符号常量(便于程序的阅读和修改)Const符号常量名 (As 类型)=表达式ConstPI=3.1415 ConstXAsInteger=5ConstR#=3.0 ConstAREA=PI*R 系统常量（32类近千个常量）：颜色/绘图/键码..
4、.vbBlack&H0vbRed&HFFvbGreen&HFF00vbYellow&HFFFFvbBlue&HFF0000vbMagenta&HFF00FFvbCyan&HFFFF00vbWhite&HFFFFFF1.1.2变量变量名字：用于标识内存单元。（不分大小写字母；）变量类型：明确内存单元的编码方式。显式声明Dim 变量名 (As类型)DimintXAsintegerDimdblA,dblBAsDoubleDimaAsString*10,bAsString隐式声明未声明的变量，其默认类型是Variant类型类型声明字符：Intege
5、r(%),Long(&),Single(!),Double(#),Currency(@),String($)强制所有变量必须定义：OptionExplicit1.1.3Variant的自动类型转换DimVal'被声明为Variant型Val="18" '类型为字符串Val=Val-15 '类型为数值Val="U"&Val'类型为字符串类型识别函数：VarType(...)1.3表达式1.3.1算符及优先级算术算符＾,*,/,,Mod,+,-字符算符&,+关系运算=,>,>=,<,<=,<>,Like逻辑运算Not,And,Or优先级：算
6、术算符>字符算符>关系算符>逻辑算符同级运算从左到右，括号优先1.3.3太灵活的表达式运算日期型数据的加减运算DateB-DateADateA+NDateA-N字符串和整数/实数的随意转换"VB"+"6.0":"VB6.0""VB"&"6.0":"VB6.0"56.78+"10":66.7856.78&10:"56.7810"1.4基本控制结构1.4.1顺序结构一行可以书写多条语句，语句间用冒号“:”分割；注释以“‵”开始。1.4.1.1调试学习InputBoxPrivateSubCommand1_Click()DimstrNameAsSt
7、ring*10,strSAsString*10strS="输入姓名"+vbCrLf+"然后单击确定按钮"strName=InputBox(strS,"输入框")PrintstrNameEndSub1.4.1.2调试学习MsgBoxPrivateSubCommand1_Click()msg1="是否继续执行操作?"msg2="MsgBox函数的调用"result=MsgBox(msg1,vbOKCancel,msg2)PrintresultEndSub1.4.1.3学习Space、StringPrivateSubCommand1_Click(
8、)Form1.Cls'ClsFori=1To6PrintSpace(6-i);PrintString(i,"●")NextiForj=1To5PrintSpace(j);Prin
