English Deutsch Français Italiano Español Português 繁體中文 Bahasa Indonesia Tiếng Việt ภาษาไทย
所有分類

有請VB高手能幫我寫一個程式嗎!!
題目是1到200中非2.3.5的倍數加起來的總合!!
感謝高手!!

2006-03-28 18:52:26 · 1 個解答 · 發問者 小光 3 in 電腦與網際網路 軟體

1 個解答

Private Sub Command1_Click()Dim I%, T%For I = 1 To 200    If I Mod 2 > 0 And I Mod 3 > 0 And I Mod 5 > 0 Then       T = T + I    End IfNextPrint TEnd Sub'答案為5468

2006-03-29 06:49:19 · answer #1 · answered by W.J.S. 7 · 0 0

fedest.com, questions and answers