VB有没有办法把文件读入内存？

你的意思是使用内存映象文件,来加快文件的读写时间吧.那要用到内存映象文件方面的api.比较麻烦
其实如果你读写的文本文件不是太大你可以先将文本文件以行为单位存如数组.我编写了一段代码:
1.在module1.bas中
Public hpl() As String
Public hpl_count As Integer
Public Sub read_to_array(ByVal filename As String)
ReDim hpl(1 To 1)
hpl_count = 1
fn = FreeFile
Open filename For Input As #fn
Do While Not EOF(fn)
Line Input #fn, lk
hpl(hpl_count) = lk
hpl_count = hpl_count + 1
ReDim Preserve hpl(1 To hpl_count)
Loop
hpl_count = hpl_count - 1
ReDim Preserve hpl(1 To hpl_count)
Close #fn
End Sub
2.使用代码
在窗体中加入一个command1和一个List1
Private Sub Command1_Click()
read_to_array App.Path & "\lk.txt"
List1.Visible = False
For i = 1 To hpl_count
DoEvents
List1.AddItem hpl(i)
Next
List1.Visible = True
End Sub

有啊
open Path for binary as #?
Get #?,,数组变量
close #?

哥哥哎。。。。啥程序不是先调入内存再运行的？
如果不走内存。你咋运行

看msdn呀。