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

編程列印平行四邊形

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

閱讀全文

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

熱點內容
計算器程序員是幹嘛的 瀏覽:362
數控編程里fo是啥鍵 瀏覽:655
javacdataxml 瀏覽:943
本機tcp伺服器地址 瀏覽:426
切換pdf 瀏覽:92
iturns下載的app在哪裡 瀏覽:641
雲起書院App在哪裡 瀏覽:615
怎麼對hex文件進行加密 瀏覽:285
pdf少年時 瀏覽:953
兩個同名文件夾同步 瀏覽:630
拍照文件夾哪個好用 瀏覽:91
文件夾和書包 瀏覽:511
解壓歸檔拿登記證 瀏覽:225
去體驗解壓房 瀏覽:613
單片機一鍵中斷響應 瀏覽:646
唐浩明pdf 瀏覽:845
程序員土木 瀏覽:73
android如何與web伺服器交互 瀏覽:611
蘋果小風扇app怎麼下 瀏覽:958
杭州it程序員對身體好不好 瀏覽:537