在VB中集成SQlite数据库（或任何其他build议）与Excel项目

我很新的VB。 我正在一个Excel-VB（2013）项目中，我想从另一个Excel文件中读取数据，然后将其中一些字段与现有数据进行比较。 所以问题是关于现有的数据库，它位于应用程序内部（没有服务器，没有在线连接）。 我想知道如何添加一个SQLite数据库文件（或任何其他）到我的项目，然后连接到该数据库并使用它。 我需要帮助一些例子。

谢谢，

Answer 1

您可以将其embedded到任何可执行文件中，但是必须将其解压缩才能使用它，通常在临时文件夹中。 我使用Reshacker来embedded资源。 这是一些旧的代码。 我会使用adodbstream对象，而不是VB文件操作符。

 Sub WriteFiles(DirectoryName, ResourceNo, FileName, FileNumber) frmSplash.Update FileNumber DoEvents Data = LoadResData(ResourceNo, "CUSTOM") fileNum = FreeFile() Open DirectoryName & "\" & FileName For Binary As #fileNum For x = 0 To UBound(Data) Put #fileNum, , CByte(Data(x)) frmSplash.Label8 = FormatNumber(x / UBound(Data) * 100, 0) & "%" DoEvents Next Close fileNum End Sub