Foxtable(狐表)用户栏目专家坐堂 → [求助]如何修改导入合并的代码?


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

主题:[求助]如何修改导入合并的代码?

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178530 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/10/12 9:07:00 [显示全部帖子]


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178530 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/10/12 9:20:00 [显示全部帖子]

Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog 
dlg.Filter= 
"Excel文件|*.xls|Word文件|*.doc|Access文件|*.mdb" '设置筛选器
If
 dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
    Dim Book As New XLS.Book(dlg.FileName
End
 
If

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178530 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/10/12 9:21:00 [显示全部帖子]

这个是非常简单的,复制过来就可以用了. 请你认真看一下2楼给你发的帮助,学习一下!  如果还是看不懂,建议你再去重新看一遍帮助,认真学习一下.否则你寸步难行.

 回到顶部