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


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

主题:导入导出表问题

帅哥哟,离线,有人找我吗?
大红袍
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/29 17:40:00 [只看该作者]

比如

 

CurrentTable.SaveExcel("C:\data\test.xls", e.Form.Controls("TextBox1").Text)

 


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


加好友 发短信
等级:三尾狐 帖子:710 积分:5345 威望:0 精华:0 注册:2013/5/27 9:48:00
  发帖心情 Post By:2016/8/29 17:55:00 [只看该作者]

我就是想在ComboBox中设定所有的表名,通过选择某个项来切换mainTable

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/29 17:59:00 [只看该作者]

Dim str As String = ""
For Each dt As DataTable In DataTables
    str = str & "|" & dt.Name
Next
msgbox(str.trim("|"))
e.form.Controls("ComboBox1").ComboList = str.Trim("|")

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


加好友 发短信
等级:三尾狐 帖子:710 积分:5345 威望:0 精华:0 注册:2013/5/27 9:48:00
  发帖心情 Post By:2016/8/29 18:03:00 [只看该作者]

这段写在ComboBox的哪个事件里?


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/29 18:12:00 [只看该作者]

afterLoad事件

 

Dim str As String = ""
For Each dt As DataTable In DataTables
    str = str & "|" & dt.Name
Next
msgbox(str.trim("|"))
e.form.Controls("ComboBox1").ComboList = str.Trim("|")

 

TextChanged事件

 

MainTable = Tables(e.Sender.Text)


 回到顶部
总数 15 上一页 1 2