以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教大师  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=59842)

--  作者:hbhb
--  发布时间:2014/11/12 9:56:00
--  请教大师
大师:好!
请教如下示例中代码中的错误,同样的excel表为何导入时会显示错误
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目29.zip


--  作者:有点甜
--  发布时间:2014/11/12 10:09:00
--  

MessageBox.Show(1)
\'----------清空所有空格--------------

Dim b1 As Table
Dim d As WinForm.Table = e.Form.Controls("Table1")
b1 = d.Table
For Each r1 As Row In b1.Rows
    For Each l1 As Col In b1.Cols
        If l1.Name <> "" Then
            r1(l1) = trim(r1(l1).replace(" ",""))
        End If
    Next
Next

MessageBox.Show("2")

[此贴子已经被作者于2014-11-12 10:08:36编辑过]

--  作者:hbhb
--  发布时间:2014/11/12 10:12:00
--  
请问为何原理?
--  作者:有点甜
--  发布时间:2014/11/12 10:13:00
--  

 提示得很清楚了啊