vb6.0语句大全讲义.doc

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
vb6.0语句大全讲义

Vb6.0语句大全 1、AppActivate 语句?????? 激活一应用程序窗口。 语法 AppActivate title[, wait] AppActivate 语句的语法具有以下几个命名参数: 部分 描述 title 必需的。字符串表达式,所要激活的应用程序窗口的标题。可以使用 Shell 函数返回的任务识别码来替换 title,以激活应用程序。 wait 可选的。Boolean 值,说明在激活另一个应用程序之前调用的应用程序是否有焦点。如果为 False(缺省),那么,即使调用的应用程序没有焦点,也直接激活指定的应用程序。如果为 True,则调用的应用程序会等到有焦点后,才激活指定的应用程序。 说明 AppActivate 语句将焦点移动到命名的应用程序或窗口,但并不影响焦点是否最大化或最小化。当用户采取行动改变焦点或将窗口关闭时,就会将焦点从活动的应用程序窗口移动出去。可用 Shell 函数启动一个应用程序并设置窗口样式。 在决定激活哪个应用程序时,请将 title 与每一个运行中的应用程序的标题字符串进行比较。如果没有完全匹配,就激活任何这样的应用程序,其标题字符串以 title 开头。如果以 title 命名的应用程序有很多实例,则激活任何一个实例。 AppActivate 语句示例 本示例说明使用 AppActivate 语句来激活应用程序的各种用法。示例中用到的 Shell 语句均假定该应用程序已经存在指定的路径中。 Dim MyAppID, ReturnValue AppActivate Microsoft Word 激活 Microsoft Word。 AppActivate 也可利用 Shell 函数的返回值。 MyAppID = Shell(C:\WORD\WINWORD.EXE, 1) 运行 Microsoft Word。 AppActivate MyAppID 激活 Microsoft Word。 您也可使用 Shell 函数的返回值。 ReturnValue = Shell(c:\EXCEL\EXCEL.EXE,1) 运行 Microsoft Excel。 AppActivate ReturnValue 激活 Microsoft Excel。 2、Beep 语句?????? 通过计算机喇叭发出一个声调。 语法 Beep 说明 呼叫的频率与时间长短取决于硬件和系统软件,并随电脑不同而不同。. Beep 语句示例 本示例使用 Beep 语句让计算机连续响三声。 Dim I For I = 1 To 3 循环 3 次。 Beep 发出一声。 Next I 3、Call 语句?????? 将控制权转移到一个 Sub 过程,Function 过程,或动态连接库 (DLL)过程。 语法 [Call] name [argumentlist] Call 语句的语法具有以下几个部分: 部分 描述 Call 可选参数;关键字。如果指定了这个关键字,则 argumentlist 必须加上括号,例如: ? Call MyProc(0) name 必要参数,要调用的过程名称。 argumentlist ? 说明 调用一个过程时,并不一定要使用 Call 关键字。如果使用 Call 关键字来调用一个需要参数的过程,argumentlist 就必须要加上括号。如果省略了 Call 关键字,那么也必须要省略 argumentlis 外面的括号。如果使用 Call 语法来调用内建函数或用户定义函数,则函数的返回值将被丢弃。 若要将整个数组传给一个过程,使用数组名,然后在数组名后加上空括号。 Call 语句示例 下列示例示范如何使用 Call 语句来将控制转移到子过程、内在函数、和动态链接库(DLL)过程, 调用一个子过程。 Call PrintToDebugWindow(Hello World) 上面的语句将控制转移到下面的子过程。 Sub PrintToDebugWindow(AnyString) Debug.Print AnyString 在“立即”窗口中显示。 End Sub 调用一个内在函数,函数的返回值被忽略不处理。 Call Shell(AppName, 1) AppName 包含可执行文件的路径。 调用 Microsoft Windows DLL 过程。该声明语句必需是类模块中的私有的,而不是标准模块中的。 Private Declare Sub MessageBeep Lib User (ByVal N As Integer) Sub CallMyDll()

文档评论(0)

2299972 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档