作业帮 > 数学 > 作业

请VB高手帮我看下这个题.答的好我一定重赏.急用.每个found的下一行有错误,请改正.

来源:学生作业帮 编辑:大师作文网作业帮 分类:数学作业 时间:2024/11/10 23:47:49
请VB高手帮我看下这个题.答的好我一定重赏.急用.每个found的下一行有错误,请改正.
【程序改错】
'------------------------------------------------
\x05
用输入对话框输入x,根据公式(图1)计算对应的y,
' 并在窗体上输出y的值.
'------------------------------------------------
Option Explicit
Private Sub Command1_Click()
Dim x As Single,y As Single
x = Val(InputBox("Please input x :","输入X的值"))
If x = 10 Then
y = 0
'
y = 2 * x 3 + 6
End If
Print y
End Sub
请VB高手帮我看下这个题.答的好我一定重赏.急用.每个found的下一行有错误,请改正.
Option Explicit
Private Sub Command1_Click()
Dim x As Single, y As Single
x = Val(InputBox("Please input x :", "输入X的值"))
If x = 10 Then
y = 0
'
y = 2 * x ~ 3 + 6 这个 ~ 运算符好像没有的吧?
End If
Print y
End Su