Question

VB中的Adodc1.Refresh总是出问题，请问你当时是怎么解决的啊？

Private Sub Command3_Click()
Dim sqlxuehao As String
sqlxuehao = "select * from ceshi where 学号= '" & Trim(Text1.Text) & "'"
MsgBox sqlxuehao
Adodc1.RecordSource = sqlxuehao
Adodc1.Refresh----------总是这个地方出问题
DataGrid1.Refresh
End Sub

Answer 1

sqlxuehao = "select * from ceshi where 学号=" & Trim(Text1.Text) & " order by 学号"
不太懂你弄那么多引号干什么 注意order前有个空格

Answer 2

dc1.Refresh
就是Adodc1这个控件的refresh方法，refresh方式就是刷新的意思。
一般情况下，是对数据库的表进行操作之后，由于数据不同步，导致看到的还是未修改之前的，所以需要用到这句来刷新表格。
之后再进行操作就可以看到准确的了。
再者，你的这里MOVENEXT还需要判断数据库表格为空的情况！