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座,大多建於埃及古王朝時期。在埃及已發現的金字塔中,最大最有名的是位於開羅西南面的吉薩高地上的祖孫三代金字...
埃及人為什麼要建金字塔?金字塔如何建成的?法老王的詛咒是真的
埃及金字塔介紹 埃及金字塔是法老 古埃及的國王 的陵墓。法老為什麼要建造金字塔?巨大的金字塔是怎樣建成的?相傳,古埃及第三王朝之前,無論王公大臣還是老百姓死後,都被葬入一種用泥磚建成的長方形的墳墓,古代埃及人叫它 馬斯塔巴 後來,有個聰明的年輕人叫伊姆荷太普,在給埃及法老左塞王設計墳墓時,發明了一種...