菜鸟的一个问题：（

miracle8147 2007-10-22 08:27:45

下面是我企图实现的用VB对数据库进行数据添加的语句，可以添加成功但是不能马上在显示数据库数据的窗体中就显示出来。有没有人帮忙看一下啊...

newname = Text2.Text
newsex = Text3.Text
newage = Text4.Text
newyuanxi = Text5.Text
newzhuanye = Text6.Text

With rs
.AddNew
!Name = LCase(newname)
!sex = LCase(newname)
!age = LCase(newage)
!yuanxi = LCase(newyuanxi)
!zhuanye = LCase(newzhuanye)
.Update
End With

...全文

173 12 打赏收藏转发到动态举报

写回复

用AI写文章

12 条回复

切换为时间正序

请发表友善的回复…

发表回复

miracle8147 2007-10-23

打赏
举报

就觉起来还是没有答案哈...

miracle8147 2007-10-22

打赏
举报

不会做...555~

miracle8147 2007-10-22

打赏
举报

就是会觉得比较麻烦所以想直接显示出来的：）

miracle8147 2007-10-22

打赏
举报

谢谢楼上的，研究一下刷新好了~嘿嘿~~

lertulo 2007-10-22

打赏
举报

聽你的意思是說好像添加成功了，但是數據表並沒有顯示新加的記錄。。。？

那你再把數據表刷新一下或重新讀入即可。
因為表是靜態的，當然不會自動顯示數據庫記錄。

miracle8147 2007-10-22

打赏
举报

就请你们帮个忙~~

miracle8147 2007-10-22

打赏
举报

加上了以后提示“这种对象类型不支持该操作”，出错了...

of123 2007-10-22

打赏
举报

With rs
.AddNew
!Name = LCase(newname)
!sex = LCase(newname)
!age = LCase(newage)
!yuanxi = LCase(newyuanxi)
!zhuanye = LCase(newzhuanye)
.Update
.Requery
End With

miracle8147 2007-10-22

打赏
举报

没有人帮帮小女子么？

：~

有分散分！

miracle8147 2007-10-22

打赏
举报

没有人帮我...

miracle8147 2007-10-22

打赏
举报

用的VB6.0企业版做的小程序。
我用了三个窗体，然后在第三个窗体添加数据在第一个窗体中显示数据。

还是不能实时更新：~~
我不会写...55

lertulo 2007-10-22

打赏
举报

不知道你使用的什麼控件，我沒辦法幫你寫代碼，估計會太長，只簡單給你介紹下。

你的代碼沒問題



With rs 

.AddNew 

!Name = LCase(newname) 

!sex = LCase(newname) 

!age = LCase(newage) 

!yuanxi = LCase(newyuanxi) 

!zhuanye = LCase(newzhuanye) 

.Update 

End With

'然後在這裡重新讀取一下數據來代表所謂的刷新