只读的话，就不能修改结果了。我现在要的是能修改统计的结果集，但不更新数据库。 不想更新数据库，结果集是用来显示的吧，在显示时选择下。 显示的时候处理，把10和11相加，11跳过不显示 使用ADO的断开记录集，设置Set RS.ActiveConnection = Nothing，这时无论是AddNew、Delete，均不会对原始记录集产生影响。 附上源码： If Not rsCopy7 Is Nothing Then Set rsCopy7 = Nothing
Set rsCopy7 = Module2.rs.Clone While Not rsCopy7.EOF If (rsCopy7.AbsolutePosition = 10) Then While Not Module2.rs.EOF If (Module2.rs.AbsolutePosition = 11) Then For Z = 2 To 13
帮我改改 我总觉得有问题 Type ID number As Single score As Integer name As String * 6 End Type Dim personl As ID, i% Private Sub Command1_Click() i = 0 &nbs ......
Private Sub btnPrint_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnPrint.Click MouseWait() Dim ClearTempTabelSQL As String 'If Not ......
我想把word另存为xml之后，用vb读取这个xml的内容，请问如何实现？ dim f as integer dim b() as byte dim s as string dim L as long f=freefile() open "abc.xml" for binary access read as #f ......
