主题：请教，选择模版表

Dim drs As DataCol = DataTables("付款管理").DataCols("付款金额")
Dim JINE As Double
JINE=drs("付款金额")
Select Case JINE
    Case >=100
        Dim Book As New XLS.Book(ProjectPath & "Attachments\报表模板_付款通知单-江铜.xls")
        Dim f2 As String = ProjectPath & "Reports\付款通知单-江铜.xls"
        Book.Build()
        Book.Save(f2)
        Dim Proc As New Process
        Proc.File = f2
        Proc.Start()
    Case Else
        Dim Book As New XLS.Book(ProjectPath & "Attachments\报表模板_付款通知单-贵冶.xls")
        Dim fl As String = ProjectPath & "Reports\付款通知单-贵冶.xls"
        Book.Build()
        Book.Save(fl)
        Dim Proc As New Process
        Proc.File = fl
        Proc.Start()
End Select

此程序有误

选择的这一条或者选择的几条，按金额生成报表

 

报表有两种，金额大于100万用上一级机关的报表，小于100万的用本级机关的报表

根据选择的记录生成报表

 

金额大于100万的用上一级机关的报表

 

小于100万的用本级机关的报表

选择几条，生成几条

现在我是人工判断金额，大于100万的和小于100万的分别做了按钮，我的意思是合并在一个按钮，用程序判断

我输入上面的程序，产生这样的报错
此主题相关图片如下：报错文件.jpg

有问题，全部用了一个模版，没有分出来