Foxtable(狐表)用户栏目专家坐堂 → exl导出问题


  共有1651人关注过本帖平板打印复制链接

主题:exl导出问题

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


加好友 发短信
等级:婴狐 帖子:4 积分:97 威望:0 精华:0 注册:2018/6/11 8:21:00
exl导出问题  发帖心情 Post By:2018/6/11 8:34:00 [只看该作者]

Dim lsc As WinForm.CheckedListBox = e.Form.Controls("CheckedListBox1")
Dim dlg As New SaveFileDialog
dlg.Filter = "Excel文件|*.xls"
If dlg.ShowDialog = DialogResult.OK Then
 Dim ex As New Exporter
 ex.Format = "Excel"
 ex.SourceTableName = "台面生产进度表"
 ex.FilePath = dlg.FileName
 ex.Fields = lsc.Value
 ex.Export
End If
怎么回事,求救

 回到顶部