PDA

View Full Version : سوال: ListBox Format



morika
دوشنبه 23 شهریور 1388, 23:04 عصر
سلام

من یه لیست باکس دارم که می خوام اگه ایتمی که توش انتخاب میشه با این فرمت نبود یه پیغام ظاهر بشه:

اگه فرمت به این شکل نبود: شماره: هرچیز
یعنی به این شکل می شه که: ali :09121564897

ولی چیزی که من توش گیر کردم اینه که نه تعداد شماره ها معلومه نه تعداد حروف اسم
یعنی فقط اون قسمت که باید بین اسم و : فاصله باشه و بین : و شماره فاصله نباشه خیلی مهمه.

ممنون

anooshiran
شنبه 28 شهریور 1388, 05:51 صبح
سلام دوست عزيز

قطعه كد زير را به پروژه ات اضافه كن مشكلت حل ميشود




Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
Dim spl = Split(ListBox1.SelectedItem, ":")
If UBound(spl) = 1 Then
spl(1) = spl(1).trim
If Not IsNumeric(spl(1)) Then
MsgBox("Wrong Format")
End If
Else
MsgBox("Wrong Format")
End If

End Sub