Question

我正在制作一项计划来提高你的游戏技巧，所以它不是一个黑客程序！

现在，我被困在一件事上，我需要一种键盘记录器，它会记录你所做的事情。例如，当你按空格键时，它必须将Jumped放入一个富文本框。当你点击鼠标左键时，它必须将Shots Fired添加到Rich Text Box，然后，当点击鼠标右键时，添加Aiming Down Sights，但是当它被释放时它还应该添加一些像Stopped Aiming Down Sights。

Answer 1

我发现我必须使用此代码，但是，我还没有找到空格键

 If Chr(i) = "(" Then
txtkeys.Text = txtkeys.Text & "[Arrow Down]"
ElseIf Chr(i) = "%" Then
txtkeys.Text = txtkeys.Text & "[Arrow Left]"
ElseIf Chr(i) = "'" Then
txtkeys.Text = txtkeys.Text & "[Arrow Right]"
ElseIf Chr(i) = "&" Then
txtkeys.Text = txtkeys.Text & "[Arrow up]"
ElseIf Chr(i) = "" Then
txtkeys.Text = txtkeys.Text & "[mouse click left]"
ElseIf Chr(i) = "" Then
txtkeys.Text = txtkeys.Text & "[mouse click right]"
ElseIf Chr(i) = "" Then
txtkeys.Text = txtkeys.Text & "[backspace]"
ElseIf Chr(i) = "." Then
txtkeys.Text = txtkeys.Text & "[delete]"
ElseIf Chr(i) = "" Then
txtkeys.Text = txtkeys.Text & "[shift]"
ElseIf Chr(i) = " " Then
txtkeys.Text = txtkeys.Text & "[tab]"
ElseIf Chr(i) = "¾" Then
txtkeys.Text = txtkeys.Text & "."
ElseIf Chr(i) = "¼" Then
txtkeys.Text = txtkeys.Text & ","
ElseIf Chr(i) = "¿" Then
txtkeys.Text = txtkeys.Text & "/"

Visual Studio游戏控制器

1 个答案: