急...数组赋值问题..

用text的值保存到arr()数组中来完成更新..但是重新运行时候刚赋的值就没有了..怎么才能更新后...重新运行还能看到刚给那个数组赋的值呢

解决方案 »

  1.   

    发现自己厉害了...有想法..到底也是学过些的...sleep
      

  2.   

       就是调用和保存嘛 ~    
    Private Sub Command1_Click()
    Open "C:\Documents and Settings\Greecer.LHSZ\桌面\记录.txt" For Output As #1   'Open 打开
    Print #1, "1234"    'print   写文件内容， 内容在逗号后面
    Close #1   '关闭文件号End SubPrivate Sub Command2_Click()Open "C:\Documents and Settings\Greecer.LHSZ\桌面\记录.txt" For Input As #1
    Input #1, a      'input  读取文件内容,将读取的内容放入a
    Close #1
    Label1 = aEnd Sub
    'output 写文件  append  追加文件尾  input 读取文件这是最简单的写入和读取记录·~