1樓：vb妮可
我只做了list1和list2的,你需要可以新增更多陣列以及**來實現list3的..
dim l1, l2, l3
private sub form_load()dim s$, i%
s = "顏色 星期 運動"
l1 = split(s)
for i = 0 to ubound(l1)list1.additem l1(i)
next
s = "紅色 綠色 黑色 藍色 黃色"
l1 = split(s)
s = "周一 周二 週三 周四 周五 週六 週日"
l2 = split(s)
s = "羽毛球 網球 桌球 足球 排球"
l3 = split(s)
end sub
private sub list1_click()dim i%
if list1.listindex = 0 thenlist2.clear
for i = 0 to ubound(l1)list2.additem l1(i)
next
elseif list1.listindex = 1 thenlist2.clear
for i = 0 to ubound(l2)list2.additem l2(i)
next
elseif list1.listindex = 2 thenlist2.clear
for i = 0 to ubound(l3)list2.additem l3(i)
next
end if
end sub
2樓：go陌小潔
兩種方法，第一種如樓上所言：
list1.additem "新增的專案1"
list1.additem "新增2"
第二：在list的屬性框中新增，按ctrl+enter 換行刪除某一行:
private sub command1_click()list1.removeitem 1 '刪除第二行end sub
從滑鼠單擊選中的那一行獲取行中資料:
private sub list1_click()msgbox list1.text 'list1.text就是選中那行的資料
end sub
3樓：匿名使用者
if list1.listindex <> -1 then 注釋：（當list1的內容沒被選中事，不做此事件"也就不會報錯"）
list2.additem list1.text 注釋：（list2的內容 是 list1選中的內容）
list1.removeitem list1.listindex 注釋：（將list1中選中的內容刪除）
end if
4樓：捲毛
1.對控制項及其屬性的基本應用，比如移動位置，放大縮小，隱藏顯示
2.文字修改，文字的大小，字型大小，字型，字形效果
3.基本控制語句的使用
4.基礎演算法，初中水平的數學題（加減乘除）
1.常用控制項
form，command，timer，text，label，list，combo1，scroll，option，check，frame，shape，line，image，picture
2.常用控制項的屬性
常用通用屬性：
tabindex：設定tab鍵序
name（名稱）：設定當前控制項的名稱
caption：當前控制項的標題
backcolor：背景顏色
按鈕的背景顏色需要將style屬性設定為1
forecolor：前景顏色（常用於字型顏色）
enabled：事件是否可用
font：字型對話方塊
fillcolor：填充色
height：設定當前控制項的高度
width：設定當前控制項的寬度
left：左邊距
top：頂邊距
visible：控制項是否可見
index：下標（索引）
各類控制項的常用屬性：
form窗體
autoredraw：自動重繪
border-style：邊框樣式
icon：設定當前窗體的圖示
maxbutton：最大化按鈕
minbutton：最小化按鈕
picture：設定窗體的背景tup
starupposition：設定窗體在螢幕中的位置
command按鈕
cancle：設定是否響應esc鍵
default：設定按鈕是否為預設按鈕
預設按鈕：
即當焦點不在按鈕類控制項上時，預設按鈕會響應enter（回車鍵）
預設：即系統預設狀態
style：設定是否顯示圖形
當其值設定為1時，按鈕可以設定背景顏色和背景**（pciture屬性）
label標籤：
autosize：自動大小
backstyle：設定背景樣式是否透明
textbox文字框：
alignment：文字對齊方式
passwordchar：設定密碼字元
text：文字屬性
multiline：是否可以多行顯示文字
maxlength：設定內容最大長度
scrollbars：設定文字框滾動條（multiline為true）
locked：設定文字是否可以編輯
frame框架：
無特殊屬性，使用框架時注意複製的控制項是在框架內還是在窗體內，類似於巢狀窗體，相當於form內的乙個新的窗體，其主要作用就是當容器
checkbutton多選按鈕：
value：返回設定當前多選框的狀態，0，選中，1，未選中，2，不可選
optionbutton單選按鈕：
value：返回布林值，true時選中，false時未選中
有關按鈕的屬性多數參照command的屬性
combobox：組合框
list：返回設定組合框的項，項的索引從0開始，可通過list（索引）的方式訪問項
style：返回設定組合框的類別，其值為0，1，2
1.下拉式組合框（系統預設，框內可以輸入值）
2.簡單式組合框
height屬性可以修改，其他兩種預設為300緹（1twip=15px）
3.下拉列表式組合框（框內不可以輸入值）
listbox：列表框
multiselect：設定列表框是否可以多選
selected（x）（隱藏屬性）:判斷索引為x的項是否被選中，返回布林值
scrollbars滾動條：
分垂直和水平兩種，在這裡列舉通用的屬性
max：上限
min：下限
value：當前滑塊所在位置的value值
largechange：單擊滑塊空白區域增加的value值
smallchange：單擊滑塊兩邊箭頭增加的value值
timer時鐘：
interval：設定時鐘每多少毫秒執行一次timer事件
image影象框：
stretch：設定影象是否自動調整大小
picture**框：
autosize：設定影象是否自動調整大小
picture：**對話方塊
vb的list1控制項所有的使用方法
vb list怎麼用
5樓：
list主要是用來在列表內讓使用者選擇的乙個控制項。
所以執行期間不接受使用者輸入。
要想新增，只能是在設計時預留新增的按鈕（或其他什麼），**別人都說了。
如果想又能選擇，有能輸入，那麼就不要用list，而應選用combo
6樓：匿名使用者
兩種方法，第一種如樓上所言：
list1.additem "新增的專案1"
list1.additem "新增2"
第二：在list的屬性框中新增，按ctrl+enter 換行
7樓：匿名使用者
list1.additem "新增的專案1"
list1.additem "新增2"
vb 中list1有什麼用？
8樓：匿名使用者
listbox 控制項
listbox 控制項顯示專案列表，從其中可以選擇一項或多項。如果專案總數超過了可顯示的專案數，就自動在 listbox 控制項上新增滾動條。
如果未選定專案，則 listindex 屬性值是 -1。列表的第一項是 listindex 0，listcount 屬性值總是比最大的 listindex 值大 1。
語法listbox
說明使用 additem 或者 removeitem 方法可以新增或者刪除 listbox 控制項中的專案。對 list、listcount 和 listindex 屬性進行設定就可以訪問 listbox 中的專案。也可以在設計時使用 list 屬性在列表中增加專案。
9樓：匿名使用者
列表框，當然是列出表項的內容。
vb，combo和list的使用，急！
10樓：匿名使用者
僅供參考:
private sub form_load()list1.additem "張三"
list1.additem "李四"
end sub
private sub list1_click()select case list1.textcase "張三"
combo1.additem "張父"
combo1.additem "張妻"
combo1.additem "張一"
combo1.additem "張二"
case "李四"
combo1.additem "李四父"
combo1.additem "李四母"
combo1.additem "李四一"
combo1.additem "李四二"
end select
end sub
11樓：匿名使用者
增加成員前請
combo1.clear 一下
vb中的list控制項是什麼？
12樓：匿名使用者
vb的listbox控制項是用來顯示專案列表的控制項。
listbox 控制項，listbox 控制項顯示專案列表，從其中可以選擇一項或多項。如果專案總數超過了可顯示的專案數，就自動在 listbox
控制項上新增滾動條。
使用 additem 或者 removeitem 方法可以新增或者刪除
listbox 控制項中的專案。對 list、listcount 和 listindex 屬性進行設定就可以訪問
listbox 中的專案。也可以在設計時使用 list 屬性在列表中增加專案。
示例**：
private sub form_click ()
dim entry, i, msg ' 宣告變數。
msg = "choose ok to add 100 items to your list box."
msgbox msg ' 顯示資訊。
for i = 1 to 100 ' 計數值從 1 到 100。
entry = "entry " & i ' 建立輸入項。
list1.additem entry ' 新增該輸入項。
next i
msg = "choose ok to remove every other entry."
msgbox msg ' 顯示資訊。
for i = 1 to 50 ' 確定如何
list1.removeitem i ' 每隔一項
next i ' 刪除。
msg = "choose ok to remove all items from the list box."
msgbox msg ' 顯示資訊。
list1.clear ' 清除列表框。
end sub
VB中list怎麼清空
columns 屬性 返回或設定乙個值，以決定 listbox 控制項是水平還是垂直滾動 以及如何顯示列中的專案。如果水平滾動，則 columns 屬性決定顯示多少列。語法object.columns number columns 屬性語法包含下面部分 部分 描述 object 物件表示式，其值是 ...
關於VB中的goto的用法
書時芳支培 在你要goto 的地方加標號，可以是數字或者字母，以冒號結尾做區別如recycle a b c goto recycle 當執行到goto即會跳轉到對應地方 a private sub command1 click b dim n as integer,s as stringc n 1 ...
vb中varptr函式的用法及語法
varptr 該函式能與要求包含有unicode字串的結構的api呼叫一起使用。如果將乙個myudtvariable變數 乙個自定義型別的變數 傳遞給乙個由byref udtparam as myudt定義的引數，就會發生ansi unicode之間的轉換。但是，如果將varptr myudtvar...