一个让我狂晕的问题/（是不是我太愚昧了？）

关于vb+oracle的问题：代码如下：Function Save_data() As Boolean
    Dim cmd_str As String
    Dim sql_str As String
    Dim tmp_str As String
    
    Dim rs As New ADODB.Recordset
    Dim del_rs As New ADODB.Recordset
    Dim update_str As String
    Dim i As Long
    Dim id As String
    Dim update_flag As Integer
    If Save_check Then
        update_flag = 0
        cmd_str = "select * from ems_exc_list_opera "
        rs.Open cmd_str, Gconn, 1, 3
        If rs.RecordCount = 0 Then
            If new_data_save Then
                For i = 1 To Grid_EXEC.rows - 1
                    If Grid_EXEC.TextMatrix(i, 1) <> "" Then                        cmd_str = "insert into ems_exc_head_opera (UP_FLAG,ems_no,exg_g_no,begin_date,end_date,bom_id,input_date) values ('0','" & Ems_no & "',"
                        tmp_str = tmp_str & "'" & Grid_EXEC.TextMatrix(i, 1) & "',"
                        tmp_str = tmp_str & " to_date('" & Grid_EXEC.TextMatrix(i, 4) & "','YYYY-MM-DD'),"                      '//2003-10-24 修改为oracle的日期格式
                        tmp_str = tmp_str & " to_date('" & Grid_EXEC.TextMatrix(i, 5) & "','YYYY-MM-DD'),"                      '//2003-10-24 修改为oracle的日期格式
                        tmp_str = tmp_str & "'" & Grid_EXEC.TextMatrix(i, 6) & "',to_date('" & Format$(Date, "yyyy-mm-dd") & "','YYYY-MM-DD') );"     '//日期                        cmd_str = cmd_str & tmp_str
                        
                        Gconn.Execute (cmd_str)
程序中报错：  ORA-00911 无效字符但是把Gconn.Execute (cmd_str) 中的cmd_str 拷贝到sqlplus中执行没有任何问题/
这是怎么回事呢？ 我在vb拼sql串的时候 用到了to_date 难道是这个错？
如何更改呢？ 谢谢大家