編程列印平行四邊形_VB里用星號輸出平行四邊形、正三角、倒三角的程序語句

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

Next i

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

Next i

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

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 "*";

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

End Sub

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

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

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

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

特徵衡量

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

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

熱點內容

電腦qq郵箱解壓的圖片保存在哪裡發布：2025-05-02 00:23:33 瀏覽：544

嵌入命令行發布：2025-05-02 00:09:29 瀏覽：91

檔案為什麼被加密發布：2025-05-01 23:52:18 瀏覽：485

十天學會單片機13 發布：2025-05-01 23:50:30 瀏覽：875

榮耀怎麼設置讓app一直運行發布：2025-05-01 23:48:14 瀏覽：992

共享文件夾能在哪裡找到發布：2025-05-01 23:37:36 瀏覽：433

旅遊訂旅店用什麼app 發布：2025-05-01 23:34:29 瀏覽：239

一個女程序員的聲音發布：2025-05-01 23:26:54 瀏覽：494

魔術app怎麼用發布：2025-05-01 23:20:00 瀏覽：340

單片機有4個8位的io口發布：2025-05-01 23:11:19 瀏覽：897

win10rar解壓縮軟體發布：2025-05-01 23:10:26 瀏覽：167

plc教程pdf 發布：2025-05-01 23:06:34 瀏覽：668

pythonshell清屏命令發布：2025-05-01 22:54:59 瀏覽：279

檢測到加密狗注冊伺服器失敗發布：2025-05-01 22:53:06 瀏覽：205

解壓後手機如何安裝發布：2025-05-01 22:47:58 瀏覽：519

極客學院app為什麼下架發布：2025-05-01 22:36:59 瀏覽：14

圖片批量壓縮綠色版發布：2025-05-01 22:31:13 瀏覽：654

東北程序員帥哥發布：2025-05-01 22:13:36 瀏覽：707

加密封條風噪小發布：2025-05-01 22:10:03 瀏覽：975

安陽少兒編程市場發布：2025-05-01 21:45:19 瀏覽：499

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

編程列印平行四邊形

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