有一个较大容量的数据表需要存取，请问用什么方法比较好？谢谢！

Question

小弟有一个CRC的计算值表需要存储，有两个字段，一个是偏移量，一个是值。如果不用数据库，请问用什么方法来存储比较好，使用的时候比较方便？谢谢！

Answer 1

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long
Private Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long'写INI文件
Private Sub Command1_Click()
    Dim Counter As Long    For Counter = 1 To 4
        Call WriteToIni(App.Path & "\Options.ini", "Test", "Name" & Counter, "Value" & Counter)
    Next Counter
End Sub'读INI文件
Private Sub Command2_Click()
    Dim Counter As Long
    Dim Value(3) As String    For Counter = 1 To 4
        Value(Counter - 1) = ReadFromIni(App.Path & "\Options.ini", "Test", "Name" & Counter)
    Next Counter
End Sub