logo logo

The next-generation blog, news, and magazine theme for you to start sharing your stories today!

The Blogzine

Save on Premium Membership

Get the insights report trusted by experts around the globe. Become a Member Today!

View pricing plans

New York, USA (HQ)

750 Sing Sing Rd, Horseheads, NY, 14845

Call: 469-537-2410 (Toll-free)

hello@blogzine.com
.Net

Check IP Adressbar PC

Hôm nay mình xin hướng dẫn các bạn phần mềm check IP Adressbar của PC. Ứng dụng hoàn toàn FREE không có thu phí và nếu các bạn sợ VIRUS thì có thể check virus thoải mái nhé :) Và dưới đây là video mì…

avatar
Hung.Pro.VN

Developer Windows


  • 02/11/2016
  • Views
Hôm nay mình xin hướng dẫn các bạn phần mềm check IP Adressbar của PC. Ứng dụng hoàn toàn FREE không có thu phí và nếu các bạn sợ VIRUS thì có thể check virus thoải mái nhé :)


Và dưới đây là video mình check thử và hướng dẫn các bạn cách nhé ^^ "Hoàn toàn đơn giản các bạn nhé ^^"



Full đoạn code cho ai cần nhé ^^
Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim webclient As New Net.WebClient
TextBox1.Text = webclient.DownloadString("http://kiemtraip.com/raw.php")
MessageBox.Show("Cảm Ơn Các Bạn Đã Sữ Dụng Ứng Dụng Của Tôi", "Thông Báo")
End Sub

Private Sub CopyToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CopyToolStripMenuItem.Click
My.Computer.Clipboard.SetText(TextBox1.Text)
End Sub

Private Sub AboutToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AboutToolStripMenuItem.Click
MessageBox.Show("+ Ứng Dụng Được Phát Triển Bởi Bờm Khùng Blogger" & vbCrLf & "+ Cảm Ơn Các Bạn Đã Sữ Dụng Ứng Dụng Của Tôi" & vbCrLf & "+ Mong Các Bạn Thường Xuyên Ghé Blog " & vbCrLf & "+ Để Nhận Thêm Nhiều Ứng Dụng Nhé")
Process.Start("http://www.bomkhung.info")
End Sub


Private Sub FreshIPToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FreshIPToolStripMenuItem.Click
Dim webclient As New Net.WebClient
TextBox1.Text = webclient.DownloadString("http://kiemtraip.com/raw.php")
MessageBox.Show("Fresh IP Successfull", "Thông Báo")
End Sub
End Class

Hình ảnh của PC đã được Change IP



Và bên dưới là link down cho ai cần nhé ^^


Chúc các bạn thành công ^^

Related post


avatar

Hung.Pro.VN

Nhà thiết kế Web
View Articles

Tôi là admin trang Hung.Pro.VN là một người có đam mê với Blogspot, kinh nghiệm 5 năm thiết kế ra hàng trăm mẫu Template blogpsot như" Bán hàng, bất động sản, landing page, tin tức...

Nhận xét

Share this article