2011年度計算機等級考試二級VFP基礎教程(38)

　　二。列表框常用的方法：見下表

　　三。列表框常用事件：列表框的常用事件為click(單擊)事件和dbclick(雙擊)事件。

　　四。例：列表框練習

　　1.新建表單，添加一個文本框text1,三個命令按鈕command1～command3,三個命令按鈕的caption屬性依次設為"加入","移出"和"全部移出",一個列表框list1.界面如圖25

　　2.設置屬性：將表單的caption屬性設為"列表框練習",autocenter屬性設為。T.;將列表框list1的moverbars屬性設為。T.,multiselect屬性設為。T.

　　3.編寫代碼：

　　●"加入"命令按鈕command1的click事件：

　　qm=thisform.text1.value

　　IF !empty(qm)

　　no=.t.

　　FOR i=1 to thisform.list1.listcount

　　IF thisform.list1.list(i)=qm &&如果文本框中輸入的內(nèi)容和列表框中已存在的內(nèi)容相同，則不添加

　　no=.f.

　　ENDIF

　　NEXT i

　　IF no

　　thisform.list1.additem(qm)

　　thisform.refresh

　　ENDIF

　　ENDIF

　　●"移出"命令按鈕command2的click事件：

　　IF thisform.list1.listindex>0

　　thisform.list1.removeitem(thisform.list1.listindex)

　　ENDIF

　　●"全部移出"按鈕command3的click事件：

　　thisform.list1.clear

　　●列表框list1的init事件：

　　thisform.list1.additem("楊過")

　　thisform.list1.additem("小龍女")

　　thisform.list1.additem("東方不敗")

　　●列表框list1的dbclick事件：

　　thisform.command2.click() &&調(diào)用command2("移出"按鈕)的click事件代碼

　　說明：運行后，列表框中自動添加了3條記錄，如圖26,

　　這是在表單的init代碼中添加的;在文本框中輸入任意文本，如果和列表框中的內(nèi)容不同，單擊"加入"按鈕，該內(nèi)容會加入到列表框;否則不添加;在列表框中選中一條數(shù)據(jù)，單擊"移出"按鈕，該數(shù)據(jù)被刪除;在列表框中直接雙擊某條數(shù)據(jù)，則的列表框的dbclick事件中調(diào)用"移出"按鈕的click事件代碼， 將雙擊的數(shù)據(jù)刪除。

　　　　　　　全國計算機等級考試二級VF輔導筆記匯總

　　　　　　　計算機等級考試二級VFP上機試題及答案匯總

　　　　　　　2011年計算機等級考試二級VFP常用命令小結(jié)