【加试题】输入一个表达式（运算符号只有加减乘除和小括号，表达式是正确的，不需要检查）,求表达式中最后一次运算的运算符号位置。比如表达式a*(b+c)-4+d最后一次运算的运算符号是在第10个位置的“+”，输出10。算法的思想是：从表达式右边开始往左边查找，对碰到的字符分四种情况考虑：
1)若是运算符“+”或“-”保存该位置并结束查找。
2)若是第一次碰到“*”或“/”，保存该位置，若不是第一次碰到“*”或“/”，继续往左边查找。
3)若是“）”，调用函数找到和它对应的“（”位置，跳过该括号，继续往左查找。
4)若是非运算符，继续往左查找。
运行界面如下图：
实现上述功能的 VB 程序如下，但加框处代码有错，请改正。
Function find(y As String , x As Integer ) As Integer
’该函数的功能是：返回表达式 y 中和位于第 x 位置的“）”配对的“（”的位置，代码略
End Function
Private Sub Commandl _ Click ()
Dim s As String , t As Integer , temp As Integer , p As Integer
s = Text1. Text ‘输入表达式
t = Len (s):p = 0
Do While t>0
If Mid ( s, t , 1) =“*” Or Mid ( s, t , 1) =“-” Then ‘处理+、-
temp=t
Exit Do
End If
If 
① Then 处理 *、/
temp = t
P=1 ‘用来标记乘号或除号已经出现了
End If
If Mid(s, t, 1)= ")" Then ‘处理括号
②
End If
t=t -1
Loop
Text 2.Text = Str (temp)
End Sub
①{#blank#}1{#/blank#} ②{#blank#}2{#/blank#}
图1
