数学编程题

来源：百度知道 编辑：UC知道 时间：2024/05/14 04:52:30
m+n<10 求正整数对m,n 用QB或VB语言写出来
一楼的不完整,运行不了

Private Sub Form_Load()
Dim i%, j%
For i = 1 To 9
For j = 1 To 8
If i + j < 10 Then
Form1.Print i; j

End If

Next j
Next i
End Sub
要把form1的AutoRedraw属性设为TRUE
程序我已运行,无误!