如何设置字段中的时间格式

刘北斗　发表于：2014-11-24 14:57:27 　

我想录入一个时间（可以大于24小时的），然后换算成数字，比如25：30，换算后变成25.5小时

煮江品茶发表于：2014-11-24 16:18:01

function GetHour(str as string) as single
dim h as single
dim Arr
Arr=Split(str,":")
h=val(Arr(0) & "." & int(Arr(1)/60))
GetHour=h
end function

刘北斗发表于：2014-11-24 16:27:15

@煮江品茶，能给发个举例文件吗？

煮江品茶发表于：2014-11-24 16:53:46

这还需要什么举例呀？

你在窗体上弄两个文本框一个按钮，第一个叫做text1，第二个叫做text2;

然后在按钮事件中调用前面写的函数：

me.text2.value=GetHour(me.text1.value)

最后写25:30到text1中，用你的纤纤玉指点一下按钮，看看text2中会出来什么。

总记录：3篇页次：1/1 9 1 :

Access交流中心