Error en tiempo de ejecución

[alehawk]

Proba lo siguiente:

Cambia
Public Emisora as string()
por
Public Emisora() as string

Y aca:
For i=0 to MAX
cboEmisoras.Items.Add(DatosActivar.Emisora(i))

Puntualmente no se si va a funcionar pero deberias redimensionar a Emisora onda
For i=0 to MAX
Redim Preserve Emisora(i)
cboEmisoras.Items.Add(DatosActivar.Emisora(i))

Como no se de donde sale DatosActivar.Emisora(i) no te sabria decir si va a funcionar pero en este caso tu array esta vacio o sea no tiene posiciones, deberias redimensionarlo en la marcha... bah, eso es lo que hago yo.
Abrazo