[silverlight]

اصلا انت مش محتاج استخدام For .... Next نهائيا
فقط تحصل علي index كما فعلت في الكود الخاص بك

PHP كود :

Dim idx = Array.IndexOf(WEATHER, TextBox1.Text) 


ومنه تسترد البيانات من المصفوفات الأخري

PHP كود :

IF -1 <> inx Then
    TextBox3.Text = RESULT(idx)
    PictureBox1.Image = ImageArray(idx)
 Else
     TextBox3.Text = "لم يتم ادراجة"
End IF