主题:请教数据转移问题
我在一文件夹中有一数据库(sjk.mdb),该库中有一数据表(sjb)
现在窗体中有如下代码:
Private Sub Form_Click()
Dim a As Long, b As Long, c As Long, d As Long
For a = 1 To 2
For b = 1 To 6
c = a * b + a - b
d = a * b - a + b
Print "c的值="; c, "d的值="; d
Next
Next
End Sub
运行代码后在该窗体中能显示"c的值="和 "d的值=",现想把"c的值="和 "d的值="自动转移到数据表(sjb)中,请问在上述窗体中要添加怎样的代码,具体如何添加,谢谢
现在窗体中有如下代码:
Private Sub Form_Click()
Dim a As Long, b As Long, c As Long, d As Long
For a = 1 To 2
For b = 1 To 6
c = a * b + a - b
d = a * b - a + b
Print "c的值="; c, "d的值="; d
Next
Next
End Sub
运行代码后在该窗体中能显示"c的值="和 "d的值=",现想把"c的值="和 "d的值="自动转移到数据表(sjb)中,请问在上述窗体中要添加怎样的代码,具体如何添加,谢谢