当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > VBS教程:方法-Keys 方法

VBScript
VBS教程:语句-While...Wend 语句
VBS教程:VBScript 语句-Sub 语句
VBS教程:VBScript 语句-Set 语句
VBS教程:VBScript 语句-Select Case 语句
VBS教程:VBScript 语句-Rem 语句
VBS教程:VBScript 语句-ReDim 语句
VBS教程:VBScript 语句-Randomize 语句
VBS教程:VBScript 语句-Public 语句
VBS教程:VBScript 语句-Property Set 语句
VBS教程:VBScript 语句-Property Let 语句
VBS教程:VBscript语句-Property Get 语句
VBS教程:VBscript语句-Private 语句
VBS教程:VBscript语句-Option Explicit 语句
VBS教程:VBscript语句-On Error 语句
VBS教程:VBscript语句-If...Then...Else 语句
VBS教程:VBscript语句-Function 语句
VBS教程:VBscript语句-For...Next 语句
VBS教程:VBscript语句-For Each...Next 语句
VBS教程:VBscript语句-Exit 语句
VBS教程:VBscript语句-ExecuteGlobal 语句

VBScript 中的 VBS教程:方法-Keys 方法


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-11   浏览: 62 ::
收藏到网摘: n/a

Keys 方法

返回一数组,其中包含有 Dictionary 对象的所有现存键。

object.Keys

object 应为 Dictionary 对象的名称。

说明

下列代码举例说明如何使用 Keys 方法:

 Function DicDemo Dim a,d,i    '创建一些变量。Set d = CreateObject("Scripting.Dictionary")d.Add "a","Athens"    '添加键和项目。d.Add "b","Belgrade"d.Add "c","Cairo"a = d.Keys  '获取键。For i = 0 To d.Count -1  '循环使用数组。s = s & a(i) & "<BR>"  '返回结果。 Next DicDemo = sEnd Function