以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助数据格式  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=38095)

--  作者:kingjdar
--  发布时间:2013/7/19 14:54:00
--  求助数据格式

导入excel数据

一个为3.0*710

         2.75*710

另一个则为3.00*710

              2.75*710

 

 

怎么统一格式啊  ~~


--  作者:kingjdar
--  发布时间:2013/7/19 14:55:00
--  
以下是引用kingjdar在2013-7-19 14:54:00的发言:

导入excel数据

一个为3.0*710

         2.75*710

另一个则为3.00*710

              2.75*710

 

 

怎么统一格式啊  ~~

如我都统一为0.00*000


--  作者:Bin
--  发布时间:2013/7/19 14:55:00
--  
希望统一为小数点后面两位吗?
--  作者:kingjdar
--  发布时间:2013/7/19 15:04:00
--  
以下是引用Bin在2013-7-19 14:55:00的发言:
希望统一为小数点后面两位吗?

对,导入excel数据,但是两个表的数据格式不统一

希望统一为小数点后两位,3.0*710为3.00*710这样的。要不关联数据格式不统一关联不到


--  作者:Bin
--  发布时间:2013/7/19 15:08:00
--  
你说清楚你的情况, 后面的这个数值会出现小数吗?  把所有可能出现的情况,以及你要实现的目的说清楚.
--  作者:kingjdar
--  发布时间:2013/7/19 15:09:00
--  
以下是引用Bin在2013-7-19 15:08:00的发言:
你说清楚你的情况, 后面的这个数值会出现小数吗?  把所有可能出现的情况,以及你要实现的目的说清楚.

0.00*000这样个格式*号之后的不会是小数了


--  作者:lsy
--  发布时间:2013/7/19 15:10:00
--  
讲不清楚,就上例子。
--  作者:kingjdar
--  发布时间:2013/7/19 15:11:00
--  

 

 

导入excel一个表为这样格式

4.4*520--4.40*520

 

3.0*685--3.00*685

 

6.5*685--6.50*685

 

5.4*685-

5.40*685

 

3.0*685--3.00*685

 

2.75*685--2.75*685

[此贴子已经被作者于2013-7-19 15:20:34编辑过]

--  作者:Bin
--  发布时间:2013/7/19 15:16:00
--  
Dim s As String="2.7*710"
Dim s2 As String=System.Text.RegularExpressions.Regex.Match(s,"[0-9.]+").Tostring()
messagebox.show(s.replace(s2,Format(val(s2),"0.00")))

--  作者:Bin
--  发布时间:2013/7/19 15:30:00
--  
让你一次性说清楚嘛,又半路改需求.

Dim s As String="2.7*685--2.7*685"
Dim ss As String()=s.split("-")
Dim s2 As String= Format(val(ss(0).split("*")(0)),"0.00")
Dim s3 As String = Format(val(ss(2).split("*")(0)),"0.00")
messagebox.show(s2 & "*" & ss(0).split("*")(1) & "--" & s3 & "*" & ss(2).split("*")(1))