Delphi控件：ListView組件屬性及使用方法

　　ListView組件位于組件板的Win32頁(yè)，可用4種圖形方式(大圖標、小圖標、列表、詳細列表)來(lái)描述選項內容，類(lèi)似于Windows操作系統中的“我的電腦”，數據項圖形保存在ImageList組件中。

　　1.ListView主要屬性

　　(1)ViewStyle屬性

　　ViewStyle屬性用于選擇數據項的4種顯示方式，因此該屬性有4個(gè)選項值：vsIcon大圖標、vsSmallIcon小圖標、vsList列表、vsReport詳細列表。

　　(2)Items屬性

　　Items屬性用于表示ListView組件的數據項，數據項可用Items屬性編輯器輸入。在Items編輯器中有3個(gè)按鈕：NewItemjNewSubItem、Delete，分別用于添加數據項、數據項子項與刪除數據項。

　　讀者應注意，ListView組件與TreeView組件在數據項顯示方式上有所不同，當Listview組件工作于vsIcon大圖標、vsSmallIcon小圖標、vsList列表方式時(shí)，只顯示第一層數據項而不顯示子數可以寫(xiě)成下面一行：

　　Dim MyName As string：MyName一“楊煥章”

　　如果在鍵入一行代碼并按下回車(chē)鍵后，該行代碼以紅色文本顯示(也可能同時(shí)顯示錯誤信息)，則必須找出語(yǔ)句中的錯誤并更正它。

　　2.注釋語(yǔ)句

　　為了增強程序的可讀性，可以在程序中加入注釋。注釋可以解釋過(guò)程或某些命令。VBA在運行過(guò)程時(shí)，會(huì )忽略注釋。

　　在VBA程序中，注釋可以通過(guò)兩種方式來(lái)實(shí)現�，F在通用的方法是使用一個(gè)單引號(')，也可以用Rem接一個(gè)空格作為注釋的開(kāi)始。例如：

　　Dim MyStrl.MyStr2

　　MyStrl="htllo\":Ren 注釋在語(yǔ)句之后要用冒號隔開(kāi)。

　　MyStr2="(Goodbye\"'這也是一條注釋?zhuān)�不必使用冒號�?/P>

　　注釋可以添加在過(guò)程的任何地方，并且默認以綠色文本顯示。

　　3.聲明語(yǔ)句

　　可以用聲明語(yǔ)句來(lái)命名和定義過(guò)程、變量、數組以及常數。在聲明這些程序的組成部分時(shí)，也同時(shí)定義了它們的范圍，其范圍取決于聲明位置以及用什么關(guān)鍵字來(lái)聲明。例如，在程序段：

　　Sub ApplyFormat()

　　Const limit As Integer 33

　　Dim myCelI As Range

　　'更多的語(yǔ)句

　　End Sub中，Sub語(yǔ)句(與End Sub語(yǔ)句相匹配)聲明了一個(gè)名為ApplyF0rmat的過(guò)程。當這個(gè)過(guò)程被調用或運行時(shí)，所有包含于sub與End Sub中的語(yǔ)句都將被執行。Const語(yǔ)句聲明了常數limit，指定其為Integet’類(lèi)型，且其值為33;dim語(yǔ)句聲明了變量mycell。這是一個(gè)屬于。Excel Range對象的數據類(lèi)型�？梢詫⒆兞柯暶鳛槿魏螌ο�，而該對象處于正在使用的應用程序中。

　　Dim語(yǔ)句是用來(lái)聲明變量的語(yǔ)句之一。其他用來(lái)聲明的關(guān)鍵字還有：static、Public、Private以及const。