|
|
Postada em 13/08/2004 13:27 hs
O Código é o seguinte: No Form procure a propriedade KeyPreview e defina ela para True Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
MsgBox ("Aqui você tem que colocar o código para a soma etc...")
End If
End Sub
|
|
|
|
|
|
Rodrigo Braga
não registrado
|
|
Postada em 13/08/2004 13:29 hs
João eu fiz isso . .. o problema é que tem um código que eu não estou conseguindo identificar que não permite nem mesmo capturar o keypress ou kecode do enter . . . toda vez que pressiona enter ele cai na rotina que insere zero . . . mas como alterar isso é q eu tô tentando .. . ou se alguém tiver o código fonte da calculadora do windows melhor ainda :-) |
|
|
|
Rodrigo Braga
não registrado
|
|
Postada em 13/08/2004 13:31 hs
Rubinho eu já fiz isso e não funcionou . . . se vocês quiserem eu mando o código . . . é ver pra crer :-) |
|
|
|
|
|
Postada em 13/08/2004 13:32 hs
Manda pra mim o fonte que estou esperando... |
|
|
|
Rodrigo Braga
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 13/08/2004 13:57 hs
|
|
|
|
|
|
Postada em 13/08/2004 14:14 hs
rodrigo por vc nao usa a calculadora do windows ai é so vc fazer isso dim varet varet = shell("c:windowscalc.exe") |
|
|
|
