溫馨提示×
您好，登錄后才能下訂單哦！
點擊 登錄注冊 即表示同意《億速云用戶服務條款》
您好，登錄后才能下訂單哦！
這篇文章將為大家詳細講解有關VB語言中如何打印菱形圖案，文章內容質量較高，因此小編分享給大家做個參考，希望大家閱讀完這篇文章后對相關知識有一定的了解。
打印菱形圖案
課堂總結
主要還是總結分析思路
1、觀察圖案，總結規律
2、可以寫下來，把行號與結果寫來，然后再觀察
3、下半部分的思路剛好與上半部分相反,也要寫下來，總結觀察
界面：
源代碼：
Private Sub Form_Load()ShowFontSize = 25WindowState = 2Dim i As LongDim j As LongDim n As Long '表示行數,這個行數是除了最長的一行*之外的數量n = 6'上半部分For i = 0 To n Step 1'輸出空格For j = 1 To n - i Step 1Print " ";Next j'輸出*For j = 1 To 2 * i + 1 Step 1Print "*";Next jPrint '換行Next i'下半部分For i = 0 To n - 1 Step 1'輸出空格For j = 0 To i Step 1Print " ";Next j'輸出*For j = 1 To 2 * (n - i) - 1 Step 1Print "*";Next jNext iEnd Sub
關于VB語言中如何打印菱形圖案就分享到這里了，希望以上內容可以對大家有一定的幫助，可以學到更多知識。如果覺得文章不錯，可以把它分享出去讓更多的人看到。
免責聲明：本站發布的內容（圖片、視頻和文字）以原創、轉載和分享為主，文章觀點不代表本網站立場，如果涉及侵權請聯系站長郵箱：is@yisu.com進行舉報，并提供相關證據，一經查實，將立刻刪除涉嫌侵權內容。
