| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 请教动态字符串转数组方法 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=148034) |
| -- 作者：lanbor -- 发布时间：2020/3/29 21:17:00 -- 请教动态字符串转数组方法 由于订单表中的币别每一年结算有可能不同 我用以以方法动态得某年结算币别字符串 s Dim s As String =
Data Tables("订单").SQLGet ComboListString("币别")s1="HKD|RMB|USD" 或 s1="JPY|HKD|USD" Dim nms1() As String \'再建立一个数组 nms1，希望动态生成结果为 nms1 数组，好用来作为 With wb.AddTable("form1","Table1"): 的标题 nms1()={"月份","HKD","RMB","USD"} 或 nms1()={"月份","JPY","HKD","USD"} 请教用S 字串动态生成以上数组的正确语句格式 谢谢专家！
|
| -- 作者：sloyy -- 发布时间：2020/3/29 22:29:00 -- Dim s0 As String="月份|" Dim s As String ="HKD|RMB|USD" s0=s0 & s Dim nms1() As String nms1 = s0.Split("|")
|
| -- 作者：有点蓝 -- 发布时间：2020/3/29 23:02:00 -- Dim s As String = "月份|" & Data Tables("订单").SQLGet ComboListString("币别") Dim nms1() As String= s.Split("|")
|
| -- 作者：lanbor -- 发布时间：2020/3/30 19:33:00 -- 谢谢楼上的大师和朋友 谢谢楼上的大师和朋友 |
| -- 作者：lanbor -- 发布时间：2020/3/30 19:51:00 -- 临时表标题转数组再请教。 我有以下:临时统计表（tjb1) Dim b As New CrossTableBuilder("tjb1",DataTables("采购单")) b.Filter= "po_year = \'2020\'" b.HGroups.AddDef("po_month","月") \'添加客户列用于水平分组,"月" b.VGroups.AddDef("curency_code") \'添加产品列用于垂直分组 b.Totals.AddDef("po_money","currency_code") \'添加数量列用于统计 b.VerticalProportion = True \'垂直占比 b.Build \'生成统计表 再请教：如何快速取出临时表（tjb1) 中的列名：(实际情况里面的列名是月份+动态币别名) 并将这些列名动态生成一个数据: dim nms1() as string 谢谢大师！ |
| -- 作者：有点蓝 -- 发布时间：2020/3/30 20:09:00 -- 参考：http://www.foxtable.com/webhelp/topics/1428.htm |