Visual Basic常用语句、函数和方法速查手册

Author: 陈富军 Date: 1996-06-28

        一、数组和变量
        1.声明及定义常量和变量(或数组变量)
        (1)Const语句
        功能:声明常量。
        格式:[Global]const constantname=expression[,constantname=expression]...
        说明:Global  在模块中声明常量时,把它放在Const前,所的常量对表单和模块内的全部过程起作用。
          constantname 常量名。
        expression 指派给常量名的表达式,可以是字母、其它常量、除乘方(^)外的算术或逻辑运算符,也可以是字符串。但不能使用连字符、变量、用户定义函数或Visual Basic内部函数。
        你可在常量名后加一个类型声明符,以指明常量的数据类型。
        (2)Dim 语句
        功能:声明变量并分配存贮空间。当在表单或模块中使用时,用Dim声明的变量对表单或模块内的所有过程有效。当在过程内使用时,声明的变量仅在该过程有效。
        格式:Dim varname[([subscripts)][As[New]type][,varname[([subscripts])[As[New type]]..
        说明:varname 变量名
        subscripts 数组变量的维数。可声明多维,其语法为:
        [lower To]upper[,[lower To]upper]...
        To用来指明数组变量维数的上、下界。下面几个语句是等效的:
        Dim A(8,3)
        Dim A(0 To 8,0 to 3)
        Dim A(8,0 To 3)
        数组的维数可以是负数。用于指定维数的subscripts范围是-32768~32767。例:
        Dim A(-4 To 10)
        Dim B(-99 To -5,-3 To 0)
        在Dim中,允许数组最大维数是60。
        As type 用来声明变量的数据类型。类型可以是Integer,Long,Single,Double,Currency,String(变长字符串),String *length(定长字符串),Variant(变型),用户定义类型或对象类型。定义每一个变量必须用As type项来分隔。
        New  建立特有对象类型的新例,例如Formal。New不能用于基本数据类型的新变量,也不能用于建立普通对象类型(如MDI表单,表单)或特有控制类型(CommandButton,TextBox等)的变量。
        (3)Global语句
        功能:在模块部分声明全局变量并分配存贮空间。用Global声明的变量对表单和模块内的所有过程均有效。
        格式:Global varname[([subscripts])][As[New]type][,Varnme[([subscripts])][As[New]type]]...
        参数说明见Dim语句。
        (4)Static语句
        功能:在过程中声明变量并分配存贮空间。用Static声明的变量在程序运行中,其值始终保留。
        格式:Static varname[([subscripts])][As[New]type][,varname[([subscripts])][As[NEW]type]]...
        参数说明见Dim语句。
        变量初始化时,数字变量被初始化为0,Variant变量被初始化为Empty,变长字符串变量被初始化为0长度串(“”),定长字符串变量用0填充,用户定义类型变量按照各个变量域初始化。
        2.重新定义数组变量
        (1)ReDim语句
        功能:在过程中声明动态数组变量并分配或重新分配存贮空间。
        格式:ReDim[Preserve]varname(subscripts)[As type][,varname(subscripts)[As type]]...
        说明:
        Preserve当改变数组最后一维的大小时,保留数组中已有的数据。其它参数说明见Dim语句。
        能使用ReDim反复改变一个数组的元素数目,然而,不能改变一个数组的维数,例如:若声明的数组由两组组成(如:ReDim A(10,10)),不能把它变成一三维(如A(12,12,12))。同样,不能把一个整数类型的数组变成其它数据类型。若使用Preserve关键字,仅能改变数组最后一维的大小,并仍保留数组的内容。
        (2)Erase语句
        功能:重新初始化固定数组的元素,或释放动态数组的存贮空间。
        格式:Erase arrayname[,arrayname]...
        说明:arrayname要删除的数组名。
        对于固定数组:
        数组类型       删除效果
        数字数组       设置每个元素为0
        变长字符串数组 设置每个元素为0长度串(“”)
        定长字符串数组 设置每个元素为0
        Variant数组    设置每个元素为Empty
        用户定义类型数组 分别设置各个变量中元素
        对象数组       设置每个元素为Nothing
        对于动态数组,ERASE清除数组使用的内存。在使用它以前,必须用Redim或Dim重新声明数组的维数。
        3.寻找数组上下边界
        (1)LBound函数
        功能:返回数组某一维的最小有效下标。
        格式:LBound(array[,dimension])
        说明:array 数组变量名。
        dimension 指明返回某一维下界的整数。1为第一维,2为第二维。若省略,默认1。
        LBound和UBound一起用可确定数组的大小。
        (2)UBound函数
        功能:返回数组某一维的最大有效下标。
        格式:UBound(array[,dimension])
        4.改变数组低端缺省值,设备缺省变量类型
        Option Base语句
        功能:为数组下标声明缺省下界。
        格式:Option Base number
        说明:Option Base语句不是必需的。若使用,仅能在表单或模块中出现一次,且仅出现在声明区。必须在声明一个数组的维数之前先使用它。number的值必须是0或1,缺省为0。Option Base不影响用户定义类型里的数组。
        5.取得Variant变量的相关消息
        (1)IsDate函数
        功能:返回一个值,用来指定一个Variant变量能否转换为日期。
        格式:IsDate(variant)
        说明:variant是一个VarType 7(日期)或VarType 8(字符串)的Variant表达式。
        Variant若能合法地转为日期,IsDate返回True,否则返回False。有效日期范围是公元100年1月1日至9999年12月31日。
        (2)IsEmpty函数
        功能:返回一个值,用来指明一个Variant变量是否被初始化。
        格式:IsEmpty(variant)
        说明:variant 指任何一个Variant表达式。
        若 Variant包含一个Empty(空)值,IsEmpty返回True,否则返回False。当variant
        
        表达式包含多于一个Variant变量时,IsEmpty总是返回False。Empty值是指Variant没有被初始化,它不同于Null,Null表示Variant不含数据。
        (3)IsNumeric函数
        功能:返回一个值,用来指定Variant变量是否给转换为数字类型。
        格式:IsNumeric(variant)
        说明:variant任何Variant表达式。
        若表达式能合法地转换为数字类型,IsNumeric返回True,否则返回false。能合法地转换为数字类型的表达式包括:VarType 0(Empty),VarType 2~6,VarType 7(日期)和VarType 8(字符串)的Variant变量。
        (4)IsNull函数
        功能:返回一个值,用来指定Variant是否包含Null值。
        格式:IsNull(variant):
        说明:variant 指任何Variant表达式。
        若表达式包含Null值,IsNull返回True,否则返回False。Null意指Variant不含数据。
        注意:使用IsNull函数是Visual Basic内确定Variant表达式是否为Null值的唯一方式。
        (5)VarType函数
        功能:返回一个值,用来指定Variant的类型。
        格式:VarType(variant)
        说明:Variant为任何Variant变量
        VarType返回的值,提供了Variant存贮的数据类型的信息。其返回值意义如下:
        符号常量 值 说明 符号常量 值 说明
        VEMPTY 0 Empty VDOUBLE 5 Double
        VNULL 1 Null VCURRENCY 6 Currency
        VINTEGER 2 Integer VDATE 7 Date
        VLONG 3 Long VSTRING 8 String
        VSINGLE 4 Single
        注意:符号常量在Visual Basic文件CONSTANT.TXT中,当把它放入任何一个工程模块,可以在表单或模块中使用符号常量名。
        6.需要明确声明变量
        Option Explicit语句
        功能:强制所有的变量必须明确声明。
        格式:Option Explicit
        说明:该语句用在表单或程序模块部分,强制所有的变量在使用前必须明确声明,否则出错,若不用该语句,所有未声明的变量被当作Variant变量(除非缺省类型为Deftype语句重新指定)。
        7.指定数值
        Let语句
        功能:把一个表达式的值指派给一个变量。
        格式:[Let]variable=valueexpression
        说明:
        variable 变量名。
        = 分配符。
        valueexpression分配给变量的值。
        说明:Let是一个选项,不使用Let也能把一个字符串或数字表达式指派给一个变量。表达式的值仅能被指派给合适类型的变量。Variant变量既可被指定为字符串,也可被指定为数字,反之则不然。除Null外,任何Variant量可被指派给一个字符串变量。能被解释为唯一数字的Variant表达式可被指派给一个数字变量。使用IsNumeric函数能确定Variant是否能转换为数字。
        二、转换
        1.ASCII值转换为字符串
        Chr,Chr$函数
        功能:返回一个ANSI码所对应的字符。
        格式:Chr[$](charcode)
        说明:charcode 0~255之间的整数。
        Chr返回一个Variant值;Chr$返回一个字符串。
        Microsoft Widows应用程序使用ANSI字符集,0~31之间的字符码是标准的非打印ASCII码,如Chr(10)是一个换行符。
        2.字符串转换为ASCII值
        Asc函数
        功能:返回字符串表达式首字符的ASCII码值。
        格式:Asc(stringexpression)
        说明:stringexpression字符串表达式。若它是零长度字符串或是一个Null(VarType 1的Variant量),则运行出错。
        3.数字转换为字符串
        Str,Str$函数
        功能:返回一个数字值所代表的字符串
        格式:Str[$](number)
        说明:Str返回一个Variant值;Str$返回一个字符串。
        使用Str[$]可把简单的数字转换成字符串,使用Fromat[$]函数可把数字值转换成想要的格式(如:日期,时间,货币或其它用户定义的格式)。
        数字被转换成文本时,总是为数字符号位保留一个前置空格。若是正数,转换后正号省略。Fromat[$]不含前置空格。Val函数是Str[$]反运算。
        4.字符串转换为数字
        Val函数
        功能:返回一个字符串的数值。
        格式:Val(stringexpression)
        说明:stringexpression 能被转换成数字值的字符序列。
        Val函数在第一个字符不能作为数字部分识别时,则停止读字符串。
        Val跳过空行、Tab、换行符等变量串,例如:
        Val("   1615198th Street N.E.")  返回161615198
        有些符号常被认为是数字值的一部分,例如:$符和逗号,Val不能识别它们。Val函数能识别数进制的基数前缀&O(八进制)和&H(十六进制)。
        5.数字类型转换为另一类型
        (1)CDbl函数
        功能:把一个数字表达式转换成双精度。
        格式:Cdbl(numericexpression)
        说明:numericexpression数字表达式。
        (2)CSng函数
        功能:把一个数字表达式转换为单精度。
        格式:Csng(numericexpression)
        说明:numericexpression  数字表达式。
        (3)CInt函数
        功能:把一数字表达式转换为整数
        格式:Cint(numericexpression)
        说明:numericexpression  数字表达式。
        (4)Clng函数
        功能:把一个数字表达式转换为长整型为(4字节)。
        格式:Clng(numericexpression)
        说明:numericexpression  数字表达式。
        (5)CVDate函数
        功能:把一个表达式转换为Variant类型7的值(即日期)
        格式:VCDate(expression)
        说明:expression 能被转换成日期的字符串或数字表达式,范围为:公元100年1月1日(-657434至9999年12月31日(2958465)。
        (6)Fix函数,Int函数
        功能:返回一个数的整数部分。
        格式:Int(number),Fix(number)
        说明:number任何数字表达式
        6.把十进制转换为16进制或8进制
        (1)Hex,Hex$函数
        功能:返回一个十六进制数字或数字字符串。
        格式:Hex[$](expression)
        说明:expression 数值表达式。在求值之前需要四舍五八成整数或长整数。
        (2)Oct,Oct$函数
        功能:返回一个八进制数字或数字字符串。
        格式:Oct[$](expression)
        说明:expression数值表达式。在求值之前需要四舍五入成整数或长整数。
        7.日期转换为串行数字
        (1)DateSerial函数
        功能:返回一个指定年,月,日的日期串。
        格式:DateSerial(year,month,day)
        说明:year 在100~9999之间的数字或数值表达式。
        month 在1~12之间的数字或数值表达式。
        day 在1~31之间的数字或数值表达式。
        DateSerial返回以内部双精度数字存贮的包含一个日期的Variant的VarType 7(日期)量,代表从January 1,100至December 31,9999。负数代表December 30,1899之间的日期。
        (2)DateValue函数
        功能:返回一个由字符串变量代表的日期数值。
        格式:DateValue(stringexpression)
        说明:stringexpression表示从January 1,100到December 31,9999的日期的字符串。它仅包含有效日期分隔符的分隔数字。
        8.串行数字转换为日期
        (1)Day函数
        功能:返回1~31之间的整数,代表日期变量中某月的某日。
        格式:Day(dateexpression)
        说明:dateexpression任何一个能代表日期和时间的数字或字符串表达式,范围在January 1,100至December 31,9999。
        (2)Month函数
        功能:返回一个1~12之间的整数,代表日期变量某年的某月。
        格式:Month(dateexpression)
        说明:Dateexpression 同上
        (3)Weekday函数
        功能:返回一个1~7之间的整数,代表日期变量的一周中的某一天。
        格式:Weekday(dateexpression)
        说明:Dateexpression 同上
        (4)Year函数
        功能:返回一个100~9999之间的整数,代表日期变量中的年。
        格式:Year(dateexpression)
        说明:Dateexpression 同上
        9.时间转换为串行数字
        (1)TimeSerial函数
        功能:返回一个指定的时、分、秒的时间串。
        格式:TimeSerial(hour,minute,second)
        说明:hour 在0(12:00 A.M.)至23(11:00 P.M.)之间的数值表达式。
        minute 在0~59之间的数值表达式。
        second 。
        可以使用下列形式:TimeSerial(12-6,0-15,0),表示5:45:00 A.M.
        (2)TimeValue函数
        功能:返回一个字符串所代表的时间值。
        格式:TimeValue(stringexpression)
        说明:stringexpression 表示时间 00:00:00(12:00:00 A.M.)至23:59:59(11:59:59 P.M.)的字符串。可以用12时制或24时制。若stringexpression包含日期信息,Time Value不能返回它。
        TimeSerial返回VarType 7(日期)的Variant量,它所对应的时间是以内部双精度形式存贮的0至0.9999之间的小数。这个数代表00:00:00至23:59:59。
        10.串行数字转换为时间
        (1)Hour函数
        功能:返回一个0~23之间的整数,代表日期变量中某天的某时。
        格式:Hour(dateexpression)
        (2)Minute函数
        功能:返回一个0~59之间的整数,代表日期变量中某时的某分钟。
        格式:Minute(dateexpression)
        (3)Second 函数
        功能:返回一个0~59之间的整数,代表时间变量中某分钟中的某秒。
        格式:Second(dateexpression)
        三、使用剪贴板
        (1)Clear语句
        功能:关闭所有文件、释放文件缓冲区、清除公共变量、设置数字和数组变量为0、串变量为NULL、初始化堆栈。Clear也改变任选项堆栈的大小。
        格式:Clear[,,stack&]
        说明:stack&为程序设置堆栈空间的大小。
        (2)GetData方法
        功能:从操作环境剪贴板对象中返回一个图片。
        格式:Clipboard.GetData([format])
        说明:format选项如下:
        符号常量 值 剪贴板格式
        CFBITMAP 2 位图(.BMP files)
        CFMETAFILE 3 Metafile(.WMF files)
        CFDIB 8 独立设备位图
        CFPALETTE 9 调色板
         0(或省略) 自动使用适当的格式
        注意:定义的符号常量在CONSTANT.TXT文件中,当把它放入工程文件中任何一个模块,能在任何代码模块使用符号常量。
        (3)GetFromat方法
        功能:返回一个整数,指示在操作环境剪贴板中是否有和指定格式相符的项。
        格式:Clipboard.GetFromat(format)
        说明:format选项如下:
        符号常量 值 剪贴板格式
        CFLINK &HBF00 DDE交换信息
        CFTEXT 1 文本
        CFBITMAP 2 位图(.BMP files)
        CFMETAFILE 3 Metafile(.WMF files)
        CFDIB 8 独立设备位图
        CFPALETTE 9 调色板
        若相符合,此方法返回True,其它则返回False。
        注意:定义的符号常量在CONSTANT.TXT文件中,当把它放入工程文件中任何一个模块,可在任何代码模块使用符号常量。
        (4)GetText方法
        功能:从操作环境剪贴板中返回一个文本串。
        格式:Clipboard.GetText([format])
        说明:format如下:
        符号常量 值 剪贴板格式
        CFLINK &HBF00 DDE交换信息
        CFTEXT 1 文本
        若format省略,则假定为CFTEXT。若剪贴板中没有和期望格式相匹配的文本串,返回一个0长度串(“”)。
        (5)SetText方法
        功能:在操作环境剪贴板中使用指定格式设置一个文本串。
        格式:Clipboard.SetText data[,format]
        说明:data 在剪贴板中被放的字符串数据。
        format 下列格式之一,若省略,则为CF_TEXT。
        符号常量 值 剪贴板格式
        CFLINK &HBF00 DDE交换信息
        CFTEXT 1 文本
        (6)SetData方法
        功能:在操作环境剪贴板上使用指定格式放置一个图片。
        格式:Clipboard.SetData data,[format]
        说明:data 放在剪贴板上图片(图象或图片特性)。
        format 能由Visual Basic识别的下列剪贴板格式之一,若为0或省略,SetData自动确定格式为CFBITMAP,任何相关的调色板将随同位图一起被拷贝至剪贴板:
        符号常量 值 剪贴板格式
        CFBITMAP 2 位图(.BMP files)
        CFMETAFILE 3 Metafile(.WMF files)
        CFDIB 8 独立设备位图
        CFPALETTE 9 调色板
        四、日期/时间
        1.取得当前时间及日期
        (1)Date,Date$函数
        功能:返回当前系统日期
        格式:Date[$]
        说明:Date返回一个Variant型的双精度值,Date$返回一个形式为mm-dd-yyyy的10个字母字符串。这里mm是月份(01~12),dd是日(01~31),yyyy是年(100~9999)。
        设置系统日期使用Date[$]语句。
        (2)Time,Time$
        功能:返回当前系统时间。
        格式:Time[$][()]
        说明:Time返回一个Variant型双精度值。Time$返回形式为hh:mm:ss的8个字符的串值。这里hh为时(00~23),mm为分钟(00~59),ss为秒(00~59),24小时时制。
        设置系统时间使用Time$语句。
        (3)Now函数
        功能:返回一个日期,按照计算机系统的日期和时间表示当前的日期和时间。
        格式:Now
        说明:Now返回以内部双精度数字存贮VarType 7(日期)的Variant量,代表从January 1,100至December 31,9999日期,其中January 1,1900是2。负数代表DEcember 30,1899之间的日期。小数点左边的数字表示日期,小数点右边的数字表示时间。
        注意:当直接显示时,Now函数返回一个作为显示用的短时期和时间格式的字符串。
        2.设置时间及日期
        Date,Date$语句
        功能:设置当前系统日期。
        格式:Date[$]=expression
        五、捕获错误
        1.取得错误状态
        (1)Err,Erl函数
        功能:返回错误状态。
        格式:Err,Erl
        说明:错误发生后,Err函数返回一个识别运行错误的整数。Erl函数返回发生错误所在行的行号。
        (2)Err 语句
        功能:将Err设置成指定值。
        格式:Err=n
        说明:n是1~32767之间的任一个整数,用来指定一个运行错误码,0意指没有错误发生。
        2.取得错误消息
        Error,Error$函数
        功能:返回与所给错误相应的错误消息。
        格式:Error[$][(errorcode)]
        说明:errorcode 1~32767之间的整数。若省略,则返回最近运行错误码所对应的消息;若错误码在Visual Basic中未被定义,则返回用户定义错误消息。
        Error返回一个Variant量;Error$返回一个串。
        3.模拟运行时期错误
        Error语句
        功能:模拟一个错误发生,可被用于产生用户定义错误。
        格式:Error errorcode
        说明:errorcode 1~32767之间的整数。若errorcode是由Visual Basic定义的错误码,Error语句模拟错误的发生,即:设置Err值给errorcode。要定义自己的错误码,使用的值要比任何由标准Visual Basic错误码使用的值大。
        六、文件I/O
        1.存取或创建文件
        Open语句
        功能:使输入/输出文件有效。
        格式:Open file[For mode][Access access][lock]As[#]filenumber[Len=reclen]
        说明:mode 指定文件模式,其保留字有:Append,Binary,Input,Output,Random。
        access 在打开的文件中指定允许的操作,其保留字有:Read,Write,Read,Write。
        lock 在打开的文件中指定允许由其它过程进行的操作,其保留字有:Shared,Lock Read,Lock Write,Lock Read Write。
        filenumber  1~255之间的整数表达式。当Open语句执行时,filenumbe只和打开的文件相关,其它I/O语句能使用该文件号涉及此文件。
        reclen 当以随机方式打开文件时,该参数表示记录长度;当以顺序方式打开文件时,该参数表示缓冲字符数。该参数是一个不大于32767的正整数。
        2.关闭文件
        (1)Close语句
        格式:结束一个文件的I/O
        格式:Close[[#]filenumber][,[#]filenumber]...
        说明:filenumber 用Open语句打开文件的文件号。它可以是任何一个求打开文件的文件号的数字表达式。省略时,则关闭所有打开的文件。
        (2)Reset语句
        功能:关闭所有磁盘文件
        格式:Reset
        3.写文件
        (1)Print #语句
        功能:把数据写入顺序文件
        格式:Print # filenumber,[[{Spc(n)|Tab(n)}][expressionlist][{;|,}]]
        
        说明:filenumber 文件号。它可以是任何一个求打开文件号的数字表达式。
        Spc(n) 把N个空格插入到输出中。允许多次使用。
        Tab(n) 输出前,在第N列使用Tab符。允许多次使用。
        若expressionlist省略,Print#语句在文件中输出一个空行,但必须包含一个逗号。
        (2)Put语句
        功能:把变量值写入磁盘。
        格式:Put[#]filenumber,[recordnumber],variablename
        说明:filenumber 文件号。它可以是任何一个求打开文件的文件号的数字表达式。
        recordnumber 记录数。最大可能的记录数是231-1。对于随机模式,该参数是被写进文件的记录数。对于二进制模式,该参数是文件要写的位置字节,第一个字节是位置1,第二个字节是位置2。若省略,下一个记录或字节被写入,且仍要包含限定符逗号。例如:Put#4,,FileBuffervariablename要写往文件的变量名。除对象变量和数组变量名外,任何变量均可被使用。然而,可使用描述数组一个元素的变量。
        4.控制输出格式
        (1)Spc函数
        功能:在Print#语句或Print方法里跳过指定的空格数。
        格式:Spc(number)
        说明:number 0~32767之间的整数,它决定输出的空格数。注意Spc函数多用于移动新的输出位置。
        (2)Tab函数
        功能:使用Print#语句和Print方法时,将下一个字符移到要输出的位置。
        格式:Tab(column)
        说明:column整数值。它决定新显示位置的列数。输出行的最左位置总是1。
        当使用Print#语句写文件时,最右输出位置是输出文件的当前行宽,再使用Width#语句设置。若当前行的当前输出位置大于column,Tab在下一个行跳过column列数,若column小于1,Tab移动1列输出位置。
        (3)Width#语句
        功能:给文件分配一个输出行宽。
        格式:Width#filenumber,width
        说明:filenumber文件号。
        width 0~255之间的数字表达式,用来指明在新行中出现多少个字符。若宽度是0,没有限制一行的长度,缺少行宽是0。Width#语句允许在已打开文件里改变输出行宽。
        5.读文件
        (1)Get语句
        功能:从磁盘文件读数据到变量中。
        格式:Get[#]filenumber,[recordnumber],variablename
        说明:filenumber 文件号。
        recordnumber 允许的最大记录数。对于随机模式,recordnumber是将被读的记录数;对二进制文件,recordnumber是开始读的字节位。
        variablename 用于接收从文件中输出数据的变量名。除对象和数组变量外,可以使用任何类型变量,然而,使用描述数组一个成份的变量名。
        (2)Input#语句
        功能:从顺序文件中读数据给变量。
        格式:Input#filenumber,variablelist
        说明:filenumber文件号。
        variablelist 逗号界定的变量表,它们由从文件读的值进行分配。在variablelist中,变量不能是数组变量,但可以是描述数组某个成份的变量。变量不能是用户定义类型,但可以是它的一个成份。除对象外,变量可以是其它各种类型。文件中数据项出现顺序必须和variablelist中出现的变量一致且类型相同;数字对应数字变量或Variant变量;日期和Null数据对应Variant变量。
        (3)Input,Input$函数
        功能:返回从顺序文件读的字符。
        格式:Input[$](n,[#]filenumber)
        说明:n 从文件中读的字符(字节)数,必须小65535。
        filenumber文件号。
        Input返回一个Variant量;Input$返回一个串。
        Input[$]函数仅能用于用Input或Binary模式打开的文件。和Input#语句不一样,Input[$]返回读取所有字符,包括逗号,回车,换行,引号和空格等。
        (4)Line Input#语句
        功能:从顺序文件读一行并送给字符串变量或Variant变量。
        格式:Line Input#filenumber,variablename
        说明:filenumber 文件名。
        variablename 用于接收文件中文本行的变量名。
        Line Input #语句读顺序文件中所有字符,直到回车符为止,然后跳过回车/换行符。
        6.取得文件消息
        (1)EOF函数
        功能:返回是否到达文件结尾的值。
        格式:EOF(filenumber)
        说明:如果到达文件尾,EOF函数返回True,否则返回False。
        (2)FileAttr函数
        功能:返回文件模式或操作系统中有关打开文件的信息。
        格式:FileAttr(filenumber,attribute)
        说明:filenumber 文件号。
        attribute 指明返回有关文件信息类型的数。使用2返回操作系统的文件号;使用1返回下列用于指定文件模式的值之一:
        返回值 1 2 4 8 32
        模式 Input Output Random Append Binary
        (3)FreeFile函数
        功能:返回下一个有效的未用文件号。
        格式:FreeFile[()]
        说明:当需要提供一个文件号并想确定它未被使用时,使用FreeFile函数。
        (4)FileDateTime函数
        功能:返回一个串,用来指明一个文件被建立或最后被修改的日期和时间。
        格式:FileDateTime(filename)
        说明:filenumber文件号
        (5)FileLen函数
        功能:返回一个长整数,用来指明文件的长度(字节)。
        格式:FileLen(filename)
        说明:filenumber文件号。
        (6)Loc函数
        功能:返回打开文件内部的当前位置。
        格式:Loc(filenumber)
        说明:filenumber文件号。
        对于Random文件,Loc函数返回的数代表最近读写文件的位置;对于顺序文件,Loc返回的代表文件中当前位置字节数除以128;对于Binary模式文件,Loc返回数表示最近读写字节的位置。
        (7)LOF函数
        功能:返回打开文件的大小。
        格式:LOF(filenumber)
        说明:filenumber文件号。
        LOF仅用于磁盘文件。要得到一个未打开文件的长度请用FileLen函数。
        (8)Seek函数
        功能:返回当前文件读写位置。
        格式:Seek(filenumber)
        说明:filenumber文件号。
        Seek返回一个1至231-1之间的值。对于Random模式,Seek返回下一个读写记录位置;对于Binary、Output、Append或Input模式,Seek返回下一个操作发生的位置。
        七、操作对象
        1.隐藏或显示表单
        (1)Show方法
        功能:显示表单
        格式:[form.]Show[style]
        说明:form 要显示的表单或MDI表单。若未指定,和当前表单模块相联系的表单被显示。
        style 决定表单是排父性还是非排父性的整数值。若style是0,则表单是非排父性;若style是1,则表单是排父性。
        若Show被执行时指定表单未装入,Visual Basic自动装入它。当显示一个排父表单时,在它被隐藏或删除前,其它表单上没有用户输入(键盘或鼠标)能发生。MDI表单不能以排父性被显示。
        注意:表单被显示后,Controls不是立即被画出,若遇到这种问题,使用DoEvents语句或Refresh方法,它们允许Paint事件完成加工。
        (2)Hide方法
        功能:隐藏一个表单但不删除它。
        格式:[form.]Hide
        说明:
        form 要隐藏的表单或MDI表单。
        当一个表单是隐含时,它从屏幕上消失且它的Visible属性被设置成False。隐含表单对用户来说是不可存取的,但对运行的Visual Basic程序是有效的。使用Hide方法时,若表单未装入则装入但不显示;当使用Hide隐含一个MDI表单时,不能隐含MDI表单的子表单。
        2.装入或删除对象
        (1)Load语句
        功能:把表单或控制装入内存。
        格式:Load object
        说明:object 要装入内存的表单或控制数组元素。
        除非想装一个不显示的表单,否则不必使用Load语句。任何涉及到的表单都将被自动装入内存(除Set或If...TypeOf语句外)。一旦表单被装入,它的属性和控制都能由程序改变,而不管表单实际上是不是可见的。
        (2)Unload语句
        功能:把表单和控制从内存中删除。
        格式:Unload object
        说明:同Load。
        3.移动及改变控制大小
        Move方法
        功能:移动一个表单或控制
        格式:[object.]Move left[,top[,width[,height]]]
        说明:object 要移动的表单或控制(除时间或菜单外)。
        left 指明对象左边界水平坐标的单精度值。
        top 指明对象上边界垂直坐标的单精度值。
        width 指明对象新宽度的单精度值。
        height 指明对象新高度的单精度值。
        仅变量left是需要的,然而,指定任何其它变量,必须指定格式中以前出现的所有变量。例如:不能指定width而不指定left和top。未指定的变量仍不改变。
        在表单和帧里的控制,坐标系统总是以twips为单位,移动屏幕里的表单或帧里的控制总是和左上角坐标(0,0)相关。坐标系统使用ScaleHeight、ScaleWidth、ScaleLeft和ScaleRig
        
        ht属性设置。
        4.拖曳后放下
        Drag方法
        功能:开始、结束或取消拖曳的控制。
        格式:[control.]Drag[action]
        说明:control 被拖曳的控制,除Line、Menu、Shape或Timer外,其它控制均可被拖曳。
        action 0~2之间的整数值,用来指定要执行的动作。若action省略,开始拖曳控制。各值意义如下:
        0 取消拖曳操作
        1 开始拖曳操作
        2 结束拖曳即放下
        说明:当属性DragMode被设置为0(手控)时,才要求使用Drag方法对控制进行拖曳和落下。然而,属性DragMode是1(自动)时,仍可以在控制上使用Drag。当控制被拖曳时,若想要鼠标指针变化,或者使用DragIcon属性,或者使用MousePointer属性定义指针。
          注意:不指定DragIcon属性时才能使用MousePointer属性。
        5.安排表单或控制
        Attange方法
        功能:在MDI表单里安排窗口或图标。
        格式:mdiform.Arrange arrangement
        说明:mdiform MDI表单。它的子窗口或图标要被安排。
        arrangement 指定如何在一个MDI表单安排窗口或图标,其值如下:
        符号常量 值 说明
        CASCADE 0 瀑布式所有非最小化MDI子表单
        TILEHORIZONTAL 1 水平贴面式所有非最小化MDI子表单
        LTILEVERTICA 2 垂直贴面式所有非最小化MDI子表单
        ARRANGEICONS 3 安排最小化的MDI子表单
        注意:arrangement符号常量在Visual Basic文件CONSTANT.TXT
        6.设置输入控制权
        SetFocus方法
        功能:设置表单或控制的控制权(焦点)。
        格式:object.SetFocus
        说明:object一个能获得控制权的表单、MDI表单或控制。
        说明:除Frame、Image、Line、Menu、shape和Timer外SetFocus可以用于任何控制。SetFocus被执行后,任何用户输入直接转到指定的表单或控制。用户仅能设置可见表单或控制的控制权,不能对Enabled属性为假的表单或控制进行设置。
        7.打印表单
        PrintForm方法
        功能:把一个非MDI表单的位图送打印机。
        格式:[form.]PrintForm
        说明:form 要打印的非MDI表单。若省略,则打印当前表单。
        PrintForm打印表单上所有可见的控制或位图,也打印加到表单上的图形或在运行期间加到控制上的图片,此时AutoRedraw必须为True。由PrintForm使用的打印机由Microsoft Windows 控制面板确定。
        8.列表框与组合框相关动作
        (1)AddItem 方法
        功能:增加一个新项到列表框或组合框,或在运行期间增加一个新行到网格控制上。
        格式:control.addItem item[,index]
        说明:control 列表框,组合模式,或网格控制。
        item 加到控制上的字符串表达式。对网格控制,使用tab字符(码09)分隔想插入一个新加行的每一列的多个字符串。