妳可以將list1的內容存儲在壹個TXT中，打開後就可以讀取了。私有子命令1 _ Click()Dim I As Integer list 1。AddItem Text1。文字打開App。Path + "\ aaa.txt "輸出為#1，i = 0到List1。ListCount - 1 Print #1，List 1。List(I)next close # 1 end sub private subform _ load()List 1。清除列表框dim a as string openapp。路徑&；" \aaa.txt "為輸入As #1 Do While Not EOF(1)輸入# 1，壹個List1。添加壹個循環封閉端接頭
請收下，謝謝！
上一篇:何炅酒業有限公司有多少種酒？下一篇:壹款適合壹個人長時間玩的單機手遊。