在vb中array ()函数到有什么作用？ 请教vb中的array函数应用实例

\u5728vb\u4e2darray\uff08\uff09\u51fd\u6570\u5230\u6709\u4ec0\u4e48\u4f5c\u7528

Array\u51fd\u6570\u7528\u6765\uff0c\u8fd4\u56de\u4e00\u4e2a\u5305\u542b\u6570\u7ec4\u7684 Variant\uff1a\u8bed\u6cd5\uff1aArray(arglist)\u6240\u9700\u7684 arglist \u53c2\u6570\u662f\u4e00\u4e2a\u7528\u9017\u53f7\u9694\u5f00\u7684\u503c\u8868\uff0c\u8fd9\u4e9b\u503c\u7528\u4e8e\u7ed9 Variant \u6240\u5305\u542b\u7684\u6570\u7ec4\u7684\u5404\u5143\u7d20\u8d4b\u503c\u3002\u5982\u679c\u4e0d\u63d0\u4f9b\u53c2\u6570\uff0c\u5219\u521b\u5efa\u4e00\u4e2a\u957f\u5ea6\u4e3a 0 \u7684\u6570\u7ec4\u3002\u8bf4\u660e\uff1a\u7528\u6765\u8868\u793a\u6570\u7ec4\u5143\u7d20\u7684\u7b26\u53f7\u7531\u53d8\u91cf\u540d\u3001\u5706\u62ec\u53f7\u4ee5\u53ca\u62ec\u53f7\u4e2d\u7684\u6240\u9700\u5143\u7d20\u7684\u7d22\u5f15\u53f7\u7ec4\u6210\u3002\u5728\u4e0b\u9762\u7684\u793a\u4f8b\u4e2d\uff0c\u7b2c\u4e00\u6761\u8bed\u53e5\u521b\u5efa\u4e00\u4e2a Variant \u7684\u53d8\u91cf A\u3002\u7b2c\u4e8c\u6761\u8bed\u53e5\u5c06\u4e00\u4e2a\u6570\u7ec4\u8d4b\u7ed9\u53d8\u91cf A\u3002\u6700\u540e\u4e00\u6761\u8bed\u53e5\u5c06\u8be5\u6570\u7ec4\u7684\u7b2c\u4e8c\u4e2a\u5143\u7d20\u7684\u503c\u8d4b\u7ed9\u53e6\u4e00\u4e2a\u53d8\u91cf\u3002\u793a\u4f8b\uff1aDim A As VariantA = Array(10,20,30)B = A(2\uff09\u4f7f\u7528 Array \u51fd\u6570\u521b\u5efa\u7684\u6570\u7ec4\u7684\u4e0b\u754c\u53d7 Option Base \u8bed\u53e5\u6307\u5b9a\u7684\u4e0b\u754c\u7684\u51b3\u5b9a, \u9664\u975e Array \u662f\u7531\u7c7b\u578b\u5e93\uff08\u4f8b\u5982 VBA.Array )\u540d\u79f0\u9650\u5b9a\u3002\u5982\u679c\u662f\u7531\u7c7b\u578b\u5e93\u540d\u79f0\u9650\u5b9a\uff0c\u5219 Array \u4e0d\u53d7 Option Base \u7684\u5f71\u54cd\u3002\u6ce8\u610f\uff1a\u6ca1\u6709\u4f5c\u4e3a\u6570\u7ec4\u58f0\u660e\u7684 Variant \u4e5f\u53ef\u4ee5\u8868\u793a\u6570\u7ec4\u3002\u9664\u4e86\u957f\u5ea6\u56fa\u5b9a\u7684\u5b57\u7b26\u4e32\u4ee5\u53ca\u7528\u6237\u5b9a\u4e49\u7c7b\u578b\u4e4b\u5916\uff0cVariant \u53d8\u91cf\u53ef\u4ee5\u8868\u793a\u4efb\u4f55\u7c7b\u578b\u7684\u6570\u7ec4\u3002\u5c3d\u7ba1\u4e00\u4e2a\u5305\u542b\u6570\u7ec4\u7684 Variant \u548c\u4e00\u4e2a\u5143\u7d20\u4e3a Variant \u7c7b\u578b\u7684\u6570\u7ec4\u5728\u6982\u5ff5\u4e0a\u6709\u6240\u4e0d\u540c\uff0c\u4f46\u5bf9\u6570\u7ec4\u5143\u7d20\u7684\u8bbf\u95ee\u65b9\u5f0f\u662f\u76f8\u540c\u7684\u3002

\u5475\u5475,\u6211\u6765\u7ed9\u4f60\u4e2a\u4f8b\u5b50\u5427..

\u6bd4\u5982\u4f60\u73b0\u5728\u7a97\u4f53\u4e0a\u60f3\u5efa\u4e00\u4e2a\u4e0b\u62c9\u6846\u6765\u5b9e\u73b0\u9009\u62e9\u6708\u4efd..
\u90a3\u4e48\u4f60\u4f1a\u600e\u4e48\u6dfb\u52a0\u5462?

Private Sub Command1_Click()
Combo1.AddItem "\u4e00\u6708"
Combo1.AddItem "\u4e8c\u6708"
Combo1.AddItem "\u4e09\u6708"
Combo1.AddItem "\u56db\u6708"
Combo1.AddItem "\u4e94\u6708"
'
'
'
Combo1.AddItem "\u5341\u4e8c\u6708"
End Sub

\u5475\u5475, \u5f88\u7d2f\u5427..\u5982\u679c\u4f60\u521a\u597d\u6709\u4e00\u4e2a\u6570\u7ec4\u91cc\u9762\u5b58\u7684\u662f\u8fd9\u4e9b\u5b57\u7b26\u4e32,\u6dfb\u52a0\u8d77\u6765\u5c31\u4f1a\u5f88\u65b9\u4fbf\u7684:
Private Sub Command2_Click()
a = Array("\u4e00\u6708", "\u4e8c\u6708", "\u4e09\u6708", "\u56db\u6708", "\u4e94\u6708", "\u516d\u6708", "\u4e03\u6708", "\u516b\u6708", "\u4e5d\u6708", "\u5341\u6708", "\u5341\u4e00\u6708", "\u5341\u4e8c\u6708")
For i = 0 To UBound(a)
Combo1.AddItem a(i)
Next
Combo1.ListIndex = 0
End Sub

在vb中array() 函数用于创建数组，表示返回一个包含数组的 Variant。可以创建数值数组（带有数字 ID 键的数组）、关联数组（带有指定的键的数组，每个键关联一个值）、多维数组（包含一个或多个数组的数组）。

array(50 25 369 42 23 36 88 127 )表示创建了一个多维数组，数组名为array，在这个数组里包含了50、25、369、42、23、36、88、127这八个数字。

扩展资料

array() 函数创建数组的语法规则：

1、数值数组的语法

array(value1,value2,value3,etc.);

其中value规定键值。键值是windows中注册表中的概念。键值位于注册表结构链末端，和文件系统的文件类似，包含当前计算机及应用程序执行时使用的实际配置信息和数据。

2、关联数组的语法

array(key=>value,key=>value,key=>value,etc.);

其中key规定键名（数值或字符串）。键名是注册表条目的名称，键值是为这个条目所赋予的值。

参考资料来源：百度百科——array()

Array函数用来，返回一个包含数组的 Variant。

array(50 25 369 42 23 36 88 127 )：

myday3 = myweek(42)

Print Space(369); myday2; Space(369); myday3

aaa = Array(50, 25, 369, 42, 23, 36，,8,127)

1、语法：Array(arglist)

所需的 arglist 参数是一个用逗号隔开的值表，这些值用于给 Variant 所包含的数组的各元素赋值。如果不提供参数，则创建一个长度为 0 的数组。

2、说明：用来表示数组元素的符号由变量名、圆括号以及括号中的所需元素的索引号组成。在下面的示例中，第一条语句创建一个 Variant 的变量 A。第二条语句将一个数组赋给变量 A。最后一条语句将该数组的第二个元素的值赋给另一个变量。

3、示例：

Option Base 1

Private Sub Form_Click()

Dim aaa As Variant

myweek = Array("mon", "tue", "wed", "thu", "fri", "sat", "sun")

myday2 = myweek(2) 'myday2 contains "tue"

myday3 = myweek(4)

Print Space(3); myday2; Space(3); myday3

aaa = Array(1, 2, 3, 4, 5, 6)

扩展资料：

Array()函数是返回一个数组的函数。

表达式 Array(list)

允许数据类型: 字符，数字均可

实例： <%

Dim myArray()

For i = 1 to 7

Redim Preserve myArray(i)

myArray(i) = WeekdayName(i)

Next

%>

返回结果: 建立了一个包含7个元素的数组myArray

myArray("Sunday","Monday", ... ... "Saturday")

参考资料：百度百科-Visual Basic

array ()函数的作用：返回一个包含数组的 Variant。

1、参数 
varName 
必选。VBArray 分配到的变量名称。 

2、safeArray 
必选。VBArray 值。 

3、备注 
safeArray 参数在传递到 VBArray 构造函数之前必须具有一个 VBArray 值。要获取该值，可以从现有的 ActiveX 或其他对象检索该值。 

4、注意  
在 JScript 中创建的数组和在 Visual Basic 中创建的数组都可以与 .NET Framework 数组互用。因此，可以在 JScript 中直接访问在 Visual Basic 中创建的数组的元素。VBArray 对象仅为实现向后兼容性而提供的。

5、VBArray 可以具有多维。每一维的索引可以不同。dimensions 方法检索数组中的维数；lbound 和 ubound 方法检索每一维所使用的索引范围。 

6、属性 
VBArray 对象没有属性。

扩展资料

VB中的常见函数：

dimensions()：获取列数 

ubound(colCount)：根据列数（维数）获取行数。 

lbound(colCount)：用来判断索引是从多少开始的，这个意义不是很大，一般都是返回0。 

toArray()：直接变成js数组（一维）。 

getItem(y, x)：获取第x行第y列。

参考资料

百度百科-vb

Array函数用来，返回一个包含数组的 Variant：

1. 语法：Array(arglist)

   所需的 arglist 参数是一个用逗号隔开的值表，这些值用于给 Variant 所包含的数组的各元素赋值。如果不提供参数，则创建一个长度为 0 的数组。

2. 说明：用来表示数组元素的符号由变量名、圆括号以及括号中的所需元素的索引号组成。在下面的示例中，第一条语句创建一个 Variant 的变量 A。第二条语句将一个数组赋给变量 A。最后一条语句将该数组的第二个元素的值赋给另一个变量。

3. 示例：

   Dim A As Variant
   A = Array(10,20,30)
   B = A(2）

4. 使用 Array 函数创建的数组的下界受 Option Base 语句指定的下界的决定, 除非 Array 是由类型库（例如 VBA.Array )名称限定。如果是由类型库名称限定，则 Array 不受 Option Base 的影响。

5. 注意：没有作为数组声明的 Variant 也可以表示数组。除了长度固定的字符串以及用户定义类型之外，Variant 变量可以表示任何类型的数组。尽管一个包含数组的 Variant 和一个元素为 Variant 类型的数组在概念上有所不同，但对数组元素的访问方式是相同的。

array() 函数用于创建数组。允许数据类型: 字符，数字均可。

Array(arglist) 所需的 arglist 参数是一个用逗号隔开的值表，这些值用于给 Variant 所包含的数组的各元素赋值。如果不提供参数，则创建一个长度为 0 的数组。

实例：
Private sub form_click
Dim a
a = array（2,3,4,5）
for i = 0 to 3
print a（i）;
next i
end sub

显示结果：2 3 4 5

扩展阅读：vb round函数 ... ubound arr 2 ... vba redim preserve ... vba中function函数的用法 ... vb array函数怎么用 ... vb dir 函数 ... vba array用法 ... array在vb中如何使用 ... array函数教程 ...