Foxtable(狐表)用户栏目专家坐堂 → 从Excel报表提取数据时碰到空值报错


  共有2768人关注过本帖树形打印复制链接

主题:从Excel报表提取数据时碰到空值报错

帅哥哟,离线,有人找我吗?
L88919138
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:721 积分:6887 威望:0 精华:0 注册:2012/3/1 7:20:00
从Excel报表提取数据时碰到空值报错  发帖心情 Post By:2019/1/20 9:57:00 [只看该作者]

想通过“存货数量成本导入”按钮,将附件1.xls文件中按科目编号与编码相同时将期末数量等写入到狐表存货档案中来,现在14050003期末数量为空白时,系率统报错.请教下大师如何处理?

NET Framework 版本:2.0.50727.3662
Foxtable 版本:2018.10.9.1
错误所在事件:窗口,窗口1,Button1,Click
详细错误信息:
从字符串“ ”到类型“Double”的转换无效。
输入字符串的格式不正确。


 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar


 回到顶部
帅哥哟,离线,有人找我吗?
L88919138
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:721 积分:6887 威望:0 精华:0 注册:2012/3/1 7:20:00
  发帖心情 Post By:2019/1/20 10:38:00 [只看该作者]

顶一下

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/1/20 11:04:00 [只看该作者]

参考

 

Dim Result As DialogResult
Result = Messagebox.Show("请先选择要导入账面数量及成本的 EXCEL 文件 是否准备好?","提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.NO Then '如果用户选择否
    Return
End If
Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog
dlg.Filter= "EXCEL 文件|*.xls" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
    Dim Book As New XLS.Book(dlg.FileName)
    Dim Sheet As XLS.Sheet = Book.Sheets(0)
    For n As Integer = 1 To Sheet.Rows.Count -1
        Dim dr As DataRow = DataTables("存货档案").Find("[编码] = '" & Sheet(n, 0).value & "'")
        Output.Show(Sheet(n, 0).value & "****" & Sheet(n, 10).value)
        If dr IsNot Nothing
            If val(Sheet(n, 10).value) = 0 Then
                dr("账面数量") = Nothing
                dr("成本值") = Nothing
            Else
                dr("账面数量") = val(Sheet(n, 10).value)
                dr("成本值") = val(Sheet(n, 11).value) / val(Sheet(n, 10).value)
            End If
        End If
    Next
   
End If

 


 回到顶部
帅哥哟,离线,有人找我吗?
L88919138
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:721 积分:6887 威望:0 精华:0 注册:2012/3/1 7:20:00
  发帖心情 Post By:2019/1/20 14:23:00 [只看该作者]

谢谢大师指点


 回到顶部