ifrancoz

Después de leer un registro podemos utilizar la siguiente rutina para separar los campos, preguntando por la posición del delimitador ";" ascii chr(59) de la siguiente forma : Private Sub Separar_Campos() I= 1 J = 0 L = 0 For L = 1 To 5 J = InStr(I,...

Cuando queremos comparar fechas en un Select se utiliza el carácter # en lugar de la comilla, prueba de la siguiente forma : con = Adodc2.RecordSource = "select count (fechaentrega) from préstamo where (fechaentrega) like #" & hoy & "#"" Suerte !

Si estamos hablando de Visual Basic 6.0 habría que revisar la propiedad Tabindex tanto del dtpicker1 como de text6 ya que si el dtpicker1 tiene el valor 5 entonces text6 debería tener el valor siguiente o sea 6. Además hay que tener en cuenta que...

Para que cuando sea cero no muestre el 0 podemos utilizar Format de la siguiente manera: Label = Format(Valor, "###,###,###") Textbox = Format(Valor, "###,###,###") Cuando la variable valor sea cero no aparecerá nada en el Label o Textbox Suerte !

Utiliza formato para el Label o Textbox Ejemplo : Textbox = Format(Valor , "###,###,###") Label = Format(Valor , "###,###,###") De esta forma si la variable valor es cero entonces aparecerá en blanco. Suerte !

En Visual Basic 6.0 siempre me ha funcionado el truco de utilizar doble formato para alinear números o valores. Printer.Print Format(Format(Valor, "##.###.###.###"), "@@@@@@@@@@@@") Suerte !

Un contador es una variable que se va incrementando generalmente por un valor fijo dentro de un procedimiento. Se puede utilizar por ejemplo para contar cuantos registros he leído o grabado o también para ejecutar una instrucción o procedimiento...

Puede utilizar algo como esto : Dim I As Byte Dim J As Byte Dim L As Byte Dim M As Byte Dim N As Byte Dim Campo(5) As String Private Sub Command1_Click() Call Separar_Campos End Sub Private Sub Form_Load() Text1 = "contabilidades.operaciones.corp"...

Si está utilizando Visual Basic 6.0 puede hacerlo de esta forma, así extrae cualquier caracter diferente de los dígitos sin importar la posición dentro del Textbox. Dim I As Integer Dim L As Integer Private Sub Command1_Click() Text2 = "" L =...

Este error generalmente ocurre porque no coinciden los datos con la definición de la variable que hemos creado, por ejemplo es un campo entero y pretendemos asignar una letra o es un campo texto y estamos asignando algún valor nulo, así que lo mejor...