為何出現錯誤訊息型態不符合
煩請告知 在此先致謝
Private Sub Command36_Click()
Set M = CurrentDb.OpenRecordset("STOCKNUM")
Dim X As Integer
X = 0
M.MoveFirst
Do Until M.EOF
X = X + M 型態不符合
M.MoveNext
Loop
End Sub
煩請告知 在此先致謝
Private Sub Command36_Click()
Set M = CurrentDb.OpenRecordset("STOCKNUM")
Dim X As Integer
X = 0
M.MoveFirst
Do Until M.EOF
X = X + M 型態不符合
M.MoveNext
Loop
End Sub
全站熱搜
留言列表