VB編程：While...Wend語句實例漂亮的星星-17

運行效果： 程序代碼： Private Sub Command1_Click()     Dim a As Long, b As Long     Form1.Cls               '清空窗體     While a <= 9            '限制條件，0-9，一共輸出10行         a = a + 1           '調整輸出位置         For b

>>阅读原文<<