主题：[求助] Excel导入如何导入布尔值？

老师您好

我有一个表时foxtable Excel导出来的，但在导入时有错误

导出的表：

此主题相关图片如下：1.jpg

我的导入代码：

Dim dlg As New OpenFileDialog
dlg.Filter = "Excel文件|*.xls;*.xlsx"
If dlg.ShowDialog = DialogResult.OK Then
    Dim Book As New XLS.Book(dlg.FileName)
    Dim Sheet As XLS.Sheet = Book.Sheets(0)
Tables("统计柱状图设定").StopRedraw()
'注意以下数组中列名称的顺序,必须和Excel表中的列顺序一致
Dim nms() As  String = {"月结日期","年","月份","单位","名称","年计划","月计划","完成量","强制月结", "抄表电量","量补偿","单价","月结总价","汽轮机运行小时","协作窖线连续运行时间","锁定"}
'注意下面的循环变量从1开始,而不是从0开始,因为Excel表的第一行是标题
For n As Integer = 1 To Sheet.Rows.Count -1
    Dim r As  Row = Tables("统计柱状图设定").AddNew()
    For  m As  Integer = 0 To nms.Length - 1
        r(nms(m)) = Sheet(n,m).Value
    Next
Next
End If
 

导入时提示错误

此主题相关图片如下：2.jpg

说明：我表中“锁定”时布尔型字段，对于布尔型字段 在导入时如何处理？