Office中国论坛/Access中国论坛

标题: 在VBA建表建不明白了，发了好几天了，求高手教？ [打印本页]

作者: 我爱学电脑 时间: 2008-1-16 11:12
标题: 在VBA建表建不明白了，发了好几天了，求高手教？
Option Compare Database
Private Sub from_beforinsert(cancel As Integer)
Me.建立日期 = Date
End Sub
Private Sub form_afterinsert()
Dim strSql As String
strSql = "create table 分类账" & 账户编号 & "(账户编号 varchar(50),日期 date,日记账编号 varchar(50),借 money,贷 money,余额 money,摘要 memo)"
CurrentProject.Connection.Execute strSql
End Sub

我是新手照着书上打的但是书上不对，有网有帮了一下我改了，但还是不对劲，运行时没什么出错提示，但建不出那个叫“分类账”的表，求高手帮助。下面附件就是，有空高手帮帮忙，学电脑真不容易呀。

作者: haemon 时间: 2008-1-16 12:07
反正我这是可以的,照你那个运行,可以建出表"分类账00001"
[attach]27950[/attach]

作者: Victor_Duane 时间: 2008-1-16 12:15
这可能是版本不支持吧,不知楼主的ACCESS是什么版本

作者: Victor_Duane 时间: 2008-1-16 12:21
把这一句
CurrentProject.Connection.Execute strSql
改为
currentdb.execute strsql
试试

作者: 我爱学电脑 时间: 2008-1-16 19:30
成了真的成了，原来是得在那个窗体里输入数据才能产生“分类帐”表呀，真是的，我这新手让大家费心了，谢谢大家，万分感谢。这里真是个好地方，真是一人有事大家帮。

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)