在vb.net vs2019中将旧mdb转换为accdb的MSAccess.SysCmd

在VB.NET VS2019中，将旧的MDB文件转换为ACCDB文件的方法是使用MSAccess.SysCmd函数。

MSAccess.SysCmd函数是Microsoft Access中的一个内置函数，用于执行各种系统命令。在VB.NET中，可以使用Interop.Access.Application对象来调用MSAccess.SysCmd函数。

下面是一个示例代码，演示如何在VB.NET VS2019中将旧的MDB文件转换为ACCDB文件：

Imports Microsoft.Office.Interop.Access

Public Class Form1
    Private Sub ConvertMDBtoACCDB(mdbFilePath As String, accdbFilePath As String)
        Dim accessApp As New Application()
        accessApp.SysCmd(603, mdbFilePath, accdbFilePath)
        accessApp.Quit()
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim mdbFilePath As String = "C:\path\to\old.mdb"
        Dim accdbFilePath As String = "C:\path\to\new.accdb"
        ConvertMDBtoACCDB(mdbFilePath, accdbFilePath)
    End Sub
End Class

在上面的示例代码中，ConvertMDBtoACCDB函数接受两个参数：旧的MDB文件路径和新的ACCDB文件路径。在函数内部，我们创建了一个Interop.Access.Application对象，然后调用其SysCmd方法来执行转换命令。SysCmd函数的第一个参数603表示将MDB文件转换为ACCDB文件。最后，我们调用accessApp.Quit()方法关闭Access应用程序。

请注意，为了使用Interop.Access命名空间，您需要在项目中添加对Microsoft.Office.Interop.Access程序集的引用。您可以通过右键单击项目，选择“添加”>“引用”，然后在“COM”选项卡中找到并选择“Microsoft Access 16.0 Object Library”。

这是一个基本的示例，您可以根据自己的需求进行修改和扩展。希望对您有帮助！