某VB程序的一个事件过程代码如下：
PrivAte SuB CommAnD1_CliCk()
Dim A As Single,x As Single,z As Single
A=vAl(Text1.Text)
x=(A+10)/(A*A+8)
y=(A-1)/(x+A)
z=Sqr(x-y)
Text2.Text="Str(z)"
EnD SuB
程序运行时在文本框Text1中输入-1，单击命令按钮CommAnD1，弹出如右图所示的错误提示信息，产生此错误的语句是( )
| A．A=VAl(Text1.Text) | B．x=(A+10)/(A*A+8) |
| C．y=(A-1)/(x+A) | D．z="Sqr(x-y)" |
