[atefkhalf2004]

الاساتذة الافاضل
توصلت الي حل يحناج الي التكملة
بفرض ان اسماء الاجهزة يضيفها العميل الي لستة ويتم اخنبار الاسماء الموجودة قي اللستة
يتبقي كيف اضيف العناصر الي المصفوفة pcs
اي اجعل
Dim PCs As String() = {"atef-PC", "192.168.1.69", "192.168.1.75", "192.168.1.68", "192.168.1.70"}
هي العناصر الموجودة في اللستة

اي نشيف عناصر في اللستة بالكود التالي
Dim aa As String = InputBox("", , "")
ListBox1.Items.Add(aa)
ListBox1.Refresh()

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