在窗体上有一个命令按钮(Command1)和两个文本框(Text1和Text2),然后编写了如下事件过程,要求:在文本框Text1中输入一个数值x,根据下面的分段函数计算y的结果,并将y值显示在文本框Text2中。

请将实线以上功能的程序补充完整((每空2分):
Private Sub Command1_Click( )
x=" Val" (Text1.text)
If x>0 Then
_____
1_____
ElseIf_____
2_____Then
y = 0
ElseIf x < 0 Then[来源:学科网]
y = Abs(x)
End If
_____
3_____
End Sub