volcanol的工控博客
Email : lilinly225@126.com 索要资料加QQ 点击进入 或 点击左侧的资料分享专用帖

volcanol ---- View OF Linux Can Appreciate Nature OF Linux

天行健,君子以自强不息

  博客园 :: 首页 :: 博问 :: 闪存 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理 ::

  最近有点小忙,各种事情,心情也不是很好,烦心事特别多,因此最近更新的比较慢。

不敢再松懈了,今天正好有点时间,就继续看了一下VBScript中关于对象的一些内容。

 

一、对象

  OOP是编程规模发展到一定程度后才出现的,因为不但操作系统的程序规模越来越大,而且应用

程序的规模也是日益增长。

  代码重用在OOP出现后又是进一步提升。

  什么是对象呢?  按照以前Unix的套路:一切皆文件。  在这里也可以说一切皆对象。计算机本身

也可以看做一个对象。

  对象具有特征和功能,特征表现为属性,功能表现为方法。

  具体不啰嗦,可以看看计算机概论一类的书。

 

二、代码

  

'对象


'对象的特点
'从本质上来说对象是内存中的一块内存区域,这块区域和变量一样
'但是对象和变量又存在差距。对象必须利用专门的语句进行关联后才
'能引用,且在使用完毕后必须用专门的语句进行销毁才能保证占用的
'内存被回收,否则就会造成“内存泄露”

Option Explicit

'创建对象
Dim objDict
'1、通过CreateObject函数创建对象,这个函数需要传递一个必须的参数
'   这个参数指定要创建的对象的类型。 这个参数在系统中叫做
'   progID,  如下面的"Scripting.Dictionary"就是ProgID
'2、通过CreateObject函数创建的对象,只是存储在内存中,我们还不能直
'   接进行操作,这个函数会返回一个对象的引用,如果不将这个返回的引用
'   与某个变量联系起来就无法访问对象。
'3、通过set语句将创建的对象与变量联系起来,这个过程也叫实例化对象。
'   如下所示
Set objDict = CreateObject("Scripting.Dictionary")
MsgBox objDict.Count

'4、如果对象使用完毕,那么必须对其进行撤销,否则对象占用的内存就不会
'   回收,这样就会造成内存泄露,因此必须进行撤销。通过下面的语句
'   撤销对象。 当然如果脚本小那么在脚本结束运行的时候,系统会自动撤销
'   对象。 这个意思是说对象在超出作用域的范围后会自动撤销。
Set objDict =Nothing

If objDict Is Nothing Then 
    MsgBox "对象objDict已经撤销"
End If


'脚本运行时对象
'脚本运行时对象必须通过其他对象创建才能访问。最典型的就是文件系统对象
Dim objFSO
Set objFSO = CreateObject("Scripting.FileSystemObject")

Dim objFolder 
'下面的语句必须已经创建了文件夹:D:\01_vbs, 否则会出错
Set objFolder = objFSO.GetFolder("D:\01_vbs")

'对象的访问
'对象具有属性和方法, 属性表示对象的一些特征
'方法用来改变属性的特征, 对象的属性和方法通过下面的语法格式进行访问
'   对象.属性
'   对象.方法
MsgBox objFolder.Drive   '访问创建的objfolder对象的驱动器属性
MsgBox objFolder.Name    '访问创建的objfolder对象的名称属性
MsgBox objFolder.Path    '访问创建的objfolder对象的路径属性

'访问对象的方法,通过文件夹对象的CreateTextFile方法创建文件
objFolder.CreateTextFile "对象新建的文件.txt",True,False

'我们可以查看文件夹对象下的文件,这个需要通过集合来访问
'文件夹对象下有一个文件集合,我们通过传递集合下的元素的名称来访问集合
'同样文件也是一个对象,因此也需要进行实例化
'如下所示
Dim objFile 
Set objFile = objFolder.Files("对象新建的文件.txt")

'同样通过下面的方法访问对象属性
MsgBox objFile.Name & "创建的时间为:" & objFile.DateCreated


'访问对象的特殊语句 With语句
'因为对象的属性和方法均具有一个共同的特点:归属于同一个对象
'因此为方便,vbs提供了一种简便的访问方法就是
With objFile 
    MsgBox  "Drive is:" & .Drive & vbNewLine &_
            "Path is:" & .Path & vbNewLine 
End With

 

三、WinCC中的对象模型

  要理解WinCC中的VBS脚本,大体有前面几篇随笔的内容和本篇随笔的内容基本够用了,需要

补充的是属于WinCC特有的VBS对象模型。这里暂时不多说,只用一张图

  WinCC中VBS的对象模型。

 

四、小结

  对于WinCC的VBS脚本,大体需要的关于VBS的基本知识已经描述完毕,其他的高级功能需要

进一步学习的可以参考微软的出版物《vbs脚本参考》

  从我本身这些年的WinCC的使用经验来看,前面描述的基本够用,一般不会用到太复杂的功能。

后面在描述一些关于文件系统对象的知识后就全面的描述WinCC的相关内容。

 

--------------------------------------------------------------分割线---------------------------------------------------------------

1、文章均为个人原创,欢迎转载,转载请保留出处:https://www.cnblogs.com/volcanol/

2、获取工控PLC、变频器、HMI、计算机、Windows、Linux、嵌入式资料点击:获取资料

3、如果您觉得文章对您有帮助可转至页面上半部分打赏,或移步:打赏 

4、或者在页面右下角点推荐哟!!!

--------------------------------------------------------------分割线---------------------------------------------------------------

posted on 2018-12-30 12:51  volcanol  阅读(2902)  评论(0编辑  收藏  举报
volcanol ----View OF Linux Can Appreciate Nature OF Linux。