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

編程列印平行四邊形

發布時間: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

閱讀全文

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

熱點內容
一本通pdf 瀏覽:910
2021免費的編程軟體 瀏覽:123
項目編譯後瀏覽器不對應刷新 瀏覽:564
三星升級android60 瀏覽:292
粘土的壓縮模量 瀏覽:115
美國程序員生活 瀏覽:219
51單片機摘要 瀏覽:405
英語經典pdf下載 瀏覽:317
大學文件夾怎麼刪除 瀏覽:668
linux科研軟體 瀏覽:553
ue4打包編譯著色器 瀏覽:775
雲伺服器可以在手機上登錄嗎 瀏覽:676
網游腳本為什麼要連接伺服器 瀏覽:7
程序員發展路線圖 瀏覽:320
手機語音加密會議 瀏覽:592
冰與火pdf 瀏覽:421
為什麼叫我買阿里雲伺服器 瀏覽:475
加密貨幣征稅一覽表 瀏覽:964
llc編譯器 瀏覽:927
數控可編程電阻器 瀏覽:762