Entradas

Mostrando las entradas etiquetadas como Visual Basic

Cambios en Hablando de Programación...

Imagen
Ahora queremos que nos comentan y nos soliciten lo que quieren que publiquemos....

Auto completar caracteres a la izquierda de cadena String en VB6.

El día de hoy les mostraré el código para obtener una cadena agregando caracteres a la izquierda dentro de visual basic, por ejemplo si la cadena que tenemos es "1" deberá auto completar a 8 caracteres colocando ceros "0" a la izquierda de la siguiente manera: "00000001". El método que utilizaremos es el siguiente.  Private Function FormatComplete(ByVal value As String) As String     Dim resultString As String     resultString = Right("00000000" & value, 8)     FormatComplete = resultString End Function De está manera la función nos regresará la cadena "String" con los caracteres a la izquierda, espero que les sirva de algo. 

Convertir de número Decimal a Romano en Visual Basic

Imagen
Hola, bueno el día domingo una amiga me contacta preguntandome como se puede convertir de un número Decimal a Romano, el problema me lo pidió en Visual Basic claro vaya problema yo no recuerdo mucho de Visual Basic jaja o más bien ya me acostumbre a C#. Pero muy más haya de que tuve que recordar los conceptos de Visual Basic llegue a una respuesta muy chafa pero que como dicen funciona jaja. Bueno el ejemplo funciona para números de 1 a 2000, ya si necesitan incrementarlo lo pueden hacer. Les dejo cómo quedo la aplicación y más abajo les pongo el código y el proyecto para que lo descarguen lo desarrolle como "Aplicación de Windows en Visual Studio 2010". Aquí les dejo el código con el que lo hice espero les ayude en algo, el código del botón:  'Uziel Esau Mercado v1.0 Dim N , u , d , c , m As Integer Dim Unidad ( ) As String = { "" , "I" , "II" , "III" , "IV" , "V"