Mensajes

Hola a todos soy nuevo en el foro y en visualbasic6, necesito validar 5 campos, text1,text2,text3,text4,text5. que son para una base de datos.

Código [Seleccionar] Expandir

Private Sub Command3_Click()
If Text1.Text = "" Or Text2 = "" Or tex3 = "" Or Text4 = "" Or Text5 = "" Then
MsgBox "llene campo"
Text1.SetFocus
Else
x = "insert into stock values (" & Val(Text1) & ",'" & Text2 & "'," & Val(Text3) & "," & Val(Text4) & "," & Val(Text5) & ")"
conexion_basedatos.Execute x
MsgBox "Se grabo correctamente"
limpiar
End If

End Sub


hice esto pero no me funciona.. como puedo hacer?.. el text 2 es el unico que lleva letras
saludos a todo y gracias