作者wwokeb (旅行...)
看板Visual_Basic
标题[VB6 ] 关於程式码 一下可以一下不行..
时间Tue Jul 18 14:18:41 2006
Private Sub nextcommend_Click()
customdb.Recordset.AddNew <==按新增下一笔 错这行
customdb.Enabled = False
newcommend.Enabled = True
nextcommend.Enabled = True
End Sub
Private Sub newcommend_Click()
If Trim(Text1.Text) = "" Then
MsgBox "联络电话栏位内不得空白"
Exit Sub
End If
If Trim(Text2.Text) = "" Then
MsgBox "客户名称栏位内不得空白"
Exit Sub
End If
If Trim(Text3.Text) = "" Then
MsgBox "住址栏位内不得空白"
Exit Sub
End If
customdb.Recordset.MoveLast <===按确定储存错这行
customdb.Enabled = True
newcommend.Enabled = True
nextcommend.Enabled = True
End Sub
这个是我写的程式 我是要新增资料到资料库里
昨天我写完测试的时候可以 可是今天又不行…
为什麽会这样 我一直找不出来是什麽原因
版上有人可以指点指点我吗^^"
谢谢吼....
--
是不是学会了什麽事都往心里放
眼泪掉下的频率就会日渐增加??
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 220.141.1.83
1F：推 fumizuki:连个讯息都没有说明...要我们用猜的@_@ 07/18 19:38
2F：推 wwokeb:版大…虾米讯息呀?? 我很笨...>///< 07/18 21:34
3F：推 slasher:错误讯息吧 07/19 10:31