VB6.0 打印九九乘法表.rar

VB 6.0 打印九九乘法表，主要是使用For循环来生成九九乘法表，实际上是一个数学的范畴，有兴趣的可了解下源码： 　　Private Sub Command1_Click() 　　Dim i, j As Integer ' 定义两个整形变量 　　Picture1.Print " 九九乘法表" 　　For i = 1 To 9 '变量i做行号 　　 For j = 1 To i '变量j 做列号 　　 Picture1.Print j; "*"; i; "="; j * i; '在图片框上输出相应行号列号和表达式的值 　　 Next j 　　 Picture1.Print '换行 　　 Next i 　　End Sub 　　Private Sub Form_Resize() 　　Picture1.Width = Form1.Width - 100 '图片框与窗体的相对位置不变 　　Picture1.Height = Form1.Height - 1000 　　Command1.Left = Form1.Width - Command1.Width - 200 '命令按钮与窗体的相位位置不变 　　Command1.Top = Form1.Height - Command1.Height - 500 　　End Sub