當前位置:成語大全網 - 書法字典 - 在VBA如何制作雙層for循環的乘法表?

在VBA如何制作雙層for循環的乘法表?

私有子命令按鈕1_Click()

出錯時轉到錯誤

尺寸I,j,k1

Label10 = " "

對於j = 1到9 '開始打印。

對於i = 1到9

R = i * j '好結果

如果Len(r) = 1,那麽r = r & amp為顯示方便起見,請填寫空格。

如果Len(r) = 2,那麽r = r & amp為顯示方便起見,請填寫空格。

k 1 = I & amp;" x "和。強生公司。" = " & ampr & amp" " "好的方法公式顯示

如果i = j,那麽k 1 = k 1 & amp;Chr(13)'要好看。

Pr k1 '打印出壹行。

K1 = " " '清除

如果i = j,那麽Exit For '使程序能夠打印成梯形。

接下來我

下壹個j

出口接頭

錯誤:

MsgBox錯誤。描述

末端接頭

公共職能公關

標簽10 =標簽10s

結束功能