dudas
Publicado por Gustavo (1 intervención) el 11/01/2005 03:35:56
**no reconoce el formato de la base de datos tengo officce 2000
y vb 6.0 como le puedo hacer
**tengo la funcion de solonumeros activada en un text tambien tengo accionado
el enter a un command de esta manera
Function SoloNumeros(ByVal KeyAscii As Integer) As Integer
If InStr("0123456789", Chr(KeyAscii)) = 0 Then
SoloNumeros = 0
Else
SoloNumeros = KeyAscii
End If
' teclas especiales permitidas
If KeyAscii = 8 Then SoloNumeros = KeyAscii ' borrado atras
If KeyAscii = 13 Then SoloNumeros = KeyAscii 'Enter
End Function
Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = SoloNumeros(KeyAscii)
If KeyAscii = 13 Then 'para q el usuario pueda precionar enter cuando termine de
Command1_Click 'ingresarlos datos
End If
End Sub
mi problema es q cuando preciono enter me ejecuta un beep el cual se lo
quisiera quitar
Valora esta pregunta


0