1樓：網海1書生
紅字部分表示在列與列之間放幾個空格的，具體來說就是如果答案是1位數的（比如2*4=8）在後面加3個空格，答案是2位數的（比如5*7=35）則在後面插2個空格。
給你個更簡單的**：
private sub form_click()dim i as integer, j as integerfor i = 1 to 9
for j = 1 to i
print tab((j - 1) * 8); j & "*" & i & "=" & i * j;
next
next
end sub
2樓：匿名使用者
為了看上去規整，每一列左邊對齊，所以對空格進行處理。
改為 print space(5 - len(trim(str(i * j)))); 這樣寫，更易理解一些。
trim(str(i * j)) 計算 i * j 的得數，轉換為字元型，清除前後空格
例如 trim(str(3 *3)) = 「9」
例如 trim(str(3 *5)) = 「15」
len() 計算字串字數
例如 len(「9」) = 1
例如 len(「15」) = 2
space(n) 產生 n 個空格
例如 space(4) 產生 4 個空格
例如 space(3) 產生 3 個空格
好咧，由於得數有1位數，也有2位數
print space(5 - len(trim(str(i * j))));
當 得數是1位數時
print space(5 - 1); 追加4個空格
當 得數是2位數時
print space(5 - 2); 追加3個空格
這樣每列左邊就對齊了
你試試：
private sub form_click()
dim i as integer, j as integer
for i = 1 to 9
for j = 1 to 9
if i >= j then
print trim(str(j)) & "*" & trim(str(i)) & "=" & trim(str(i * j));
print space(3 - len(trim(str(i * j))));
end if
next
next
end sub
3樓：匿名使用者
紅字部分的意思是根據兩個數的積的長度而列印空格出來。
vb九九乘法表
點選 form1 窗體 private sub form click dim str,num for i 1 to 9 for n 1 to i str str n x i i n next n print str vbcrlf str next i end sub private sub form...
九九乘法表，九九乘法表是誰發明的？
main private sub form load msgbox 單擊窗體 提示 end sub private sub form click dim s as string,i as integer,j as integer print tab 35 九九乘法表 print for i 1 to...
EXCEL九九乘法表的公式是什麼
佳木春生 在excel 中，不使用複雜公式製作九九乘法表 方法多種多樣，如果生成 上的九九表，a2的公式為 if row 1 然後向下填充到a10，再選定a2 a10,向右拖動到i列。 第一種方法 用公式 b1至j1，a2至a10依次輸入1到9，然後在b2處輸入公式 a2 b 1，將公式先向右拖拉複...