以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]弹出窗口的动态数据 和 排版  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=137718)

--  作者:TINOOOOOOOO
--  发布时间:2019/7/13 13:56:00
--  [求助]弹出窗口的动态数据 和 排版
Select Case e.Path
    Case "cvcv.htm"
        Dim i As Integer = 0
        For Each dr As DataRow In dt.DataRows
            With wb.AddPreview("","pv" & i  ,"付款金额","人民币:"& dr("含税金额"))
                .AddItem("单据编号",dr("单据编号"))
                .AddItem("物料名称",dr("物料名称"))
                .AddItem("供应商",dr("供应商"))
                .Addbutton("审核", "", 1,)
                .Addbutton("操作", "", 1, "))

            End With
            i = i + 1           
        Next
红色字段 是弹出一个对话框 确认, 我想就是把里面的内容 替换成动态数据。 比方说是 订单明细表的 详细。 该怎么 拼接字符串 。最好弹出的消息框 里面的文本 跟 数据也是 对齐的 



        

--  作者:TINOOOOOOOO
--  发布时间:2019/7/13 13:56:00
--  
直接回复 貌似 看不见 我放在记事本里面了 
[此贴子已经被作者于2019/7/13 13:58:11编辑过]

--  作者:TINOOOOOOOO
--  发布时间:2019/7/13 13:59:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建文本文档 (2).txt


--  作者:有点蓝
--  发布时间:2019/7/13 14:09:00
--  
.Addbutton("操作", "", 1, "onclick=\'alert(""人民币:" & dr("含税金额") & """)\'")
--  作者:TINOOOOOOOO
--  发布时间:2019/7/13 16:31:00
--  
弹出消息的窗口里面的字体可以设置吗, 如何设置 字号  字体 这些
--  作者:有点蓝
--  发布时间:2019/7/13 16:35:00
--  
alert?无法设置。或者考虑使用Dialog