将小数转换为小时和分钟

Question

我希望从十进制值获得小时和分钟。

示例：十进制值为12.50。所以，价值将是12小时30分钟。

我怎样才能以最短的方式获得这个？

Answer 1

这样的事情也应该起作用

Dim ts = New TimeSpan(0, 0, 12.5 * 60, 0)

Answer 2

尝试：

Dim val as Decimal = 12.50

hours = Convert.ToInt32(val)
minutes = (val Mod hours) * 60