Newsgroup: it.comp.lang.visual-basic
Titolo: trattare le costanti

Salve gente,
si vede subito quando rincomincio a divertirmi con il VB.... la prima cosa
che faccio e' affacciarmi qui :-)
Vi espongo subito il problema, sperando di riuscire a farmi capire.
Ho assegnato a tutte le lettere dell'alfabeto, delle costanti:
Const A="Ciao"
Const B="Salve".... eccetera
Ho anche generato dei numeri a caso con la funzione Random (rnd) per poter
avere dei numeri da 1 a 26 e da quueste trovare la lettera.
Ho quindi la lettera memorizzata in una variabile stringa, ad esempio:
Select Case ValoreRandom ' dove ValoreRandom e' il numero da 1 a 26
Case 1
    MyString = "A" ' dove MyString e' la variabile dove memorizzare la
lettera
...
End Select
Dovrei poter riuscire, esaminando la lettera estratta, ad avere la parola
associata. Vorrei evitare il select case o l'if.. then, ma speravo di
poterlo fare tramite le costanti gia' dichiarate.
Per spiegarmi meglio, diciamo che, ogni volta che viene "estratta" la
lettera A, mi apparisse su una label la parola "Ciao" come dichiarata da
costante.
E' chiaro che se, per esempio, scrivessi:
    lblMyWord.caption= MyString
sulla label verrebbe riportata una A.
Sperando di essere riuscito a spiegarmi (lo so, a volte sono complicato),
arrivo alla domanda.
E' possibile, avendo la lettera memorizzata in una variabile, partire dala
variabile stessa  per avere il contenuto della costante?
Grazie per la pazienza che avete avuto ad arrivare a leggere fin qui....
Maurizio

 avere dei numeri da 1 a 26 e da quueste trovare la lettera.
se ho capito bene cosa vuoi fare, non fai prima a usare un array di tipo
stringa così hai già le parole indicizzate...
del tipo (ma controlla perchè non l'ho compilato)
dim MyWords(25) as string             'se parti da 0 sono 26 campi
'generi il tuo bel numerino e lo metti ad esempio in ID_word, come intero
MyLabel.caption = MyWords(ID_word).
tutto qui!
per inizializzare le stringhe basta che fai
MyWords(0) = "Salve"
MyWords(0) = "Ciao"
e così via....
spero d'esserti stato utile!
Marco

 da costante.
e allora perche' passi per le lettere dalla a alla z ? 
io userei direttamente i numeri.
Se ho capito tu :
-) crei le costanti
1) generi un numero da 1 a 26
2) associ una lettera 
3) converti la lettera nella relativa costante 
se e' giusto il tutto si potrebbe ottimizzare in 
-)crei un vettore di 26righe contenenti Le costanti
1) generi un numero da 1 a 26
2) leggi il valore dell'array in quel vettore
es:
myArray = (Ciao,Casa,Pera,Mela,Banana,Caffe...)
msgbox myArray(ValoreRandom)
Tutto qui ^_^
-- 
<Gigio2K>
Sito Comune
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/

 2) leggi il valore dell'array in quel vettore
...
Grazie Giorgio e Marco per le risposte.
In realta' mi servono sia le costanti che le lettere.
Spiego meglio....
sto cercando di realizzare un generatore do codice Morse casuale.
Quando con rnd "estraggo" un numero, questo viene associato ad una lettera.
Per esempio, se esce il 3, io mi tiro fuori con un select case, a lettera C.
La costante C e' "-.-."
Sul monitor mi deve apparire sia la lettera C, sia il Morse -.-. e poi,
tramite la funzione beep, faccio anche suonare la lettera.
Ecco il motivo per cui ho dichiarato le costanti e per cui mi servirebbe di
richiamarle con il contenuto delle variabili.
Ciao r grazie.... Maurizio

 In realta' mi servono sia le costanti che le lettere.
Matrice di 26righe e 2 colonne :p

 Matrice di 26righe e 2 colonne :p
...
Si, credo faro' cosi'. Ciao *Gigio*!!!

 Ciao *Gigio*!!!
^______^ adesso va meglio ^______^