输入三个数,计算并输出它们的平均值以及三个数的乘积,写出程序

[复制链接]
查看11 | 回复1 | 2013-4-1 16:14:16 | 显示全部楼层 |阅读模式
我用VBPrivate Sub command1_click()
a = InputBox("请输入A的值")
a = Val(a)
b = InputBox("请输入B的值")
b = Val(b)
c = InputBox("请输入C的值")
c = Val(c)
Print "平均值" & (a + b + c) / 3, "乘积" & a * b * cEnd Sub...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行