怎么我UPDATE ORACLE数据库就死机？？？

If Rs.State Then Rs.Close
        str = "UPDATE HEAD "
        str = str & "SET HOLDER='" & TxtHolder.Text & "',"
        str = str & "INV_STATUS='R'"
        str = str & " WHERE INV_ID=" & Me.InvIndex.Text & ""
        Rs.Open str, CnOracle怎么我在VB里一运行这段话就死机？
直接ORACLE里运行就没事？！？！