萝卜QQ轰炸机怎么用

萝卜QQ轰炸机怎么用

自己用vb2008写一个就行了，免得有病毒---
　　Option Strict Off
　　Option Explicit On

　　Friend Class Form1
　　Inherits System.Windows.Forms.Form
　　Dim a As String
　　Public Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)

　　Private Sub Command1_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Command1.Click
　　Timer1.Enabled = True
　　End Sub

　　Private Sub Command2_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Command2.Click
　　Timer1.Enabled = False
　　End Sub

　　Private Sub Form1_Load(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles MyBase.Load
　　Timer1.Enabled = False
　　TextBox1.Text = " "

　　End Sub

　　Private Sub Combo1_KeyDown(ByRef KeyCode As Short, ByRef Shift As Short)
　　On Error GoTo a
　　If KeyCode = CDbl("F10") Then
　　Me.Visible = False
　　Timer1.Enabled = True
　　End If
　　If KeyCode = CDbl("F4") Then
　　Me.Visible = True
　　Me.Visible = True
　　Me.Visible = True
　　Me.Visible = True
　　Timer1.Enabled = False

　　a:

　　End If
　　End Sub

　　Private Sub Timer1_Tick(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Timer1.Tick
　　Me.Visible = False
　　a = TextBox1.Text
　　SendKeys.Send(a)
　　SendKeys.Send("{ENTER}")
　　End Sub
　　End Class
　　至于关掉它，只好用任务管理器强关了