> 其他 >
用VB求1到100间所有偶数和
人气:480 ℃ 时间:2020-10-01 10:53:09
解答
启动VB新建一个EXE工程双击窗体FORM1在打开的代码窗口输入以下代码:Private Sub Form_Load()Dim i, s As Integers = 0For i = 2 To 100 Step 2s = s + iNext iForm1.Caption = Str(s)End Sub之后按下F5键即可在程序...
推荐
猜你喜欢
© 2026 79432.Com All Rights Reserved.
电脑版|手机版