Cómo convertir dígitos a Word en Visual Basic 6.0

Conversión dígitos a decir puede parecer contrario a la intuición , pero en realidad todas las letras , números y signos de puntuación se almacenan como números de la computadora interna . Eso significa que usted puede convertir los números normales, como " 41 " en sus equivalentes letras ( 41 es el número que se utiliza para almacenar la letra " A"). Visual Basic 6 proporciona una función simple " Chr. " para convertir los números de sus equivalentes carta , lo que hace que sea fácil de procesar listas de números en palabras . Instrucciones
1

Tome la serie de números que le den, y se encargará entonces en una matriz. Por ejemplo, si usted tiene los números 66 , 111, 123 , 125, 101 , 114, 0 , 42, 101 , 123, 111 , 103 entonces lo escriba en la parte superior de la función de conversión :

Dim números ( ) As Variant números

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

Copia y pegue el código siguiente después del código anterior para crear una nueva cadena :

Dim secretMessage as String = ""

For i = 0 To numbers.Count

secretMessage = secretMessage & Chr ( números ( i ))

Siguiente
3

Copia y pega el siguiente código en una función de eventos para ver el mensaje secreto "Visual Basic y rdquo ; aparecerá :

MsgBox secretMessage