一个程序，两个窗口，一个用来更改access表数据（Form1）,另一个窗口有个combo1用来显示数据(Form2)。form2有一个按钮(command1)用来打开form1。现在我先打开form2，combo1读取出数据，点击command1打开form1,更改数据（添加或修改或删除）并关闭form1后，让combo1重新读取表中数据，发现还是更新前的数据，这怎么回事啊？当我再次更改数据后，发现这时读取的数据是第一次更改后的数据。
form2中command1代码如下：
Private Sub Command1_Click()
form1.Show
combo1.Clear
'****************信息填充***************
print1.ConnectionString = GetDatabaseConnectionString()
print1.RecordSource = "select * from kind "
print1.Refresh
If print1.RecordSet.EOF = False Then
print1.RecordSet.MoveFirst
End If
Do While print1.RecordSet.EOF = False
combo1.AddItem print1.RecordSet.Fields(2).Value
print1.RecordSet.MoveNext
Loop
End Sub
照理说，我成功更改了表中的数据后，再次读取应该是更新后的数据，为什么不行呢？
print1.close
关闭一次重新打开可能就好了
print1.close有这个方法吗？？？？
我发现我犯了一个错误:
我以为form1.show出来以后，程序会停在那里，现在发现不是这样
应该有，自己找找啊
相关问答：
我有厂家做的ASP的监控录像（DVR）的局域网播放的源程序与控件，想要用ASP.net做一个视频回放的程序（利用他的控件）但不知如下去做，望各位指点。
先搞清楚他们的控件是怎么用的,
然后就直接用好了.
不过,如 ......
Printer.ScaleMode = 6
6表示毫米
Printer.PaperSize = vbPRPSA4
'初始坐标
x = 1
y = 4
'最大的线筐
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) ......
一道VB小程序
有两个列表框list1、 list2 。list1中初始化有15个不同的字母，而list2中是空白的 还有一个按钮command1,选中list1中的任意多个项目 然后点击按钮command1,则在list2中显示list1中被选中的项目。当� ......
Private Sub Command1_Click()
Dim m As Integer '接受文本框一的数值
Dim n As Integer '接受文本框二的数值
Dim k As Integ ......
由于窗體的增多；
明顯感覺程式運行慢了；
怎樣優化；
优化你的程序逻辑，比如将不用的窗体及时Unload，将不用的对象及时释放
引用
优化你的程序逻辑，比如将不用 ......
