以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  长宽高的数值同时显示到一个Label中  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=11738)
--  作者：annan
--  发布时间：2011/8/9 23:35:00
--  长宽高的数值同时显示到一个Label中

表中分别有 长,宽,高三列,想并三个列的数值同时显示到窗口的Label中,如:21.5×11.5×10.25

或者将三个列的数值以如:21.5×11.5×10.25的形式显示到表中的"规格列"中

 

用代码如何做?
--  作者：e-png
--  发布时间：2011/8/10 0:32:00
--  

dim ckg as string = Tables("aaa").current("规格")        \'*** "21.5×11.5×10.25"

Tables("aaa").current("长") = ckg.split("×")(0) 

Tables("aaa").current("宽") = ckg.split("×")(1) 

Tables("aaa").current("高") = ckg.split("×")(2)

 

dim c,k.g as string

c = Tables("aaa").current("长")  

k = Tables("aaa").current("宽") 

g = Tables("aaa").current("高")

Tables("aaa").current("规格") = c & "×" & k &  "×"  & g