ما الخطأ في تحقق عدم تكرار بيانات داخل داتا جريد

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

لدي ليست بوكس يحتوي على اسماء أريد عند الضغط على سطر بداخله يظهر هذا الاسم المضغوط داخل داتا جريد فعلت ذلك بوضع الكود التالي

datagrid1.Rows.Add(New String() {ListBox1.Text})

ولكن طبعا يقوم بتكرار الاسم داخل الداتا جريد وهذا ما لا أريده فأنا أريد عند الضغط على الاسم في الليست بوكس يتحقق أولاً من وجود هذا الاسم داخل الداتا جريد أم لا فإذا كان موجود يخرج من الأمر ولا يفعل شيئا أما إذا كان غير موجود يقوم بإضافته إلى الداتا جريد على الشاشة فقمت باستخدام الكود التالي للمرور على جميع سجلات الداتا جريد ولكن للأسف لم يحرك ساكنا ولم يفعل شيئا لا إضافة ولا رسالة خطأ أرجو تعديل الكود التالي أو إطلاعي على الحل الصحيح

        Dim i As Integer
        For i = 0 To Me.datagrid1.Rows.Count - 1
            Dim row As DataGridViewRow = datagrid1.Rows(i)
            If datagrid1.Item(0, i).Value = ListBox1.Text Then
                Exit Sub
            Else
                datagrid1.Rows.Add(New String() {ListBox1.Text})
            End If
        Next

ملحوظة: أنا أريد التحقق من بيانات الداتا جريد هذا على الشاشة فقط وبداخل حدث كليك الخاص بالليست بوكس أي لا دخل بذلك في قاعدة البيانات وقد جربت كود آخر يتحقق من ذلك في حدث celvalidating الخاص بالداتا جريد ولكن لم يحدث التحقق إلا بعد إضافة الاسم والمرور بالماوس على الداتا جريد وهذا ما لا أريده فأنا أريد التحقق مباشرة قبل الإضافة في الداتا جريد على الشاشة

أرجو يكون شرحي واضح ويا رب ألاقي الحل عندكم .............. واسف على الإطالة ..... وشكرا