VB語言中如何打印菱形圖案

發布時間：2022-01-14 19:43:57 來源：億速云閱讀：302 作者：柒染欄目：大數據

這篇文章將為大家詳細講解有關VB語言中如何打印菱形圖案，文章內容質量較高，因此小編分享給大家做個參考，希望大家閱讀完這篇文章后對相關知識有一定的了解。

打印菱形圖案

VB語言中如何打印菱形圖案

課堂總結

主要還是總結分析思路

1、觀察圖案，總結規律

2、可以寫下來，把行號與結果寫來，然后再觀察

3、下半部分的思路剛好與上半部分相反,也要寫下來，總結觀察

界面：

VB語言中如何打印菱形圖案

源代碼：

Private Sub Form_Load()ShowFontSize = 25WindowState = 2Dim i As LongDim j As Long
Dim n As Long '表示行數,這個行數是除了最長的一行*之外的數量n = 6'上半部分For i = 0 To n Step 1
    '輸出空格    For j = 1 To n - i Step 1        Print " ";    Next j
    '輸出*    For j = 1 To 2 * i + 1 Step 1        Print "*";    Next j        Print '換行    Next i

'下半部分For i = 0 To n - 1 Step 1
  '輸出空格  For j = 0 To i Step 1    Print " ";  Next j      '輸出*  For j = 1 To 2 * (n - i) - 1 Step 1    Print "*";  Next j      Print
Next i


End Sub

關于VB語言中如何打印菱形圖案就分享到這里了，希望以上內容可以對大家有一定的幫助，可以學到更多知識。如果覺得文章不錯，可以把它分享出去讓更多的人看到。

向AI問一下細節

91超碰碰碰碰久久久久久综合_超碰av人澡人澡人澡人澡人掠_国产黄大片在线观看画质优化_txt小说免费全本

VB語言中如何打印菱形圖案

猜你喜歡

91超碰碰碰碰久久久久久综合_超碰av人澡人澡人澡人澡人掠_国产黄大片在线观看画质优化_txt小说免费全本

VB語言中如何打印菱形圖案

猜你喜歡

最新資訊

相關推薦

相關標簽