vb6.0语句大全

Vb6.0语句大全1、AppActivate语句激活一应用程序窗口。语法AppActivatetitle[,wait]AppActivate语句的语法具有以下几个命名参数：部分描述title必需的。字符串表达式，所要激活的应用程序窗口的标题。可以使用Shell函数返回的任务识别码来替换title，以激活应用程序。wait可选的。Boolean值，说明在激活另一个应用程序之前调用的应用程序是否有焦点。如果为False（缺省），那么，即使调用的应用程序没有焦点，也直接激活指定的应用程序。如果为True，则调用的应用程序会等到有焦点后，才激活指定的应用程序。说明AppActivate语句将焦点移动到命名的应用程序或窗口，但并不影响焦点是否最大化或最小化。当用户采取行动改变焦点或将窗口关闭时，就会将焦点从活动的应用程序窗口移动出去。可用Shell函数启动一个应用程序并设置窗口样式。在决定激活哪个应用程序时，请将title与每一个运行中的应用程序的标题字符串进行比较。如果没有完全匹配，就激活任何这样的应用程序，其标题字符串以title开头。如果以title命名的应用程序有很多实例，则激活任何一个实例。AppActivate语句示例本示例说明使用AppActivate语句来激活应用程序的各种用法。示例中用到的Shell语句均假定该应用程序已经存在指定的路径中。DimMyAppID,ReturnValueAppActivateMicrosoftWord'激活MicrosoftWord。'AppActivate也可利用Shell函数的返回值。MyAppID=Shell(C:\WORD\WINWORD.EXE,1)'运行MicrosoftWord。AppActivateMyAppID'激活MicrosoftWord。'您也可使用Shell函数的返回值。ReturnValue=Shell(c:\EXCEL\EXCEL.EXE,1)'运行MicrosoftExcel。AppActivateReturnValue'激活MicrosoftExcel。2、Beep语句通过计算机喇叭发出一个声调。语法Beep说明呼叫的频率与时间长短取决于硬件和系统软件，并随电脑不同而不同。.Beep语句示例本示例使用Beep语句让计算机连续响三声。DimIForI=1To3'循环3次。Beep'发出一声。NextI3、Call语句将控制权转移到一个Sub过程，Function过程，或动态连接库(DLL)过程。语法[Call]name[argumentlist]Call语句的语法具有以下几个部分：部分描述Call可选参数；关键字。如果指定了这个关键字，则argumentlist必须加上括号，例如：CallMyProc(0)name必要参数，要调用的过程名称。argumentlist说明调用一个过程时，并不一定要使用Call关键字。如果使用Call关键字来调用一个需要参数的过程，argumentlist就必须要加上括号。如果省略了Call关键字，那么也必须要省略argumentlis外面的括号。如果使用Call语法来调用内建函数或用户定义函数，则函数的返回值将被丢弃。若要将整个数组传给一个过程，使用数组名，然后在数组名后加上空括号。Call语句示例下列示例示范如何使用Call语句来将控制转移到子过程、内在函数、和动态链接库（DLL）过程，'调用一个子过程。CallPrintToDebugWindow(HelloWorld)'上面的语句将控制转移到下面的子过程。SubPrintToDebugWindow(AnyString)Debug.PrintAnyString'在“立即”窗口中显示。EndSub'调用一个内在函数，函数的返回值被忽略不处理。CallShell(AppName,1)'AppName包含可执行文件的路径。'调用MicrosoftWindowsDLL过程。该声明语句必需是类模块中的私有的，而不是标准模块中的。PrivateDeclareSubMessageBeepLibUser(ByValNAsInteger)SubCallMyDll()CallMessageBeep(0)'调用WindowsDLL过程。MessageBeep0'再次调用，但不用“调用”这个关键字。EndSub4、ChDir语句改变当前的目录或文件夹。语法ChDirpath必要的path参数是一个字符串表达式，它指明哪个目录或文件夹将成为新的缺省目录或文件夹。path可能会包含驱动器。如果没有指定驱动器，则ChDir在当前的驱动器上改变缺省目录或文件夹。说明ChDir语句改变缺省目录位置，但不会改变缺省驱动器位置。例如，如果缺省的驱动器是C，则下面的语句将会改变驱动器D上的缺省目录，但是C仍然是缺省的驱动器：ChDirD:\TMPChDir语句示例本示例使用ChDir语句来改变当前目录或文件夹。'将当前目录或文件夹改为“MYDIR”。ChDirMYDIR'假设当前的驱动器是“C:”，下列语句将把'缺省目录改至“D:”，而“C:”仍旧是当前驱动器。ChDirD:\WINDOWS\SYSTEM5、ChDrive语句改变当前的驱动器。语法ChDrivedrive必要的drive参数是一个字符串表达式，它指定一个存在的驱动器。如果使用零长度的字符串()，则当前的驱动器将不会改变。如果drive参数中有多个字符，则ChDrive只会使用首字母。ChDrive语句示例本示例使用ChDrive语句来改变当前的驱动器。ChDriveD'使“D”成为当前驱动器。6、Close语句关闭Open语句所打开的输入/输出(I/O)文件。语法Close[filenumberlist]可选的filenumberlist参数为一个或多个文件号，其中filenumber为任何有效的文件号，语法如下：[[#]filenumber][,[#]filenumber]...说明若省略filenumberlist，则将关闭Open语句打开的所有活动文件。当关闭Output或Append打开的文件时，将属于此文件的最终输出缓冲区写入操作系统缓冲区。所有与该文件相关联的缓冲区空间都被释放。在执行Close语句时，文件与其文件号之间的关联将终结。Close语句示例本示例使用Close语句来关闭所有为Output而打开的三个文件。DimI,FileNameForI=1To3'循环三次。FileName=TEST&I'创建文件名。OpenFileNameForOutputAs#I'打开文件。Print#I,Thisisatest.'将字符串写入文件。NextIClose'将三个已打开的文件全部关闭。7、Const语句声明用于代替文字量的常数。语法[Public|Private]Constconstname[Astype]=expressionConst语句的语法包含下面部分：部分描述Public可选的。该关键字用于在模块级别中声明在所有模块中对所有过程都可以使用的常数。在过程中不能使用。Private可选的。该关键字用于在模块级声明只能在包含该声明的模块中使用的常数。不能在过程中使用。constname必需的。常数的名称；遵循标准的变量命名约定。type可选的。常数的数据类型；可以是Byte、布尔、Integer、Long、Currency、Single、Double、Decimal（目前尚不支持）、Date、String或Variant。所声明的每个变量都要使用一个单独的As类型子句。expression必需的。文字，其它常数，或由除Is之外的任意的算术操作符和逻辑操作符所构成的任意组合。说明在缺省情况下常数是私有的。过程中的常数总是私有的；它们的可见性无法改变。在标准模块中，可以用Public关键字来改变模块级常数可见性的缺省值。不过，在类模块中，常数只能是私有的，而且用Public关键字也不能改变其可见性。为了在一行中声明若干个常数，可以使用逗号将每个常数赋值分开。用这种方法声明常数时，如果使用了Public或Private关键字，则该关键字对该行中所有常数都有效。在给常量赋值的表达式中，不能使用变量，用户自定义的函数，或VisualBasic的内部函数（如Chr）。注意常数可以使程序更具可读性，以及易于修改。在程序运行时，常数不会象变量那样无意中被改变。如果在声明常数时没有显式地使用Astype子句，则该常数的数据类型是最适合其表达式的数据类型。在Sub、Function或Property过程中声明的常数都是该过程的局部常数。在过程外声明的常数，在包含该声明的模块中被定义。在可以使用表达式的地方，都可以使用常数。Const语句示例该示例使用Const语句来声明用于代替文字值的常数。Public常数在标准模块的通用部分声明，而不是在类模块中声明。Private常数可以在任何模块类型的通用部分声明。'缺省情况下常数是私有的。ConstMyVar=459'声明公用常数。PublicConstMyString=HELP'声明私有的整数常数。PrivateConstMyIntAsInteger=5'在一行中声明多个常数。ConstMyStr=Hello,MyDoubleAsDouble=3.45678、Date语句设置当前系统日期。语法Date=date对于运行MicrosoftWindows95的系统，要设置的date必须介于1980年1月1日与2099年12月31日之间。对于运行MicrosoftWindowsNT的系统，date必须介于公元1980年1月1日到2079年12月31日之间。Date语句示例本示例使用Date语句来设置系统日期。在开发环境中，日期原义会根据系统的地区设置，以短式日期格式显示。DimMyDateMyDate=#February12,1985#'指定某个日期。Date=MyDate'改变系统日期。9、Declare语句用于在模块级别中声明对动态链接库(DLL)中外部过程的引用。语法1[Public|Private]DeclareSubnameLiblibname[Aliasaliasname][([arglist])]语法2[Public|Private]DeclareFunctionnameLiblibname[Aliasaliasname][([arglist])][Astype]Declare语句的语法包含下面部分：部分描述Public可选的。用于声明对所有模块中的所有其它过程都可以使用的过程。Private可选的。用于声明只能在包含该声明的模块中使用的过程。Sub可选的（但Sub或Function二者需选其一）。表示该过程没有返回值。Function可选的（但Sub或Function二者需选其一）。表示该过程会返回一个可用于表达式的值。name必需的。任何合法的过程名。注意动态链接库的入口处（entrypoints）区分大小写。Lib必需的。指明包含所声明过程的动态链接库或代码资源。所有声明都需要Lib子句。libname必需的。包含所声明的过程动态链接库名或代码资源名。Alias可选的。表示将被调用的过程在动态链接库(DLL)中还有另外的名称。当外部过程名与某个关键字重名时，就可以使用这个参数。当动态链接库的过程与同一范围内的公用变量、常数或任何其它过程的名称相同时，也可以使用Alias。如果该动态链接库过程中的某个字符不符合动态链接库的命名约定时，也可以使用Alias。aliasname可选的。动态链接库或代码资源中的过程名。如果首字符不是数字符号(#)，则aliasname是动态链接库中该过程的入口处的名称。如果首字符是(#)，则随后的字符必须指定该过程的入口处的顺序号。arglist可选的。代表调用该过程时需要传递的参数的变量表。type可选的。Function过程返回值的数据类型；可以是Byte、布尔、Integer、Long、Currency、Single、Double、Decimal