Array med bogstav som definition

Det kan man ikke i vb.. men du kan lave noget som liner.. ved at bruge en collection

Private Sub Form_Load()
Dim col As New Collection

  With col
      .Add "text1", "a"
      .Add "text2", "b"
      .Add "text3", "c"
  End With

  MsgBox col("b")
  ' eller
  MsgBox col("B")
End Sub

det var måske bedre at bruge Dictionary

Private Sub Form_Load()
Dim dic As Object
  Set dic = CreateObject("Scripting.Dictionary")

  dic("a") = "Test 1"
  dic("b") = "Test 2"
  dic("c") = "Test 3"

  MsgBox dic("a")
 
  dic.RemoveAll ' Sletter alle
 
  Set dic = Nothing
End Sub

hvis du ønsker at kunne 'browse' object så skal du blot tilføje 'Microsoft Scripting Runtime' under 'References...'

Dim dic As New Dictionary