[SaLoOoMX]

وعليكم السلام ورحمه الله وبركاته

الفجوال بيسك دوت نت يستخدام تقنية دوت نت فرام ورك

والفجوال بيسك 6 سوف يتم ايقاف دعمه في اصادرات الوندوز القادمه هذا كلام مايكروسفت

بالنسبه لكود معرفه ايبي الجهاز تفضل

كود :

Dim iu As Object
        Dim ipend As IPHostEntry
        ipend = Dns.GetHostByName("")
        For Each iu In ipend.AddressList
            MsgBox(iu.ToString)
        Next