如何用Vb For來編寫金字塔,如何用Vb For來編寫金字塔

2022-09-07 20:43:04 字數 1068 閱讀 1550

1樓:聽不清啊

這個通過除錯執行:

dim n as integer

private sub command1_click()n = val(text1.text)

for i = 1 to n

for j = n to i step -1picture1.print " ";         '這裡是一個空格

next j

for j = 1 to (2 * i - 1)picture1.print "" & i;

next j

picture1.print

next i

end sub

2樓:易尋桃

這個正確,通過除錯的,有圖

private sub command1_click()dim n, i as integer

picture1.cls '清空資料

n = val(text1.text)  '用於控制層數for i = 1 to n

picture1.print tab(n - i + 1); string(2 * i - 1, cstr(i))

next

end sub

3樓:可軒

我的解答,是按題目的填空要求。執行無誤:

dim n as integer

private sub command1_click()n = val(text1.text)

for i = 1 to n

for j = n to i step -1picture1.print space(1);

next j

for j = 1 to (2 * i - 1)picture1.print "" & i;

next j

picture1.print

next i

end sub

4樓:匿名使用者

step 1

print " "

to n

"" & j

picture1.print

如何用EXCEL繪製人口年齡金字塔圖

需要錄入3列信復息 年齡 年齡分制組 男性人口 用負數表示 女性人口。步驟 插入圖表 條形圖 資料區域產生於列 選擇男 女性人口 設定圖例 標題等格式 確定 資料系列格式 設定選項 重疊比例100,分類間距0 確定 用word不好嗎?然後插入到excel中去 excel是資料統計的 excel的人口...

金字塔是如何建成的,金字塔是怎樣建成的

埃及的金字塔 pyramids 建於4500年前,是古埃及法老 即國王 和王后的陵墓。陵墓是用巨大石塊修砌成的方錐形建築,因形似漢字 金 字,故譯作 金字塔 埃及迄今已發現大大小小的金字塔110座,大多建於埃及古王朝時期。在埃及已發現的金字塔中,最大最有名的是位於開羅西南面的吉薩高地上的祖孫三代金字...

埃及人為什麼要建金字塔?金字塔如何建成的?法老王的詛咒是真的

埃及金字塔介紹 埃及金字塔是法老 古埃及的國王 的陵墓。法老為什麼要建造金字塔?巨大的金字塔是怎樣建成的?相傳,古埃及第三王朝之前,無論王公大臣還是老百姓死後,都被葬入一種用泥磚建成的長方形的墳墓,古代埃及人叫它 馬斯塔巴 後來,有個聰明的年輕人叫伊姆荷太普,在給埃及法老左塞王設計墳墓時,發明了一種...