Mensajes

producto si va. (lee la documentación)

producto es un directorio :S

tienes que leer mas.

no en la base de datos :S

las guardas en una carpeta. en la base de datos tendrias el nombre que la identifique.


algo así: (sin usar base de datos)

Código (vb) [Seleccionar] Expandir

Dim indice As Integer
Dim ruta As String

Private Sub Command1_Click()
If Not (indice = 1) Then
indice = indice - 1
ruta = App.Path & "\Productos\" & indice & ".jpg"
Image1.Picture = LoadPicture(ruta)
End If
End Sub

Private Sub Command2_Click()

If Not (indice = 4) Then
indice = indice + 1
ruta = App.Path & "\Productos\" & indice & ".jpg"
Image1.Picture = LoadPicture(ruta)
End If
End Sub

Private Sub Form_Load()
indice = 1
ruta = App.Path & "\Productos\" & indice & ".jpg"
Image1.Picture = LoadPicture(ruta)
End Sub



saludos

Bueno si usas una base de datos. entonces colocarias el nombre de la imagen igual al código de la imagen en la db. cada vez que le des next pones la imagen en el control de la imagen.

pues al darle a Adodc1.Recordset.AddNew deberia colcartelos en blanco

no entiendo :S

puedes hacer algo asi:

Código (vb) [Seleccionar] Expandir

For Each Control In Me.Controls
If TypeOf Control Is TextBox Then Control.Text = ""
Next


saludos

mira aquí 


http://www.recursosvisualbasic.com.ar/htm/ocx-componentes-activex-dll/105-ocx-para-aplicar-skins-a-formularios-y-controles.htm

http://www.recursosvisualbasic.com.ar/htm/ocx-componentes-activex-dll/207-listado-de-36-skins-para-vb.htm

http://www.recursosvisualbasic.com.ar/htm/ocx-componentes-activex-dll/133-ocx-para-skins-en-formularios-vb-skinner.htm


saludos

Pues usa alguna skin en la web hay muchas. o crea tus propios controles. 


saludos

mmm lo tienes como un callback. (es que no se java)

pues tendrías que colocar mas condiciones. no manejo mucho expresiones regulares eso fue algo básico que recordaba y como dices funciona solo cuando esta todo en el  textfield si vas escribiendo remplazara por "-" menos los números.

se me ocurrió algo así:

Código (java) [Seleccionar] Expandir

test.replaceAll("([^\d]+){1,3}", "-")


no lo probé.

saludos