كيفية إعلان مجموعة من النوع المحدد للمستخدم في VB6 [مغلق

Question

Type ABFator
    a As Single
    b As Sinlge
End Type

Dim ABFactorArr(8) As ABFactor

في الأساس ، أريد أن أعلن مجموعة من ثمانية من العوامل التي يمكنني الوصول إليها بعد ذلك

أفعل هذا ويعطي الكدمية نوعًا محددًا للمستخدم غير محدد

شكرًا

Answer 1

خطأ إملائي؟ مفقود ج؟

• لقد حددت النوع AS ABFator بدون ج
• وقد وضعت المصفوفة ABFactor مع AC

لقد أخطأت أيضًا Single في تعريف النوع الخاص بك

بدلاً من ذلك ربما تحتاج إلى صنع النوع Public, ، في حال كنت تحددها في وحدة واحدة واستخدامها في مجلة أخرى؟

)

Answer 2

ضع هذا في الكود خلف Form1 في الجزء العلوي من الصفحة:

Private Type ABFactor
    a As Single
    b As Single
End Type


Private Sub Form_Load()

Dim ABFactorArr(8) As ABFactor
Dim i As Byte
For i = 0 To UBound(ABFactorArr)
    ABFactorArr(i).a = i
    ABFactorArr(i).b = i + 10
Next i
'quick test
Debug.Print ABFactorArr(6).b

End Sub