以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  将导出的逻辑数据修改成为是或否  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=110023)

--  作者:benwong2013
--  发布时间:2017/11/24 15:56:00
--  将导出的逻辑数据修改成为是或否
Dim Book As New XLS.Book(ProjectPath & "Attachments\\Report-s.xls") \'打开模板
Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog
dlg.Filter= "Excel文件|*.xls" \'设置筛选器



If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按
    Book.Build() \'生成报表
    Dim  sheet As XLS.Sheet = Book.Sheets("T_Report")
    For j As Integer = 9 To 14
        For i As Integer = 1 To sheet.Rows.count-1
            If sheet(i, j).Value = "TURE" Then
                sheet(i, j).Value = "是"
            ElseIf sheet(i, j).Value = "FALSE" Then
                sheet(i,j).value = "否"
            End If
        Next
    Next
    Book.Save(dlg.FileName)
End If
Dim Proc As New Process
Proc.File = dlg.FileName
Proc.Start()

如题,发现生成的报表还是没有转换过来;

--  作者:benwong2013
--  发布时间:2017/11/24 16:45:00
--  
帮忙回复一下,谢谢!
--  作者:有点蓝
--  发布时间:2017/11/24 16:51:00
--  
直接在模板设置不行么

< IIF([逻辑列名称] = TRUE,"是","否")>
[此贴子已经被作者于2017/11/24 16:51:11编辑过]