estructuras pero con vb 6.0

Hola! Obtuve esta respuesta el otro dia... pero no me acorde de indicar q
uso vb 6.0... alguna idea, para realizarlo?

Un array no se puede indexar por un string. Lo que puedes hacer es usar
una
estructura para alamacenar los dos valores y estos almacenarlos en un
Hashtable. Por ejemplo:

Public Structure Datos

Dim valor_a As Integer
Dim valor_b As Double

Sub New(ByVal a As Integer, ByVal b As Double)
valor_a = a
valor_b = b
End Sub

End Structure

Dim allotjament As New Hashtable
Dim dato As Datos

allotjament.Add("2", New Datos(54, 34.97))
allotjament.Add("2 3/4", New Datos(73, 54.02))

dato = DirectCast(allotjament("2"), Datos)

MessageBox.Show(dato.valor_a.ToString())

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo
https://mvp.support.microsoft.com/p...4EF5A4191C
http://spaces.msn.com/members/emorcillo/