首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

datacombo控件怎么即时更新数据

2013-01-02 
datacombo控件如何即时更新数据?本帖最后由 bcrun 于 2012-11-29 16:05:39 编辑datacombo控件已经绑定好了

datacombo控件如何即时更新数据?
本帖最后由 bcrun 于 2012-11-29 16:05:39 编辑 datacombo控件已经绑定好了数据库,也能正常显示,现在通过一个文本框加入新数据到了数据库,但datacombo显示不了新加入的数据,如何做?
我的代码如下:

Private Sub Command1_Click()
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("sname") = Text1.Text
Adodc1.Recordset.Update
Adodc1.Refresh
DataCombo1.ReFill
DataCombo1.Refresh
End Sub

Private Sub Form_Load()
With DataCombo1
    Set .DataSource = Adodc1
    .DataField = "sname"
    Set .RowSource = Adodc1
    .ListField = "sname"
End With

End Sub


请指教呀!
[解决办法]
Private Sub Command1_Click() 
Adodc1.Recordset.AddNew 
Adodc1.Recordset.Fields("sname") = Text1.Text 
Adodc1.Recordset.Update 
Adodc1.Recordset.Requery
DataCombo1.ReFill 
DataCombo1.Refresh 
End Sub 

热点排行