10-05-19, 02:55 AM
مرحبا عندي هذا الكود مثل ما مبين ان اليوزر هو الي يدخل القيم حتى تقطع بدالة Split
المهم اني جهزت كود حتى يقطعه 3 مرات بس لو كان اليوزر مدخل 100 او اكثر شون يصير الكود
ياريت تساعدوني
المهم اني جهزت كود حتى يقطعه 3 مرات بس لو كان اليوزر مدخل 100 او اكثر شون يصير الكود
ياريت تساعدوني
كود :
Dim a = TextBox2.Text
Dim s() = Split(TextBox1.Text, ",")
If a.ToLower.Contains(s(0).ToLower) And a.ToLower.Contains(s(1).ToLower) And a.ToLower.Contains(s(2).ToLower) And a.ToLower.Contains(s(3).ToLower) Then
MsgBox("Done")
End If