List列表拒絕新增重複資訊

【例項說明】

利用程式輸入資訊時，經常由於馬虎輸入了重複的資訊。為避免輸入重複資訊，可以在新增重複資訊時進行警告。

【程式設計思路】

additem方法，將專案新增到listbox列表裡。

語法：object.additem item,index

引數：item必需的。字串表示式，用來指定新增到列表中的專案。index可選。是整數，用來指定新專案或行在列表中的位置。

listcount屬性，列表中專案的個數。

listindex屬性，設定列表中當前被選擇的專案的索引。

text屬性，列表中的文字。

【設計步驟】

1.新建乙個標準工程，建立乙個新窗體，預設名為form1。

2.在form1窗體中放置乙個text控制項、乙個listbox控制項、兩個command控制項。

3.源程式

private sub form_load()

me.list1.additem "456"

me.list1.additem "123"

end sub

private sub command1_click()

dim i as integer

for i = 0 to list1.listcount - 1

list1.listindex = i

if list1.text = text1.text then '如果資訊重複

' msgbox "系統不允許重複輸入，請重新輸入"

exit sub

end if

next i

list1.additem text1.text '新增資訊

end sub

private sub command2_click()

end

end sub vb

部分相關文章

mysql批量新增重複資料

很多時候我們都需要大量的資料，下面就來講一講mysql如何新增大量資料此方法效率不一定會高但是這個方法一定是最簡單的首先，建一張表，字段沒有要求測試用，我就隨便準備寫了兩個字段 users表欄位name和pwd 然後我們事先新增幾條資料然後我們執行批量新增的語句 insert into ...

Dictionary 新增重複的鍵值對

上 region 測試dictionary如何新增鍵重複的內容 public class mydictionarycomparer iequalitycomparer public int gethashcode string obj public static void csdictionary ...

新增修改時不可新增重複名稱的重複性校驗解決方案

需求要求在新增修改門店名稱時,不可以重複新增名稱的問題 int exist commonservice.getlistfortotal existstorebyid storebean if exist 0 sql 的使用 existstorebyid count resulttype int ...

List列表拒絕新增重複資訊

mysql批量新增重複資料

Dictionary 新增重複的鍵值對

新增 修改時不可新增重複名稱的重複性校驗解決方案

相關推薦

新增修改時不可新增重複名稱的重複性校驗解決方案