بدست آوردن ای پی

Question

درود بر همگی

اقا من میخوام تا فرمم باز شد IP کامپیتوری که برنامه روی آن اجرا میشه داخل یک Label بنویسه.

Answer 1

سلام
میتونی از webbrowser یا Inet استفاده کنی.
مثال:

Private Sub Form_Load()
    WebBrowser1.Navigate2 "http://myip.dk/"
End Sub

Private Sub WebBrowser1_ProgressChange(ByVal Progress As Long, ByVal ProgressMax As Long)
    If ProgressMax = 0 Then
        label1.Caption = WebBrowser1.Document.getElementByID("fpIPv4Addr").innerHTML
    End If
End Sub