- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]窗口生成表 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=144814)
-- 发布时间：2019/12/30 17:56:00
-- [求助]窗口生成表
求大师提供给个思路或者示例
第一步：用下面代码获取多个文件名
Dim dlg As New OpenFileDialog
dlg.MultiSelect = True
If dlg.ShowDialog =
DialogResult.OK Then
OutPut.Show("你选择了" & dlg.FileNames.Length & "个文件,
分别是:")
For
Each fl As
String
In dlg.FileNames
Output.Show(fl)
Next
End
If
第二步：将文件名显示到窗口的表中，并实现可以多选拖动位置，调整文件的顺序。
此主题相关图片如下：qq截图20191230174818.png
效果如下图
此主题相关图片如下：qq截图20191230174618.png
-- 发布时间：2019/12/30 20:09:00
--
Dim dlg As New OpenFileDialog
dlg.MultiSelect = True
If dlg.ShowDialog = DialogResult.OK Then
dim r as row
For Each fl As String In dlg.FileNames
r = tables("表A").addnew()
r("第一列") = fl
Next
End If
Next
End If
-- 发布时间：2019/12/30 21:27:00
--
问题1：窗口表的列名怎么修改，比如第一列改成“文件名”。
问题2：总列数怎么控制，比如我需要4列。
问题3：窗口表不支持移动行,应该怎么设置
此主题相关图片如下：qq截图20191230212147.png
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
-- 发布时间：2019/12/30 21:32:00
--
1、参考：http://www.foxtable.com/webhelp/topics/0193.htm，窗口表绑定表A：http://www.foxtable.com/webhelp/topics/1905.htm
2、到表结构里删除不需要的列