主题：泡泡出品 小白入门视频教程 - 第一季 - 订单管理系统

我在按照你的视频教程第一课，按钮导入Excel工作表示时出现错误，我的代码是复制的：

Dim mg As New Merger
mg.SourcePath = "c:\发货.xls"
mg.Format = "excel" '指定格式
mg.SourceTableName = "发货记录" '指定要合并的表
mg.DataTableName = "发货记录表" '指定接收数据的表
mg.Merge()

就是导入不了，错误提示如下：

.NET Framework 版本：2.0.50727.3634
Foxtable 版本：2012.10.23.1
错误所在事件：
详细错误信息：
System.Data.OleDb.OleDbException: Microsoft Jet 数据库引擎找不到对象'发货记录'。请确定对象是否存在，并正确地写出它的名称和路径。
   在 System.Data.OleDb.OleDbCommand.ExecuteCommandTextErrorHandling(OleDbHResult hr)
   在 System.Data.OleDb.OleDbCommand.ExecuteCommandTextForSingleResult(tagDBPARAMS dbParams, Object& executeResult)
   在 System.Data.OleDb.OleDbCommand.ExecuteCommandText(Object& executeResult)
   在 System.Data.OleDb.OleDbCommand.ExecuteCommand(CommandBehavior behavior, Object& executeResult)
   在 System.Data.OleDb.OleDbCommand.ExecuteReaderInternal(CommandBehavior behavior, String method)
   在 System.Data.OleDb.OleDbCommand.ExecuteReader(CommandBehavior behavior)
   在 System.Data.OleDb.OleDbCommand.System.Data.IDbCommand.ExecuteReader(CommandBehavior behavior)
   在 System.Data.Common.DbDataAdapter.FillInternal(DataSet dataset, DataTable[] datatables, Int32 startRecord, Int32 maxRecords, String srcTable, IDbCommand command, CommandBehavior behavior)
   在 System.Data.Common.DbDataAdapter.Fill(DataTable[] dataTables, Int32 startRecord, Int32 maxRecords, IDbCommand command, CommandBehavior behavior)
   在 System.Data.Common.DbDataAdapter.Fill(DataTable dataTable)
   在 Foxtable.Merger.Merge()

-------------------------------------------------

Dim dlg As New OpenFileDialog
dlg.Filter= "Excel 97-2003文件(*.xls)|*.xls|Excel 2007文件(*.xlsx)|*.xlsx"
If dlg.ShowDialog = DialogResult.Ok Then
    Dim lj As String = dlg.FileName    
    Dim Book As New XLS.Book(lj)
    Dim Sheet As XLS.Sheet = Book.Sheets(0)
    Dim nms() As String = {"物料编号","物料名称","型号规格","单位","单价","供货厂家","备注信息"}  '这里要改成你对应字段名
    
    For n As Integer = 1 To Sheet.Rows.Count -1
        Dim r As Row = Tables("物料信息").AddNew()     '这里要改成你对应表名

        For m As Integer = 0 To nms.Length - 1
            r(nms(m)) = Sheet(n,m).Value
        Next
    Next
End If

--------------------------------------------------

用上面这段代码，把相应表、字段名改成你对应的，试试

时间列变成什么了？

你那个问题我水平有限，无法回答，抱歉

小白的帖子不是在试用版下做的，你用什么版做的呢，今天又学习，发现第一个窗口都建不完整，我这里没有AFTER LOAD事件选项。事件在我这里太简单。

找到了，原来是窗口的事件，不是控件的事件。

我是用试用版做的啊，是最新的试用版

“事件在我这里太简单” 这句话没明白啥意思