LookPlays

Codigo

Sep 7th, 2015
198
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VB.NET 0.38 KB | None | 0 0
  1. Public Class Form1
  2.  
  3.     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  4.         Dim webclient As New System.Net.WebClient
  5.         Dim IP As String = webclient.DownloadString("http://api.c99.nl/[email protected]&username=" + TextBox1.Text)
  6.  
  7.         TextBox2.Text = (IP)
  8.  
  9.     End Sub
  10. End Class
Advertisement
Add Comment
Please, Sign In to add comment