這5個數是：105，210，315，420，525.程序如下，我想不用解釋這個程序吧？妳應該會看懂。
Private?Sub?Command1_Click()
n?=?0:?i?=?1
Do?While?(n?<?5)
If?(i?Mod?3)?=?0?And?(i?Mod?5)?=?0?And?(i?Mod?7)?=?0?Then
n?=?n?+?1
Print?i
End?If
i?=?i?+?1
Loop
End?Sub