PDA

View Full Version : مبتدی: پیغام هنگام وجود داشتن آیتم از قبل در listview



karem2074
جمعه 13 خرداد 1390, 13:58 عصر
سلام
دوستان من میخوام وقتی که یک آیتم اضافه کردم در listview1, اگر آیتم از قبل وجود داشت پیغام بده که آیا جایگزین بشه یا نه.

ممنون میشم کمک کنین.

dll9095
جمعه 13 خرداد 1390, 17:32 عصر
dim strCheck as string = "Test"
for i as integer = 0 to me.lstview.items.count - 1
if strcheck = me.lstview.items(i).text then
msgbox
exit for
end if
next

karem2074
جمعه 13 خرداد 1390, 20:12 عصر
dim strCheck as string = "Test"
for i as integer = 0 to me.lstview.items.count - 1
if strcheck = me.lstview.items(i).text then
msgbox
exit for
end if
next
دوست عزیز اصلا کار نکرد.

Hossis
شنبه 14 خرداد 1390, 20:51 عصر
re:
If LV.Items.ContainsKey("test") Then
' MsgBox("")
Exit Sub
Else
LV.Items.Add("test", "text", "")
End If
GoTo re

البته باید در اضافه کردن هر آیتم، key اون رو هم تعیین کنید

karem2074
شنبه 21 خرداد 1390, 12:45 عصر
re:
If LV.Items.ContainsKey("test") Then
' MsgBox("")
Exit Sub
Else
LV.Items.Add("test", "text", "")
End If
GoTo re

البته باید در اضافه کردن هر آیتم، key اون رو هم تعیین کنید

دوست عزیز خیلی ممنونم.

اما من هرچه تلاش کردم بازم مشکل داشت.میخوام با کد خودم ترکیبش کنم.

اگه برام ترکیب کنید خیلی خوب میشه.ممنون میشم:قلب:

این کد من هست:

' TODO: Add code to add items to the listview based on the selected item in the treeview
Dim lvItem As ListViewItem
Dim file As String
If OpenFileDialog1.ShowDialog = DialogResult.OK Then
For Each file In OpenFileDialog1.SafeFileNames
lvItem = ListView.Items.Add(file)
ListView.ShowItemToolTips = True
Dim count As String
Dim item As String
item = " Item"
count = ListView.Items.Count
ToolStripStatusLabel1.Text = count + item
lvItem.ImageKey = "app"
OpenFileDialog1.FileName = ""
Next
End If

با تشکر