玉致寇仲的同人文:把**.****度化成**度**分**秒的代码?

来源:百度文库 编辑:高考问答 时间:2024/04/30 11:12:54
谁知道把**.****度化成**度**分**秒的代码吗
如:36.3030度等于36度50分08秒
用VB

你想使用什么语言来写?

用 format 格式化一下就可以了。

我写的代码如下:

text1.text 为源数据
text2.text 为格式化后显示的数据。结果正常。你测试一下

Private Sub Command1_Click()
Text2.Text = Format(Text1.Text, "00.00.00")
End Sub