1、創(chuàng)建一個新窗體，并添加picturebox和command控件。

(資料圖片)

2、雙擊命令按鈕進(jìn)入代碼塊。

3、編寫代碼

4、源代碼

5、Private Sub Command1_Click()

6、 Dim se As String

7、Picture 1. Printing a label (35); 9*9 Multiplication Table"" Header

8、對于i=1至9 "外循環(huán)1至9

9、對于j=1到I "的內(nèi)部小循環(huán)

10、Se=j "*" i "=" j * i "計算每行的內(nèi)容。

11、圖片1。打印選項卡((j-1)* 9)；se；打印出每行的內(nèi)容。

12、 Next j

13、 Picture1.Print

14、 Next i

15、End Sub

16、按F5運行結(jié)果

本文到此結(jié)束，希望對大家有所幫助。

關(guān)鍵詞：