Conversione cifre a parole può sembrare contro intuitivo, ma in realtà tutte le lettere, numeri e segni di punteggiatura vengono memorizzati come numeri dal computer internamente. Ciò significa che è possibile convertire i numeri normali come "41" in loro equivalenti lettera (41 è il numero utilizzato per memorizzare la lettera "A"). Visual Basic 6 fornisce una semplice funzione "Chr" per convertire i numeri ai loro equivalenti lettera, che lo rende facile da elaborare liste di numeri in parole.

istruzione

1 Prendere la serie di numeri si è dato, e disporre quindi in un array. Per esempio, se si hanno i numeri 66, 111, 123, 125, 101, 114, 0, 42, 101, 123, 111, 103, allora devi scrivere in cima alla vostra funzione di conversione:

numeri Dim () come variante

Numeri = Array (66, 111, 123, 125, 101, 114, 0, 42, 101, 123, 111, 103)

2 Copia e incolla il seguente codice dopo il codice qui sopra per creare una nuova stringa:

Dim secretMessage as String = ""

Per i = 0 Per numbers.Count

secretMessage = secretMessage & Chr (numeri (i))

Il prossimo

3 Copiare e incollare il seguente codice in una funzione di evento per vedere il messaggio segreto "Visual Basic" pop-up:

MsgBox secretMessage

Consigli e avvertenze

• Se si desidera utilizzare l'intera gamma di caratteri invece dello standard 0 a 255, utilizzare la funzione ChrW.