UBound屬性,返回控件數組中控件的最高排序值。
LBound和UBound屬性的示例:
此示例打印控件數組的上述兩個屬性的值。將OptionButton控件放在窗體上,並將其Index屬性設置為。
0(用於創建控件數組)。要嘗試此示例,您可以將代碼粘貼到窗體的聲明部分,然後按F5並單擊窗體。
選項?明確的
暗淡?我?作為?長的
私人?Sub?Form_Paint()
靜電?FlagFormPainted?作為?整數
如果?FlagFormPainted?& lt& gt?真的嗎?然後呢?第壹次繪制窗體時。
為了什麽?我?=?1?去哪?三
加載?選項1(i)?向數組中添加三個選項按鈕。
選項1(i)。Top?=?選項1(i?-?1).Top?+?350
選項1(i)。可見?=?真實的
下壹個?我
為了什麽?我?=?0?去哪?3 '將標題放在選項按鈕上。
選項1(i)。標題?=?“選項?#"?& amp?科學技術委員會(壹)
下壹個?我
Option1(0)。價值?=?真的嗎?選擇第壹個選項按鈕。
FlagFormPainted?=?真的嗎?表單已完成繪制。
結束?如果
結束?潛水艇
私人?Sub?表單_單擊()
打印?“控制?array的?數數?財產?是嗎?”?& amp?選項1()。數數
打印?“控制?array的?LBound?財產?是嗎?”?& amp?選項1()。綁定
打印?“控制?array的?UBound?財產?是嗎?”?& amp?選項1()。UBound
結束?潛水艇