[مساعدة]

(21-12-16, 12:27 AM)adel27 كتب : ولكن يأشر بالأخضر 
System.Net.Dns.GetHostByName

السلام عليكم

يؤشر الأخضر ليخبرك أن تستخدم GetHostEntry بدلا من GetHostByName ولكن سيعطيك AddressList(0).ToString بمعلومة غير صحيحة لما تريد
لهذا طريقة التعامل مع GetHostEntry كالتالي

كود :

Dim localIP As String =
    Dns.GetHostEntry(Dns.GetHostName).AddressList.
    Where(Function(x) x.ToString.Split(".").Count = 4).
    FirstOrDefault.ToString

MsgBox(localIP)