AddTable生成表格，怎样才能复制内容呢？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → AddTable生成表格，怎样才能复制内容呢？

共有1827人关注过本帖树形打印复制链接主题：AddTable生成表格，怎样才能复制内容呢？

Exon_Liang

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：151 积分：1670 威望：0 精华：0 注册：2015/4/7 23:01:00

AddTable生成表格，怎样才能复制内容呢？ 发帖心情

Post By：2019/6/24 15:35:00 [只看该作者]

以下代码用AddTable生成表格，在浏览器上无法用鼠标选择单元格内容进行复制，请教怎样解决呢？

With wb.AddTable("","Table1")

.Highlight = 1

.Alternate = 2

.Head.AddRow("序号","姓名")

.ColWidth = "50px,120px"

.Body.AddRow("1","张三")

.Body.AddRow("2","李四")

End With

[此贴子已经被作者于2019/6/24 15:34:54编辑过]

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2019/6/24 16:05:00 [只看该作者]

参考

Select Case e.Path
    Case "test.htm", ""
        Dim wb As New WeUI
        With wb.AddTable("","Table1")
            .head.AddRow("部门","姓名","年龄","电话","地址") '表头
            .body.AddRow("技术部","张三","36","110","中国北京") '数据
            .body.AddRow("技术部","李四","38","110","中国上海")
            .body.AddRow("技术部","王五","39","110","中国深圳")
            .body.AddRow("生产部","赵六","39","110","中国深圳")
            .body.AddRow("生产部","刘七","39","110","中国深圳")
        End With
        wb.InsertHTML("<script>function tableMouseDown() {}</script>")
        e.WriteString(wb.Build)
End Select

下一主题 >> << 上一主题

主题：AddTable生成表格，怎样才能复制内容呢？