程序运行时会出错

精彩的瞬鐧

我刚编写了一个简单的计算器程序，当除数为0时，不能显示“除数不能为0的提示，请问问题出在哪，为什么也不能修改图标？
代码如下：
dim a,b, result As Double
a=text1.Text
b=text2.Text
result=o

If b <> o Then
result=a/b
text3=result
Else
Msgbox "除数不能为0"
end if