怎么不对？，怎么不对

123

怎么不对？


把 if Not Adodc1.Recordset.EOF改成
while Not Adodc1.Recordset.EOF，具体代码：
Public Sub showdata()
    Dim i As Integer
    Adodc1.RecordSource = "select * from P2"
    Adodc1.Refresh
    While Not Adodc1.Recordset.EOF
        Adodc1.Recordset.MoveFirst
        MSF.TextMatrix(1, 0) = Adodc1.Recordset.Fields(0)
        MSF.TextMatrix(1, 1) = Adodc1.Recordset.Fields(1)
        MSF.TextMatrix(1, 2) = Adodc1.Recordset.Fields(2)
        MSF.TextMatrix(1, 3) = Adodc1.Recordset.Fields(3)
        MSF.TextMatrix(1, 4) = Adodc1.Recordset.Fields(4)
        MSF.TextMatrix(1, 5) = Adodc1.Recordset.Fields(5)
        Adodc1.Recordset.MoveNext
        For i = 2 To Adodc1.Recordset.RecordCount
        With Adodc1.Recordset
        MSF.AddItem .Fields(0) & vbTab & .Fields(1)
        .MoveNext
        End With
        Next i
    Wend
    Adodc1.Recordset.Close
End Sub

Public Sub showtitle()
With MSF
.Rows = 2
.Cols = 6
.TextMatrix(0, 0) = "姓名"
.TextMatrix(0, 1) = "性别&quot

怎么不对一个人太好


呵呵学会沉默，你天生是这种性格啊我也是对别人都很好，结果受伤的是我自己再有时候，学会沉默，是最好的办法


112怎么不对？


对的呀！23除以2=16，15除以2=7……1，16*7=112


下载360怎么不对
下载360怎么不对



可能是你错误的设置了文件关联。

按住shift键，同时单击关联错误的文件图标，在弹出的右键菜单中选择打开方式，重新设置正确的文件打开方式就行了。