某VB程序的一个事件过程如下

Private  Sub  Command1_Click (   )

     Dim  a  As  Integer

Dim  b  As  Integer

Dim  C  As  Integer

     a = Val ( Text1．Text )

b = Val ( Text2．Text )

c= a+b^2

Text3．Text = Str(c)

End  Sub

  程序运行时，单击命令按钮Command1后弹出如图所示的错误信息提示。出现错误的原因是（   ）

A：运算类型不匹配

B：Str函数计算时出现错误

C：VB界面上缺少程序代码中出现的对象

D：变量类型定义错误