vb将datagridview中数据导出保存至excel文件中，进程无法正常关闭

在.net环境下将datagridview中数据导出保存至excel文件中，进程无法正常关闭，除非退出程序，请问这是什么问题？excel进程可以正常生成，但无法正常关闭。查了相关材料，有人说是excel没有释放，如果是该问题，怎么释放excel才能在保存文件后excel进程能正常关闭，而不需要退出程序
Private Sub Export_S()
        Dim fs, f1
        Dim a_xlsb As Excel.Application
        Dim ob_xlsb As Excel.Workbook
        Dim os_xlsb As Excel.Worksheet
        Dim FileName As String

        On Error GoTo PrintError

        FileName = "C:\th\分析表.xls"
        a_xlsb = New Excel.Application
        ob_xlsb = a_xlsb.Workbooks.Add(FileName)
        os_xlsb = ob_xlsb.Worksheets(1)

        os_xlsb.Range("A7").Value = Me.dgv1.Item(0, 0).Value.ToString()
        os_xlsb.Range("B7").Value = Me.dgv1.Item(1, 0).Value.ToString()
        os_xlsb.Range("C7").Value = Me.dgv1.Item(2, 0).Value.ToString()

        SaveFileDialog1.ShowDialog()
        os_xlsb.SaveAs(SaveFileDialog1.FileName)
        os_xlsb.SaveAs("C:\temp\月报表.xls")
        MsgBox("保存路径：" & Chr(13) & SaveFileDialog1.FileName, vbInformation)

        os_xlsb = Nothing
        ob_xlsb.Close()
        ob_xlsb = Nothing
        a_xlsb.Quit()
        a_xlsb = Nothing

        Exit Sub
PrintError:
        MsgBox("导出时发生异常错误！", vbCritical, "错误信息")
        os_xlsb = Nothing
        ob_xlsb.Close()
        ob_xlsb = Nothing
        a_xlsb.Quit()
        a_xlsb = Nothing

    End Sub excel vb 进程 --------------------编程问答-------------------- 去掉a_xlsb = Nothing这句话 --------------------编程问答-------------------- 把弹出放在关闭之后试看 --------------------编程问答--------------------

试试改变上图选项

--------------------编程问答-------------------- 另外，我认为=Nothing没必要，可以全去了。

补充：.NET技术 ,  VB.NET