Application对象

6.5 Application对象

Application 对象的主要功能是用来存储和获取可以被所有用户之间进行共享的信息，它具有集合、方法和事件，但不具备属性。

一般的网站上都有一些应用程序，比如有BBS、电子商务等。而每个应用程序往往有是由多个ASP文件构成。这些ASP文件是整个应用程序中的子程序，彼此不是完全独立的，存在着某种关系。而Application对象负责对网站上各应用程序间共享的程序进行管理，并对应用程序的整个周期的设置进行控制。

由于ASP程序中的变量在程序重新执行之前都会恢复位Empty，所以上次运行的结果无法保存在有关的变量中。而Application对象中的数据可以被使用者所共享。这样，我们可以使用Application对象记录在程序运行期间不同用户所需要共享的数据。下面是ASP的Application对象的一些特性：

⑴数据可以在Application内部共享，因此可以覆盖多个用户。

⑵一个Application包含事件可以触发某个Application脚本。

⑶一个对象的例子可以被整个Application共享。

⑷个别的Application可以用Internet Service Manager来设置而获得不同属性。

⑸单独的Application可以隔离出来在他们自己的内存中运行，即如果一个人的Application遭到破坏，也不会影响其他人。

⑹可以停止一个Application而不会影响到其他应用。

一个网站可以有不止一个的Application对象。例如可以根据针对于个别任务的一些ASP 文件创建个别的Application对象，也可以创建了一个Application对象来用于全部公用用户，而再次创建另外一个来限制在网络管理员的范围。还可以在位于同一台服务器的不同网站创建不同的Application对象。

6.5.1 Application对象的设置

一个Application的根目录由Internet Service Manager来设定，这时此目录以及其子目录均属于这个Application。不过如果某一个子目录也进行了设定，将被认为是另一个Application，如果要设定一个Application的话，可以使用下面的方法：

⑴可以从Microsoft Internet Iinformation Server程序组中执行Internet Service Manager。

⑵在树型导航栏中点击您的默认站名。

⑶选择一个存在的路径（您需要创建Application的路径），或者创建一个这样的路径。

⑷点击属性图标或者右键该目录名称然后选择属性项。

⑸在属性图标中，选择主目录或者虚拟目录项。

⑹在Application Setting区中，点击Great键。

当创建完成Application后，就可以在Application设置区域中进行属性设置，比如可以限定是否使用Session和进行Buffer输出等等。而进行了这种设置之后就可以使用自己的Global.asa文件来创建自己的事件。

6.5.2 Application对象的数据集合

Application对象和Session对象既有联系又有区别，联系是它们都可以存储信息，区别则在于，网上的用户都可以使用Application对象，因而是需要加锁的；而Session对象只是针对一个客户。

Application对象使用语法为：

Application.数据集合|方法。

Application对象和Session对象一样，也有Session和StaticObject两个数据集合，它们的特点如表6-12所示。

表6-12 Application对象的数据集合表

6.5.3 Application对象的方法

由于在同一时间可能会有许多使用者同时访问网页，也就是说可能会出现多个人同时更新同一个变量的情况。为了避免发生这种情况，系统提供了Lock和Unlock方法控制对Application对象同步操作。Application对象的方法如表6-13所示。

使用Lock方法时，系统将禁止其他用户修改存储在Application对象中的变量，以确保在同一时间仅有一个用户可以修改和存取Application对象。

当一个ASP程序在某段时间内需要修改Application对象中的变量，就应该使用Lock 方法独占Application对象。当处理完成后，不再需要独占方式时，使用Unlock方法解除对Application对象的锁定。

在ASP 中，我们把一个虚拟目录及其子目录下的所有.asp 文件称为一个ASP 应用程序。从传统编程的角度来看，一个单独的ASP 页面就如同一个完成特定功能的过程或者函数。而一组相关的ASP 页面组合在一起，就构成了一个完整的应用程序。

使用Application 对象，能够使得访问同一个ASP 应用的多个用户之间进行信息共享，我们可以把公有变量存储在Application 对象中，变量的类型可以是数字、字符串等简单数据类型，也可以是数组和对象等比较复杂的数据类型，这些变量可以在所有页面上被所有用户使用。在Application对象中创建的变量，我们称之为应用程序变量。

1. 创建和读取简单数据类型变量

Application 对象创建变量的一般语法格式如下所示：

Application(“变量名称”) = 变量值

对变量进行引用，从而获取变量的值：Application(“变量名称”)

在Application 对象中，创建简单数据类型的应用程序变量是很方便的，

也正由于Application 对象能够进行用户之间的信息共享，因而Application 对象的最典型应用之一就是可以在Application 对象中创建一个公有变量，用来统计页面的访问人数。

下面编写一个用于记录网页访问量的计数器，每当有新的用户访问这个网页时，首先调用这个计数器程序，使计数器的值增加1。程序如下：

<%@ Language=VBScript %>

<% …访问量计数器

Application.Lock

Application(“Counter”)= Application(“Counter”)+1

Application.Unlock

%>

这是第<%= Application(“Counter”)%>位访问者！

在程序中首先用Application.Lock对要修改的Application对象加锁。然后，将计数器的值增加1。最后解除Application对象上的锁。运行该程序后，显示的效果如图6-7所示。

图6-7 记录网页访问量的计数器图

在这里需要说明的是，如果将以上程序做实际应用程序的计数器时，还应在结束Application对象运行时，将计数器变量保存到文件中。否则当程序结束后，变量被释放，计数器中留存的数据会丢失。

【例】实现图形化计数器程序Counter2.asp的代码如下：

<%Function Digital ( counter )

Dim i, MyStr, sCounter

sCounter = CStr(counter) '将counter转换为字符型，以便处理

'在前面补0，假定计数器长为8位00000123

For i = 1 To 8 - Len(sCounter)

MyStr = MyStr & ""

Next

'依次读取counter中的每位数字，并转换为相应的图片

For i = 1 To Len(sCounter)

MyStr = MyStr & ""

'

Next

'将输出的图片字符串返回

Digital = MyStr

End Function

Application.Lock

Application("Counter") = Application("Counter") + 1

Application.UnLock

%>

这是一个网站计数器的演示程序

您是本站第<%=Digital(Application("Counter"))%>位访客，欢迎光临

2. 创建和读取组件对象

可以在Application 对象中定义一个全局的组件对象，不过不同的是，在定义对象的时候，我们需要使用Set 语句，才能对创建的对象进行引用，如下所示：

<% Set Application(“MyAd”)= Server.CreateObject(“MSWC.AdRotator”) %>

在这一句脚本中，我们创建了一个Ad Rotator 组件对象，执行之后，在Application 对象中就产生了一个组件实例。在以后访问的其他页面中，我们就可以直接使用MyAd对象的属性和方法，在这里设置其边界宽度为0：<% Application(“MyAd”).BorderSize(0) %>

3. 创建和读取数组变量

Application 对象可以创建和存储数组变量，但和传统编程语言不同的是，在Application 对象中，可以通过下标对数组变量的元素进行读取操作，但不能通过下标对数组元素进行修改操作。例如：

<% Application("Message")(0) = "hello" %>

在这一句脚本执行的时候，尽管不会向用户返回错误信息，但实际上这一句脚本并不会产生执行结果，也就是说，数组Message 中的元素并没有发生任何变化。

而下面显示Message 数组中的第一个元素的脚本则是正确的：

<% = Application("Message")(0) %>

如果需要对Application 对象中数组的元素进行修改操作的时候，需要先读取整个数组，并将数组作为一个整体复制给本地的副本，然后再对本地的副本中的单个元素进行相应的修改操作，最后再将修改之后的本地副本赋值到Application 对象中。

例如，假设在Application 对象中已经存在一个AppArray 数组，若我们需要将AppArray 数组中的第一个元素赋值为字符串“The first element”，则我们可以编写如下所示的脚本：

<%

LocalArray = Application("AppArray")

LocalArray(0) = "The first element"

Application("AppArray") = LocalArray

%>

在这一段脚本执行之后，Application 对象中的AppArray 的第一个元素的值就将改变为字符串“The first element”。

注意：

一旦在页面中创建了应用程序变量，则应用程序变量将会一直保存在内存中，直到服务器关闭或者整个应用程序被卸载为止。这些变量不会因为某个用户或者所有用户离开而自动消失。也就是说，在Application对象中定义的变量将会长期占用内存，对服务器的性能造成一定的影响，所以需要小心使用，不要随意创建。

6.5.4 Application对象的事件

Application对象有两个事件，如表6-14所示。

Global.asa 中。它的用法有：

ASA文件是一个非常重要的文件。在这个文件中，可以指定事件脚本，声明变量和对象。Global.asa文件用来存储数据信息和应用程序全局使用的对象。

一个Web应用程序只有一个Global.asa文件，且放在该应用程序所在的目录下。因此，Application_Onstart事件和Application_OnEnd事件的处理过程必须写在Global.asa文件中。当Web服务器启动并允许运行应用程序时，触发Application_Onstart事件。退出应用程序时，Application_OnEnd事件发生后，执行Application_OnEnd数据过程。

Excel Application对象 开发指南

Excel Application对象开发指南 2009-12-26 13:10:21 标签：Excel VBA 概述 Application对象是Microsoft Office Excel 2007对象模型中最高级别的对象，表示Excel程序自身。Application对象提供正在运行的程序的信息、应用于程序实例的选项以及实例中打开的当前对象。因为它是对象模型中最高的对象，Application对象也包含组成一个工作簿的很多部件，包括如工作簿、工作表集合、单元格以及这些对象所包含的数据等。Application对象包括： ?程序范围的设置和选项。这些选项大部分同“工具”菜单下的“选项”对话框里的内容相同。 ?顶级对象返回的方法，如ActiveCell、ActiveSheet等。 在下面几节里，你将通过使用VBA代码示例学习到一些Application对象中经常使用到的对象、方法和属性。关于Application对象模型所有成员的详细资料，请参考Application对象成员。 Application对象中其它对象的引用方法 你可以使用Application属性返回Application对象。获取一个Application对象后，如需访问它下面的对象，可以在对象模型层级中往下移动。下面示例设置一个工作表的第一个单元格内容为20。 Application.Workbooks(1).Worksheets(1).Cells(1,1)=20 要表示一个单元格，上面的代码示例从Application对象开始，移到第一个工作簿，再移到第一个工作表，最后到这个单元格。 下面示例在另一个Excel程序中创建一个Excel工作簿对象，然后打开一个工作簿。 Set xl=CreateObject("Excel.Sheet") xl.Application.Workbooks.Open "newbook.xls" 不需要使用“Application”限定词，很多的属性和方法也可以直接被用来返回那些最常用的用户界面对象，如活动工作表(ActiveSheet属性)。例如，除了使用https://www.doczj.com/doc/221527331.html, = “Monthly Sales”，你也可以使用https://www.doczj.com/doc/221527331.html, = “Monthly Sales”。然而，当使用这个简便表示方法时必需小心，需要选择正确的对象。例如通过使用Worksheet对象的Activate方确定你选择了正确的工作簿和工作表后，你可以使用Cell(1,1)表示第一个单元格。 有几种情况你必需使用Application限定词。例如，OnTime对象(本文后面部分将讨论)需要这个限定词，还有程序窗口的Width和Height属性。一般来说，用来处理Excel窗口的外观或影响程序全局行为的属性或方法需要使用Application限定词；例如，DisplayFormlaBar 属性用来显示或隐藏公式栏，Calculation方法也需要限定词。 Application对象集合 这一节详细介绍一些和Application对象相关的集合。 AddIns集合 AddIns集合表示所有当前加载的Excel Add-in。你可以像枚举其它对象一样在你的程序中列举出关于add-in的不同类型信息。下面的示例列举出当前加载到Excel中的Add-in的路径和名称。 Sub ListAddIns() Dim myAddin As AddIn For Each myAddin In AddIns MsgBox myAddin.FullName

Application详解与用法

1:Application是什么？ Application和Activity,Service一样,是android框架的一个系统组件，当android程序启动时系统会创建一个application对象，用来存储系统的一些信息。通常我们是不需要指定一个Application的，这时系统会自动帮我们创建，如果需要创建自己的Application，也很简单创建一个类继承Application并在manifest的application标签中进行注册(只需要给Application标签增加个name属性把自己的Application的名字定入即可)。 android系统会为每个程序运行时创建一个Application类的对象且仅创建一个，所以Application可以说是单例(singleton)模式的一个类.且application对象的生命周期是整个程序中最长的，它的生命周期就等于这个程序的生命周期。因为它是全局的单例的，所以在不同的Activity,Service中获得的对象都是同一个对象。所以通过Application来进行一些，数据传递，数据共享等,数据缓存等操作。 2:通过Application传递数据 假如有一个Activity A, 跳转到Activity B ,并需要推荐一些数据，通常的作法是Intent.putExtra() 让Intent携带，或者有一个Bundle把信息加入Bundle让Intent推荐Bundle对象，实现传递。但这样作有一个问题在于，Intent和Bundle所能携带的数据类型都是一些基本的数据类型，如果想实现复杂的数据传递就比较麻烦了，通常需要实现Serializable或者Parcellable接口。这其实是Android的一种IPC数据传递的方法。如果我们的两个Activity在同一个进程当中为什么还要这么麻烦呢，只要把需要传递的对象的引用传递过去就可以了。基本思路是这样的。在Application中创建一个HashMap ，以字符串为索引，Object为value这样我们的HashMap就可以存储任何类型的对象了。在

Application对象基本操作应用示例

Application对象基本操作应用示例 Application对象代表整个Microsoft Excel应用程序，带有175个属性和52个方法，可以设置整个应用程序的环境或配置应用程序。 示例01-01：体验开/关屏幕更新(ScreenUpdating属性) Sub 关闭屏幕更新() MsgBox "顺序切换工作表Sheet1→Sheet2→Sheet3→Sheet2，先开启屏幕更新，然后关闭屏幕更新" Worksheets(1).Select MsgBox "目前屏幕中显示工作表Sheet1" Application.ScreenUpdating = True Worksheets(2).Select MsgBox "显示Sheet2了吗？" Worksheets(3).Select MsgBox "显示Sheet3了吗？" Worksheets(2).Select MsgBox "下面与前面执行的程序代码相同,但关闭屏幕更新功能" Worksheets(1).Select MsgBox "目前屏幕中显示工作表Sheet1" & Chr(10) & "关屏屏幕更新功能" Application.ScreenUpdating = False Worksheets(2).Select MsgBox "显示Sheet2了吗？" Worksheets(3).Select MsgBox "显示Sheet3了吗？" Worksheets(2).Select Application.ScreenUpdating = True End Sub 示例说明：ScreenUpdating属性用来控制屏幕更新。当运行一个宏程序处理涉及到多个工作表或单元格中的大量数据时，若没有关闭屏幕更新，则会占用CPU的处理时间，从而降低程序的运行速度，而关闭该属性则可显著提高程序运行速度。 示例01-02：使用状态栏(StatusBar属性) Sub testStatusBar() Application.DisplayStatusBar = True '开启状态栏显示 '赋值状态栏显示的文本 Application.StatusBar = "https://www.doczj.com/doc/221527331.html," End Sub 示例说明：StatusBar属性用来指定显示在状态栏上的信息。若不想再显示状态栏文本，可使用Applicat ion.StatusBar = False语句关闭状态栏显示，也可以在程序开始将原先的状态栏设置存储，如使用语句o ldStatusBar = Application.DisplayStatusBar将状态栏原来的信息存储在变量oldStatusBar，在程序运行完成或退出时，将变量重新赋值给状态栏，如使用语句Application.DisplayStatusBar = oldStatusBa r，以恢复状态栏原状。

Application对象

6.5 Application对象 Application 对象的主要功能是用来存储和获取可以被所有用户之间进行共享的信息，它具有集合、方法和事件，但不具备属性。 一般的网站上都有一些应用程序，比如有BBS、电子商务等。而每个应用程序往往有是由多个ASP文件构成。这些ASP文件是整个应用程序中的子程序，彼此不是完全独立的，存在着某种关系。而Application对象负责对网站上各应用程序间共享的程序进行管理，并对应用程序的整个周期的设置进行控制。 由于ASP程序中的变量在程序重新执行之前都会恢复位Empty，所以上次运行的结果无法保存在有关的变量中。而Application对象中的数据可以被使用者所共享。这样，我们可以使用Application对象记录在程序运行期间不同用户所需要共享的数据。下面是ASP的Application对象的一些特性： ⑴数据可以在Application内部共享，因此可以覆盖多个用户。 ⑵一个Application包含事件可以触发某个Application脚本。 ⑶一个对象的例子可以被整个Application共享。 ⑷个别的Application可以用Internet Service Manager来设置而获得不同属性。 ⑸单独的Application可以隔离出来在他们自己的内存中运行，即如果一个人的Application遭到破坏，也不会影响其他人。 ⑹可以停止一个Application而不会影响到其他应用。 一个网站可以有不止一个的Application对象。例如可以根据针对于个别任务的一些ASP 文件创建个别的Application对象，也可以创建了一个Application对象来用于全部公用用户，而再次创建另外一个来限制在网络管理员的范围。还可以在位于同一台服务器的不同网站创建不同的Application对象。 6.5.1 Application对象的设置 一个Application的根目录由Internet Service Manager来设定，这时此目录以及其子目录均属于这个Application。不过如果某一个子目录也进行了设定，将被认为是另一个Application，如果要设定一个Application的话，可以使用下面的方法： ⑴可以从Microsoft Internet Iinformation Server程序组中执行Internet Service Manager。 ⑵在树型导航栏中点击您的默认站名。 ⑶选择一个存在的路径（您需要创建Application的路径），或者创建一个这样的路径。 ⑷点击属性图标或者右键该目录名称然后选择属性项。 ⑸在属性图标中，选择主目录或者虚拟目录项。 ⑹在Application Setting区中，点击Great键。 当创建完成Application后，就可以在Application设置区域中进行属性设置，比如可以限定是否使用Session和进行Buffer输出等等。而进行了这种设置之后就可以使用自己的Global.asa文件来创建自己的事件。

android Application类的详细介绍

在代码中经常看到application这个类，一直不知道这个是干什么用的，今天刚好有点时间，所以进行了详细的学习。 一.先对它的整体概念解释： 在android源码中对他的描述是; * Base class for those who need to maintain global application state. You can * provide your own implementation by specifying its name in your * AndroidManifest.xml's <application> tag, which will cause that class * to be instantiated for you when the process for your application/package is * created. SDK中的描述：Application类是为了那些需要保存全局变量设计的基本类，你可以在AndroidManifest.xml的标签中进行自己的实现，这样的结果是：当你 的application或者包被建立的时候将引起那个类被建立。 理解：就是说application是用来保存全局变量的，并且是在package创建的时候就跟着存在了。所以当我们需要创建全局变量的时候，不需要再像j2se那样需要创建public权限的static 变量，而直接在application中去实现。只需要调用Context的getApplicationContext或者Activity的getApplication方法来获得一个application对象，再做出相应的处理。 例如Launcher模块中;它自己就写了个application，在AndroidManifest.xml中将它进行了设置：

Excel.Application对象

因为QTP框架需要使用Excel.Application对象，保存一份相关函数说明 定制模块行为 (1) Option Explicit '强制对模块内所有变量进行声明 Option Private Module '标记模块为私有，仅对同一工程中其它模块有用，在宏对话框中不显示 Option Compare Text '字符串不区分大小写 Option Base 1 '指定数组的第一个下标为1 (2) On Error Resume Next '忽略错误继续执行VBA代码,避免出现错误消息 (3) On Error GoTo ErrorHandler '当错误发生时跳转到过程中的某个位置 (4) On Error GoTo 0 '恢复正常的错误提示 (5) Application.DisplayAlerts=False '在程序执行过程中使出现的警告框不显示 (6) Application.ScreenUpdating=False '关闭屏幕刷新 Application.ScreenUpdating=True '打开屏幕刷新 (7) Application.Enable.CancelKey=xlDisabled '禁用Ctrl+Break中止宏运行的功能 工作簿 (8) Workbooks.Add() '创建一个新的工作簿 (9) Workbooks(“book1.xls”).Activate '激活名为book1的工作簿 (10) ThisWorkbook.Save '保存工作簿 (11) ThisWorkbook.close '关闭当前工作簿 (12) ActiveWorkbook.Sheets.Count '获取活动工作薄中工作表数 (13) https://www.doczj.com/doc/221527331.html, '返回活动工作薄的名称 (14) https://www.doczj.com/doc/221527331.html, ‘返回当前工作簿名称 ThisWorkbook.FullName ‘返回当前工作簿路径和名称 (15) ActiveWindow.EnableResize=False ‘禁止调整活动工作簿的大小 (16) Application.Window.Arrange xlArrangeStyle Tiled ‘将工作簿以平铺方式排列 (17) ActiveWorkbook.WindowState=xlMaximized ‘将当前工作簿最大化 工作表 (18) https://www.doczj.com/doc/221527331.html,edRange.Rows.Count ‘当前工作表中已使用的行数 (19) Rows.Count ‘获取工作表的行数(注：考虑向前兼容性) (20) Sheets(Sheet1).Name= “Sum” '将Sheet1命名为Sum (21) ThisWorkbook.Sheets.Add Before:=Worksheets(1) '添加一个新工作表在第一工作表前 (22) ActiveSheet.Move After:=ActiveWorkbook.Sheets(ActiveWorkbook.Sheets.Count) '将当前工作表移至工作表的最后 (23) Worksheets(Array(“sheet1”,”sheet2”)).Select '同时选择工作表1和工作表2 (24) Sheets(“sheet1”).Delete或Sheets(1).Delete '删除工作表1 (25) ActiveWorkbook.Sheets(i).Name '获取工作表i的名称 (26) ActiveWindow.DisplayGridlines=Not ActiveWindow.DisplayGridlines '切换工作表中的网格线显示，这种方法也可以用在其它方面进行相互切换，即相当于开关按钮 (27) ActiveWindow.DisplayHeadings=Not ActiveWindow.DisplayHeadings ‘切换工作表中的行列边框显示 (28) https://www.doczj.com/doc/221527331.html,edRange.Form atConditions.Delete ‘删除当前工作表中所有的条件格式 (29) Cells.Hyperlinks.Delete ‘取消当前工作表所有超链接 (30) ActiveSheet.PageSetup.Orientation=xlLandscape或ActiveSheet.PageSetup.Orientation=2 '将页面设置更改为横向

Application对象与Session对象

上一讲中，我们学习了Request对象的Form数据集合、QueryString数据集合和ServerVariables 数据集合。在继续下面的学习之前，建议你先轻松一下，因为接下来要介绍的Application 对象相对比较抽象，刚开始理解起来恐怕会不辨东西。切记：当你找不到北时，便不要过多考虑Application对象到底是什么东西？还是一句老话，先学会使用它。 一、了解Application对象。为了提神，我们先看一个计数器的例程（你应该运行它以便于理解）： 先编辑一个wuf16.htm文件： 记录某个页面的点击数示例：wuf17.asp wuf17.asp的代码如下： <% @ LANGUAGE = VBScript %> <% 'wuf17.asp - 记录某一页面的访问数(计数器原理) Option Explicit Dim CountWeb CountWeb = Request.ServerVariables("SCRIPT_NAME") '这样保证每个页面都有一个唯一的变量, 避免混乱 %> <% Response.Write CountWeb & "

" & vbcrlf Application.Lock '请看讲解 Application(CountWeb) = Application(CountWeb) + 1 '累加器,点击数加1 Application.UnLock Response.Write "WEB服务器关闭重启前该页的点击总数为: " & Application(CountWeb) %> 运行这个程序时，对大部分的人来说，只有一台机器，既是Web服务器，又是客户端。那么你只能想象这样一种境况了：你的这两个主页文件放在很远的Web服务器上，而如潮水般的国内外用户正通过浏览器访问它们。每个用户点击一次，Application(CountWeb) 的值就加1，而且只要存放文件wuf17.asp的服务器没有关闭，Application(CountWeb)就将一直累加下去。但是注意，如果服务器关闭后重启，则Application(CountWeb)将重新从0开始计数（我晕，我说我的页面访问数怎么老是一位数）。为了避免这种永远从零开始的计数情况，你必须要在服务器关闭之前将Application(CountWeb)的值保存起来，下次需要时再取出来，就能够顺序累计下去了，具体如何做，且听N回后分解。 接下来的问题，就是Application.Lock、UnLock是什么意思？刚才我们做了一个假设，大量的用户正在访问该页面，而每一个用户的点击都会发生Application(CountWeb)加1，想想看，这样不就乱套了（什么！想不出，那肯定是你的主页终日只有你一个人赞助），所以得有个先来后到的规则。当某一用户访问该页面，需要修改Application(CountWeb)的值时，使用Lock方法加锁，避免其他用户修改，修改完后，再解锁。 从上例中您是否已看出，Application对象提供给所有用户共享信息（Application(CountWeb)），

Excel应用程序对象_Application对象_及其常用方法基本操作应用示例

第一章Excel应用程序对象(Application对象)及其常用方法 基本操作应用示例 Application对象代表整个Microsoft Excel应用程序，带有175个属性和52个方法，可以 设置整个应用程序的环境或配置应用程序。 示例01-01:体验开/关屏幕更新(ScreenUpdating属性） Sub关闭屏幕更新(） MsgBox "顺序切换工作表Sheet1—Sheet2—Sheet3—Sheet2，先开启屏幕更新，然后关闭屏幕更新" Worksheets(1).Select MsgBox "目前屏幕中显示工作表Sheet r Application.ScreenUpdating = True Worksheets(2).Select MsgBox "显示 Sheet2了吗？“ Worksheets(3).Select MsgBox "显示 Sheet3了吗？“ Worksheets(2).Select MsgBox "下面与前面执行的程序代码相同，但关闭屏幕更新功能" Worksheets(1).Select MsgBox "目前屏幕中显示工作表Sheet1" & Chr(10) & "关屏屏幕更新功能" Application.ScreenUpdating = False Worksheets(2).Select MsgBox "显示 Sheet2了吗？“ Worksheets(3).Select MsgBox "显示 Sheet3了吗？“ Worksheets(2).Select Application.ScreenUpdating = True End Sub 示例说明：ScreenUpdating属性用来控制屏幕更新。当运行一个宏程序处理涉及到多个工作表或单元格中的大量数据时，若没有关闭屏幕更新，则会占用CPU的处理时间，从而降低程序的运行速度，而关闭该属性则可显著提高程序运行速度。 示例0彳-02:使用状态栏(StatusBar属性） Sub testStatusBar() Application.DisplayStatusBar = True '开启状态栏显示 '赋值状态栏显示的文本 Application.StatusBar = "https://www.doczj.com/doc/221527331.html," End Sub 示例说明：StatusBar属性用来指定显示在状态栏上的信息。若不想再显示状态栏文本，可使用Application.StatusBar = False语句关闭状态栏显示，也可以在程序开始将原先的状态栏设置存储，如使用语句oldStatusBar = Application.DisplayStatusBar将状态栏原来的信息存储在变量oldStatusBar，在程序运行完成或退出时，将变量重新赋值给状态栏，如使用语句 Application.DisplayStatusBar = oldStatusBar，以恢复状态栏原状。

Excel2007的Application对象的成员编程

Excel2007的Application对象的成员编程 概述 Application对象是Microsoft Office Excel 2007对象模型中最高级别的对象，表示Excel 程序自身。Application对象提供正在运行的程序的信息、应用于程序实例的选项以及实例中打开的当前对象。因为它是对象模型中最高的对象，Application对象也包含组成一个工作簿的很多部件，包括如工作簿、工作表集合、单元格以及这些对象所包含的数据等。 Application对象包括： ?程序范围的设置和选项。这些选项大部分同“工具”菜单下的“选项”对话框里的内容相同。 ?顶级对象返回的方法，如ActiveCell、ActiveSheet等。 在下面几节里，你将通过使用VBA代码示例学习到一些Application对象中经常使用到的对象、方法和属性。关于Application对象模型所有成员的详细资料，请参考Application 对象成员。 Application对象中其它对象的引用方法 你可以使用Application属性返回Application对象。获取一个Application对象后，如需访问它下面的对象，可以在对象模型层级中往下移动。下面示例设置一个工作表的第一个单元格内容为20。 Application.Workbooks(1).Worksheets(1).Cells(1,1)=20 要表示一个单元格，上面的代码示例从Application对象开始，移到第一个工作簿，再移到第一个工作表，最后到这个单元格。 下面示例在另一个Excel程序中创建一个Excel工作簿对象，然后打开一个工作簿。 Set xl=CreateObject("Excel.Sheet") xl.Application.Workbooks.Open "newbook.xls" 不需要使用“Application”限定词，很多的属性和方法也可以直接被用来返回那些最常用的用户界面对象，如活动工作表 (ActiveSheet属性)。例如，除了使用 https://www.doczj.com/doc/221527331.html, = “Monthly Sales”，你也可以使用https://www.doczj.com/doc/221527331.html, =

第10章、Application和session对象

第10章、Application和session对象 一、Application对象 Application对象的用途主要是记录整个网站的信息，例如上站人数、在线名单、意见调查或在线票选系统等。它可以用来记录不同浏览器端共享的变量。 集合： ●contents:此集合包含所有非对象变量，这是application对象的默认集合。倘若我们要取 application对象记录变量counter，可以写成application.contents(“counter”)或者application(“counter”)。 ●staticobjects:此集合包含所有对象变量，这些对象变量是在Global.asa文件中使用