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

>>阅读原文<<