用VB创建了一个空Access表，不能添加记录
用ADO创建了一个空Access表，并添加了多个字段名。
但现在问题是，不能向空表中添加记录。
每次添加都会出现“BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录”
想完成的功能是，将EXCEL表中的数据读到recordset中，根据recordset创建Access表。
现在表创建了，字段也有了，但就是不能添加记录。
小弟初学者，请大侠指教！
向空表中添加记录 的代码贴出来看看，指出出错在哪一行
数据库用cnn已经打开
主要代码：
Dim cnnE As New ADODB.Connection
Dim rsE As New ADODB.Recordset
Dim sqlE As String
Dim i As Integer, j As Integer
'读取Excel表中的数据到rsE数据集
cnnE.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & Text1.Text & ";Extended Properties='Excel 8.0;HDR=Yes'"
rsE.Open "select * from [" & excel表 & "$]", cnnE, 3, 3
’根据rsE 创建表，并向表中添加字段
Call cnn.Execute("CREATE TABLE " & 创建的表)
For j = 0 To rsE.Fields.Count - 1
sqlE = "ALTER TABLE " & 创建的表 & " ADD _
[" & rsE.Fields(j).Name & "] " &a
相关问答：
为什么C写的DLL文件C、PB能调用VB不能调用？
VB里为什么有的DLL直接通过引用可以使用？有的需要通过declare申明外部函数？这些DLL有什么差别？
1、为什么PB能通过DECLARE声明而VB不行？
2、如果这个dll中的 ......
用vb做好的软件，想要加入自动隐藏的功能，在那添加啊，还有隐藏的代码那有啊 借用一下 谢了
方法1
Private Sub Form_Load()
Me.Height = 1 * Screen.TwipsPerPixelY
Me ......
怎么点击form2上的按钮 可以结束form1上正在进行的循环
form1里面添加一个变量：
Public bEnd As Boolean
循环代码添加：
bEnd = False
Do
...
If ......
VB中callbacke function 如下：
Public Function EnumChildProc(ByVal hwnd As Long, ByVal lParam As Long) As Long
Dim slength As Long, WndTitle As String ' title bar text length an ......
保存出的Excel数据文件，想在程序中就转化成数值类型
能够在打开Excel文件后，
能够直接利用数据画图，而不需要再次转化数据类型
程序中的数据是存放在二维数组里的，然后再保存在Excel中
请教大侠们，� ......
