vb 一个分段函数 编程错误

题目

vb 一个分段函数 编程错误
我用的 vb6.0版的 编一个分段函数 如下
Private Sub form_Click()
Dim x As Integer,y As Integer
x = Val(InputBox("请输入x值:"))
If x

答案

Private Sub form_Click()
Dim x As Integer, y As Integer
x = Val(InputBox("请输入x值:"))
If x