1樓:夙颯
點選 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
2樓:匿名使用者
private sub form_click()me.fontsize = 12
me.print tab(35); "九九乘法表"
me.print tab(35); "__________"
for i = 1 to 9
for j = 1 to i
me.print tab((j - 1) * 9 + 1); i & "×" & j & "=" & i * j;
next j
next i
end sub
3樓:匿名使用者
private sub command1_click()print " *";
for i = 1 to 9
print tab(i * 5); i;
next
for i = 1 to 9
print i;
for j = 1 to i
print tab(j * 5); i * j;
next
next
end sub
九九乘法表,九九乘法表是誰發明的?
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,將公式先向右拖拉複...
求教VB九九乘法表,已給出效果和編碼,紅字部分看不懂。翻譯一下,最好給一下相關的公式
紅字部分表示在列與列之間放幾個空格的,具體來說就是如果答案是1位數的 比如2 4 8 在後面加3個空格,答案是2位數的 比如5 7 35 則在後面插2個空格。給你個更簡單的 private sub form click dim i as integer,j as integerfor i 1 to ...