例如：Instr函数事件过程如下：SubButton_Click(…)HandlesButton.ClickDims$s=InputBox(“输入查找子串s”)TextBox.Text=InStr(TextBox.Text，s)Label.Text=Button.Text&“函数的结果”EndSub图.运行界面评分规则界面正确，项目能正确运行得分；界面正确，但不能运行得分，否则分