台灣樂天全站4.8折起

平時我自己上網搜尋資料就還蠻喜歡看 KINYOUSB-22 USB 2.0傳輸線【愛買】

的

因為可以一網打盡真的是太方便!!!!!

就算沒買過肯定逛過聽過看過 KINYOUSB-22 USB 2.0傳輸線【愛買】

吧!!!

KINYOUSB-22 USB 2.0傳輸線【愛買】

功能:

KINYOUSB-22 USB 2.0傳輸線【愛買】

描述:

◆ 接頭規格: USB 2.0 A公/A母
◆ 線長: 1.2m

◎ 規格：USB-22
◎ 本產品網頁因拍攝關係，圖檔略有差異，實際以廠商出貨為主
◎ 本產品文案若有變動敬請參照實際商品為準

• HITACHI 日立 集塵紙袋 CVPS3 五枚入 日立吸塵器專用集塵紙袋
• Warrior 4尺 直立單門冷凍櫃 TF-18A
• 14吋 簡約商務 手提避震袋 電腦包 (DH188) 【預購】
• SAPIDO BR270n 300M 超高功率極速型無線分享器 大坪數專用、7dBi大天線
• ASUS ZenPad 3S 10(Z500M) 挑戰最窄邊框平板電腦~送螢幕保護貼
• [103 美國直購 USAShop] LaCie Rugged 硬盤驅動器 1 TB USB 3.0 Mini Disk Portable Hard Drive 301558_mr $5113

標題:

用VB寫出數學算式

發問:

用 for loop 求2 到 200 間偶數的總和用 for loop 求5 到 509 間奇數的總和用 for loop 求1 到 1000 間7的倍數的總和這些要怎麼寫啊@@?依稀記得Module Module1 Dim x, y, z As Integer Sub Main() x = Console.ReadLine() y = Console.ReadLine() 中間有出現step什麼的 要算7 就要step 7 End... 顯示更多 用 for loop 求2 到 200 間偶數的總和 用 for loop 求5 到 509 間奇數的總和 用 for loop 求1 到 1000 間7的倍數的總和 這些要怎麼寫啊@@? 依稀記得 Module Module1 Dim x, y, z As Integer Sub Main() x = Console.ReadLine() y = Console.ReadLine() 中間有出現step什麼的 要算7 就要step 7 End Sub 誰知道怎寫@@ 寫出來寄到我信箱的20點@@ End Module

最佳解答:

Sub abc() Dim x, y, z, counter As Integer x = 0 y = 0 z = 0 For counter = 2 To 200 Step 2 x = x + counter Next For counter = 5 To 509 Step 2 y = y + counter Next For counter = 7 To 1000 Step 7 z = z + counter Next End Sub

其他解答:

KINYOUSB-22 USB 2.0傳輸線【愛買】

ED6200C9F4A6F246