Visual Basic - dudas

Life is soft - evento anual de software empresarial
 
Vista:

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
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:dudas

Publicado por Pedro Luis (878 intervenciones) el 11/01/2005 11:19:39
Para quitar el beep

if keyascii=13 then
keyascii=0
..........
Endif
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:dudas

Publicado por Benjo (679 intervenciones) el 11/01/2005 11:35:59
Para abrir una Base de datos de Acces 2000 tenés que abrir la conección con el Microsoft Jet cuya versión sea la más alta.
Si Utilizás ADODC para hacer la coneción, fijate que cuando seleccionás el proveedor, te debe aparecer Microsoft Jet
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:dudas

Publicado por Benjo (679 intervenciones) el 11/01/2005 11:37:06
...... te debe aparecer Microsoft Jet 3.51 y
Microsoft Jet 4.0.
Depende con la Base de datos q
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar