VB 10以内加法程序

发布网友发布时间：2024-10-11 04:36

共3个回答

热心网友时间：2024-11-21 14:37

dim i as integer
dim sum as integer
for i=1 to 10
sum = sum + i
next

print sum

参考网址：http://zhidao.baidu.com/question/249865258.html

热心网友时间：2024-11-21 14:40

Private sub Form_Load()
dim i,s as integer
for i=1 to 10
s=s+i
next i
print s
end sub

热心网友时间：2024-11-21 14:38

Dim a As Integer
Dim b As Integer
Do
a = InputBox("第一个数：")
If a > 0 And a < 10 Then Exit Do
Loop
Do
b = InputBox("第二个数：")
If b > 0 And b < 10 Then Exit Do
Loop
Print a & "+" & b & "=" & a + b

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com