SKIN BLOQUEANDO A TELCA ENTER OU TAB
Pessoal meu skin esta impedidno a função da tecla enter ou tab
Private Sub nome_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Set WshShell = CreateObject([Ô]WScript.Shell[Ô])
WshShell.SendKeys [Ô]{Tab}[Ô]
End If
End Sub
quando tiro ele a funcao funciona normal!
Private Sub nome_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Set WshShell = CreateObject([Ô]WScript.Shell[Ô])
WshShell.SendKeys [Ô]{Tab}[Ô]
End If
End Sub
quando tiro ele a funcao funciona normal!
tenta issoooo
nao funcionou quando adiciono a linha comando para o skin o enter nao funciona
[ô]Skin fundo de tela
Skin1.LoadSkin [Ô]C:\Lista Facil\Nightshade.skn[Ô]
Skin1.ApplySkin Me.hwnd
[ô]Skin fundo de tela
Skin1.LoadSkin [Ô]C:\Lista Facil\Nightshade.skn[Ô]
Skin1.ApplySkin Me.hwnd
coloca esse skin pra eu testar aki ... esse Nightshade.skn???
Tópico encerrado , respostas não são mais permitidas