" Dış ip nizi öğrenme "
formunuza text1, inet ve bir adet timer1 ekleyin Timer interval=100 yapın kodları yapıştırın
Private Sub Timer1_Timer()
Text1 = Inet1.OpenURL("http://www.ip-adress.com/")
For i = 1 To Len(Text1)
al = Mid(Text1, i, 25)
If al = "Location of my IP address" Then
Text1 =...
