以文本方式查看主题

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

--  作者:viizero
--  发布时间:2012/2/14 14:52:00
--  [求助]数据格式问题

我有一张表中要输入工时数据,但工时列需要用字符型数据格式,才能符合使用习惯。比如4.35表示4小时35分钟/45.30表示45小时30分钟。

 

现在需要将这列数据转化成数值型的,该怎么办呢,请高手帮帮我。谢谢!

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table


--  作者:狐狸爸爸
--  发布时间:2012/2/14 14:52:00
--  

45小时30分钟对应的数值是多少?


--  作者:viizero
--  发布时间:2012/2/14 14:55:00
--  
45.5
--  作者:viizero
--  发布时间:2012/2/14 14:55:00
--  
45.5小时
--  作者:狐狸爸爸
--  发布时间:2012/2/14 14:58:00
--  

那么很简单:

 

Dim s As string = "4.40"

Dim v As Doube = s

 

v就是转换后的结果。

 

也可以看看:

http://www.foxtable.com/help/topics/1513.htm

 


--  作者:viizero
--  发布时间:2012/2/14 15:04:00
--  

谢谢狐狸爸爸!

 

 

我想和你聊qq或者给你email

 

我的qq:411758848

Email:viizero@126.com

我非常佩服狐狸爸爸

 

 

 


--  作者:狐狸爸爸
--  发布时间:2012/2/14 15:05:00
--  

呵呵,我只在论坛转悠的,不去其他地方。


--  作者:viizero
--  发布时间:2012/2/14 15:08:00
--  

对不起,还有点问题

 

Dim s As string = "4.40"

Dim v As Doube = s

 

v=4.4

我需要的数据中4.40表述的是4小时40分,约等于4.666667小时。4.4不是我要的数据。

 


--  作者:viizero
--  发布时间:2012/2/14 15:12:00
--  

我觉得foxtable是一个非常棒的软件,我想给您聊聊一些如何让更多人使用它的话题。不想在论坛上聊。

 


--  作者:狐狸爸爸
--  发布时间:2012/2/14 15:16:00
--  
Dim s As String = "4.40"
Dim p() As String = s.Split(".")
Dim v As Double =  p(0) + p(1) / 60
Return v