Bem-vindo ao Fórum!

Registre-se agora mesmo e fique por dentro da maior comunidade de Cheats do Brasil!

Search the Community

Showing results for tags 'ajuda vbnet'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • Anunciantes
    • Advertise here
    • silvaBR Cheats
    • WoXArea
  • Anúncios/Eventos
    • Regras
    • Anúncios
    • Eventos do fórum
  • Feedback & Suporte
    • Tutoriais WC
    • Suporte
    • Denúncias e Reclamações
    • Sugestões
    • Depósito
  • WebCheats Premium
    • Trackers & Warez
    • Download
    • Cracking
    • Serviços Pagos - Pedidos
    • MarketPlace
    • Conteúdo Adulto
    • Taverna WebCheats Premium
  • Shooter Zone
    • Point Blank
    • Combat Arms
    • Cross Fire
    • Counter Strike
    • Battle Royale
    • Outros Shooters em Geral
    • Shooter Zone - Lixão
  • RPG/MOBA Zone
  • Outros Games Zone
  • Design Zone
  • Info Zone
  • Video Games Zone
  • Entretenimento & Diversão

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


About Me


Discord

Found 1 result

  1. Olá galera tudo bom? , espero que sim! gente estou precisando fazer essa aplicação eu mexo mais com design e não sei muito de vbnet mas eu entendo pouco no caso estou com dificuldades de fazer uma aplicação e para não ter erros queria saber se é possível eu passar código fonte e alguém posso me ajuda fazendo o projeto e me mandando o arquivo pronto pra eu editar o design do form e etc... pois aqui tá dando muito erro não sei oque é, eu conseguir uma vez mas dessa vez está hard '-', agradeço uma resposta ajuda :) Em cima da public class form 1: Imports System.Runtime.InteropServices Imports System.Threading EM BAIXO DA FORM 1 <DllImport("user32.dll", CallingConvention:=CallingConvention.StdCall, CharSet:=CharSet.Unicode, EntryPoint:="keybd_event", ExactSpelling:=True, SetLastError:=True)> Public Shared Sub KEYB_Event(ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Integer, ByVal dwExtraInfo As Integer) End Sub Const VK_KEY_Q As Byte = &H51 Const VK_KEY_W As Byte = &H57 Const VK_KEY_R As Byte = &H52 Const KEYEVENTF_KEYUP As Byte = &H2 TIMER DO MACRO If checkbox1.Checked Then KEYB_Event(VK_KEY_Q, 0, 0, 0) KEYB_Event(VK_KEY_Q, 0, KEYEVENTF_KEYUP, 0) Thread.Sleep(TrackBar1.Value) End If If checkbox2.Checked Then KEYB_Event(VK_KEY_W, 0, 0, 0) KEYB_Event(VK_KEY_W, 0, KEYEVENTF_KEYUP, 0) Thread.Sleep(TrackBar1.Value) End If If checkbox3.Checked Then KEYB_Event(VK_KEY_R, 0, 0, 0) KEYB_Event(VK_KEY_R, 0, KEYEVENTF_KEYUP, 0) Thread.Sleep(TrackBar1.Value) End If If checkbox4.Checked Then KEYB_Event(VK_KEY_R, 0, 0, 0) KEYB_Event(VK_KEY_R, 0, KEYEVENTF_KEYUP, 0) Thread.Sleep(TrackBar1.Value) End If BOTOES Timer1.start ' pra ativar Timer1.Stop ' pra desativar Propriedades da TrackBar Maximum : 100 Minimum : 1 LargeChanger : 1 Value : 50 Timer da HotKey Dim Hotkey As Boolean Hotkey = GetAsyncKeyState(Keys.F5) If Hotkey = True Then Button1.PerformClick() End If Hotkey = GetAsyncKeyState(Keys.F6) If Hotkey = True Then Button2.PerformClick() End If OBS: o aplicativo é para ficar apertando as teclas Q,W,R ou pode ser Q, W somente essas teclas e pode ser sem os botões 1 e 2 pois já tem o ativar pelo F5 e Desativar por F6 ISSO É PRA UM JOGO QUE USA AS PORÇÕES EM > Q, W, R OU PODE SER SOMENTE Q,W