数组可以存储引用类型数据吗_如何在同一数组中存储不同类型的数据

数组可以存储引用类型数据吗

基础 (The basics)

只是为了使我们都在同一页上，假设您要执行上述情况，但是您没有可用于将数据保存在表中的Access权限，或者您不想处理开销，或者您不能在Excel中使用工作表，或者您不知道如何使用集合类，因此，一开始您可以创建一个数组来容纳可变数量的客户名称，

Dim MyArray()

Guide to Writing Understandable and Maintainable Code article and so you would do it more like this. 《编写可理解和可维护的代码指南》一文，因此您应该这样做。

Dim strCustomerArray() As String

更好的方法 (A better way)

上面描述的两个数组分别为String和Double类型，很多人不知道，而这种更好的方法的基础是程序员可以创建自己的类型。 这是在UserForm，Form，Sheet或Code模块顶部的声明部分中完成的（必须在此处完成）。 为了我们的目的，我们可以如下创建类型

Private Type CustomerData ' May be Public in a code module
    strCustName As String
    dblSales As Double
End Type

exactly like any of the built-in types, and so you can do the following in a procedure.

Dim CustData() As CustomerData

CustData(intEntry).strCustName = ...
CustData(intEntry).dblSales = ...

CustData(UBound(CustData)).strCustName = ...
CustData(UBound(CustData)).dblSales = ...

blah1 = CustData(intEntry).strCustName
blah2 = CustData(intEntry).dblSales

结论 (Conclusion)

一个阵列与2个阵列或6或10阵列也许不是什么大问题，但对我来说，它更优雅，而且对发生的事情更加清楚。

If you find that this article has been helpful, please click the “thumb’s up” button below. Doing so lets me know what is valuable for EE members and provides direction for future articles. It also provides me with positive feedback in the form of a few points. Thanks!

如果您发现本文对您有所帮助，请单击下面的“竖起大拇指”按钮。 这样做可以让我知道对EE成员有价值的内容，并为以后的文章提供指导。 它还以几点的形式为我提供了积极的反馈。 谢谢！

翻译自: https://www.experts-exchange.com/articles/23399/How-to-store-data-of-different-types-in-the-same-array.html

数组可以存储引用类型数据吗