![](https://iknow-base.cdn.bcebos.com/lxb/notice.png)
VB中msgbox函数使用中出现的问题
自己在做一段代码是运行结果始终不对,不知什么原因,谁可以给分析下问题出现在哪里?题目是用inputbox函数输入一名学生三门功课成绩,用msgbox函数公示三门功课的平均...
自己在做一段代码是运行结果始终不对,不知什么原因,谁可以给分析下问题出现在哪里?
题目是用inputbox函数输入一名学生三门功课成绩,用msgbox函数公示三门功课的平均成绩,自己写的代码如下:
*********************************************
Private Sub Form_Click()
a = InputBox("请输入语文成绩:")
b = InputBox("请输入数学成绩:")
c = InputBox("请输入英语成绩:")
average = (a + b + c) / 3 '求三门功课平均成绩
MsgBox average, , "您的平均成绩为:"
End Sub 展开
题目是用inputbox函数输入一名学生三门功课成绩,用msgbox函数公示三门功课的平均成绩,自己写的代码如下:
*********************************************
Private Sub Form_Click()
a = InputBox("请输入语文成绩:")
b = InputBox("请输入数学成绩:")
c = InputBox("请输入英语成绩:")
average = (a + b + c) / 3 '求三门功课平均成绩
MsgBox average, , "您的平均成绩为:"
End Sub 展开
5个回答
展开全部
还有
z
=
msgbox
不需要这样写的;提示"伙计,当前没有记录,你怎么加了;)
根本都不需要加括号!",
vbexclamation
+
vbokonly,
"这个当然啦,
你的语句是:
msgbox("
z
=
msgbox
不需要这样写的;提示"伙计,当前没有记录,你怎么加了;)
根本都不需要加括号!",
vbexclamation
+
vbokonly,
"这个当然啦,
你的语句是:
msgbox("
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
稍微改下:
a = Val(InputBox("请输入语文成绩:"))
b = Val(InputBox("请输入数学成绩:"))
c = Val(InputBox("请输入英语成绩:"))
average = (a + b + c) / 3 '求三门功课平均成绩
MsgBox average, , "您的平均成绩为:"
a = Val(InputBox("请输入语文成绩:"))
b = Val(InputBox("请输入数学成绩:"))
c = Val(InputBox("请输入英语成绩:"))
average = (a + b + c) / 3 '求三门功课平均成绩
MsgBox average, , "您的平均成绩为:"
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
a、b、c之前没有定义,所以自动定义成String(字符串型)了,a+b+c成了字符串连接了,改成下面的就可以了
a = Val(InputBox("请输入语文成绩:") )
b = Val(InputBox("请输入数学成绩:") )
c = Val(InputBox("请输入英语成绩:") )
a = Val(InputBox("请输入语文成绩:") )
b = Val(InputBox("请输入数学成绩:") )
c = Val(InputBox("请输入英语成绩:") )
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
a = val(InputBox("请输入语文成绩:") )
b = val(InputBox("请输入数学成绩:") )
c = val(InputBox("请输入英语成绩:") )
b = val(InputBox("请输入数学成绩:") )
c = val(InputBox("请输入英语成绩:") )
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
dim a%,b%,c%
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询