Mensajes

vale la pena darse un paseo

*http://www.elguille.info/vb/ejemplos/ADO_sin_datacontrol.htm

acá ya se han posteado varios ejemplos de login, incluso yo deje uno que con algunas modificaciones quedaria bien.

saludos,

[SaveSetting]

Usa las funciones SaveSetting y GetSetting para lo que deseas..

*http://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/75.htm

[BUeno Encontre Este Codigotext1.MaxLength=100que limita una cierta cantidad de caracterespero COmo aria para hacer lo que ExpliqueLo que Indica la IMG]

BUeno Encontre Este Codigo

text1.MaxLength=100

que limita una cierta cantidad de caracteres

pero COmo aria para hacer lo que Explique

Lo que Indica la IMG

Hola, claro que se puede, mira este ejemplo

Código (vb) [Seleccionar] Expandir

Private Sub Form_Load()
   Text1.MaxLength = 10
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
   If Len(Text1.Text) = Text1.MaxLength Then
       Text1.Text = Mid$(Text1.Text, 2)
       Text1.SelStart = Len(Text1.Text)
   End If
End Sub

El límite de la programación siempre viene dado por la imaginación que tengas..

saludos!!

mod: lo entendi al reves jajaja para eso solo invierte la extracción, chao ..

Tambien tienes está opción, parecida a la que te mostro el amigo en la respuesta anterior:

Código (vb) [Seleccionar] Expandir

Private Sub Command1_Click()
Dim sCadena As String

   sCadena = "Select * From Flores WHERE Estado IN (" & _
   IIf(Check1, "'Pendiente'", "") & _
   IIf(Check2, ",'Enviado'", "") & _
   IIf(Check3, ",'Entregado'", "") & _
   IIf(Check4, ",'Anulado'", "") & ")"
   
   sCadena = Replace(sCadena, "(,", "(")
   Debug.Print sCadena
   
End Sub

Mi recomendación es que trabajes con matrices de objetos, para los checks en este caso.
Recuerda o deberías hacer la validación para el caso en que ningún check este chequeado, no permita la consulta o recibiras un bonito mensaje de error..

saludos!!

Declara todas las variables que uses, si tienes Option Explicit se vuelve un pedo porque debes declarar todo!

pero es la manera como se debería trabajar, te ayuda a ser organizado y evita que te equivoques con tonterias. 

hola, no me da tiempo de hacerte un ejemplo, creo que esto te puede servir mientras..

:http://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/343-exportar-flexgrid-a-archivo-de-texto.htm

hay que hacer una que otra modificación, nada de otro mundo.

depende del tipo de relación que necesites, puedes hacerla de uno a uno ó de uno a muchos, colocando un campo foraneo en la tabla recibos.. pero, eso no tiene nada que ver con vb6 

y mejor sin el data control ..

*http://www.elguille.info/vb/ejemplos/ADO_sin_datacontrol.htm

coloca la propiedad multiline a true o filtra el contenido del txt de manera que evites los saltos de linea, también puedes validar el contenido antes de almacenarlo.

 hola, usa la función "INSTR" para buscar las palabras claves como "nombre, nick, etc.", luego usas "MID" para extraer y asignar al msgbox ..

*http://www.recursosvisualbasic.com.ar/htm/tutoriales/tutorial-basico5.htm

todo lo puedes hacer en una sola linea ..