！！！！！初学者的两个问题

Question

1、我想textbox中输入的数据以及输入到listbox的数据都能有记忆功能，也就是这次我输入数据后，下次打开这个界面后还能看到这些数据，请问怎么做呢！！？？2、我想在listbox中加入一行行的表格，能使每行的数据都分隔开，请问怎么做！！？谢谢

Answer 1

1，将输入的数据保存到外部环境中，窗体再次加载时从外部环境中读取并显示到控件中
2, listbox1.additem "aaa"
   listbox1.listindex = listbox1.newindex

Answer 2

第一个问题:
 
 如何再现: 楼主说到一个点子 :记忆
           人靠脑子,计算机靠 文件,数据库（比如ini文件，注册表）
           最简单的方法莫过于保存到一个文件里了
           保存:
              dim fn as freefile
              open "save.txt" for output as #fn
              print #fn,textbox1.text
              for i=0 to listbox.listcount-1
                    print #fn.listbox.list(i)
              next i
              close #fn
            载入:
               dim fn as freefile
               open "save.txt" for input as #fn
               dim buff as string 
               line input #fn,buff
               textbox1.text=buff
               while not eof(fn)
                  listbox1.additem buff
               wend
               close #fn
           调用的时机:
               保存的一般放到form_unload里面
               倒入的放到form_load里面
    第二个问题：
           listbox 是一维的，不能直接支持二维，但可以
           添加额外的操作来模拟他
           比如
           表格的一行保存成listbox的一个元素，每个项目之间以tab键分割
           然后，用到数据的时候，用一个split函数，把他们分开就行了

Answer 3

哦，对不起载入程序写漏了一行
               dim fn as freefile
               open "save.txt" for input as #fn
               dim buff as string 
               line input #fn,buff
               textbox1.text=buff
               while not eof(fn)
                  line input #fn.buff '''''''''''''
                  listbox1.additem buff
               wend
               close #fn

Answer 4

还有，
2。可用list属性加入一行然后Ctrl+Enter，然后加下一行。