顺便用VB。
当我点击一个按钮时,我输入了一个符号 % ^ ( )。当我勾选它(CheckedListBox1)并按开始(Button1)让它在记事本上发送垃圾邮件时,它不会这样做。我猜它需要转换或需要声明代码以识别正在按下符号。基本上,我想要的就是我输入的任何内容,与 OUT 相同。
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick On Error Resume Next
If CheckBox1.Checked = True Then 'Only Checked Items of the CheckedListbox
If IntCount > CheckedListBox1.CheckedItems.Count - 1 Then 'If the index is higher then the max. index of the checkedlistbox
IntCount = 0 ' The index will reset to 0
End If
SendKeys.SendWait(CheckedListBox1.CheckedItems(IntCount).ToString & "{ENTER}") 'Send keys to the active windows
IntCount += 1 'Goto the next line
Else 'All items
If IntCount > CheckedListBox1.Items.Count - 1 Then 'If the index is higher then the max. index of the checkedlistbox
IntCount = 0 ' The index will reset to 0
End If
SendKeys.SendWait(CheckedListBox1.Items(IntCount).ToString & "{ENTER}") 'Send keys to the active windows
IntCount += 1 'Goto the next line
End If