導航:首頁 > 編程語言 > 編程列印平行四邊形

編程列印平行四邊形

發布時間:2024-07-04 21:56:21

A. VB里用星號輸出平行四邊形、正三角、倒三角的程序語句

一、Private Sub Form_Click()

show

Dim m, n, i, j As Integer

m = 4 :n = 7

For i = 1 To m

For j = 1 To m - i + 1

Print " ";

Next j

For j = 1 To n

Print "*";

Next j

Print

Next i

Print

For i = 1 To m

For j = 1 To m - i + 1

Print " ";

Next j

For j = 1 To 2 * i - 1

Print "*";

Next j

Print

Next i

Print

For i = 1 To m

For j = 1 To i

Print " ";

Next j

For j = 1 To 2 * m - 2 * i + 1

Print "*";

Next j

Print

Next i

End Sub

二、Sub Command1_Click()

Dim i As Integer

For i = 1 To 11 Step 2

For m = 11 To i Step -1

Debug.Print "*";

Next

Print Chr(10) & Space(1 + i 2);

Next

End Sub

(1)編程列印平行四邊形擴展閱讀:

在VB中,注釋有2種方式。

1、以Rem關鍵字開頭,並且Rem關鍵字與注釋內容之間要加一個空格。注釋可以是單獨的一行,也可以寫在其他語句行的後面。如果在其他語句行後使用Rem關鍵字,則必須使用冒號(:)與語句隔開。

2、使用一個撇號(')來代替Rem關鍵字。若使用撇號,則在其他語句行使用時不必加冒號。

特徵衡量

在 Visual Basic 中,可通過屬性、方法和事件來說明和衡量一個對象的特徵。

參考資料來源:網路-Visual Basic

閱讀全文

與編程列印平行四邊形相關的資料

熱點內容
程序員身上穿襯衣 瀏覽:298
遠程伺服器上如何版本管理 瀏覽:665
程序員備孕健康嗎 瀏覽:580
蘋果13刪除的app怎麼找回來 瀏覽:528
解壓歸檔一般要多久 瀏覽:118
富聊APP平台怎麼打不開了 瀏覽:992
程序員捉鬼 瀏覽:719
python調用瀏覽器 瀏覽:134
華為音響2e怎麼下載app 瀏覽:897
eclipse里自帶反編譯 瀏覽:11
千牛緩存文件夾位置修改 瀏覽:620
android判斷支付寶 瀏覽:226
vivo手機程序加密在哪 瀏覽:473
空調壓縮機三缸的好嗎 瀏覽:9
python強制終止線程 瀏覽:845
手機安卓系統怎麼轉換安卓系統 瀏覽:146
nbd網路塊設備交叉編譯 瀏覽:920
14歲科學與編程 瀏覽:786
python銀聯支付 瀏覽:573
騰訊雲伺服器怎麼把c盤分d盤 瀏覽:349