S在计算机函数公式符号,【加试题】输入一个表达式（运算符号只有加减乘除和小括号，表达式是正确的，不需要检查）,求表达式中最后一次运算的运算符号位置。比如表达式a*(b+c)-4+d最后一次运算的运算符...

1.

(2018·浙江模拟)

【加试题】输入一个表达式(运算符号只有加减乘除和小括号，表达式是正确的，不需要检查),求表达式中最后一次运算的运算符号位置。比如表达式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

①________ ②________