编程论坛 → VB6论坛

时间先后顺序排

yww595 发布于 2022-08-25 22:33， 1325 次点击

text1 文本框有一组数据
2022-1-1 10:00,2
2022-1-1 9:10,3
2022-1-1 8:00,5
2022-1-1 11:00,4

以第一列时间进行排序，按时间先后顺序排

4 回复

mqlbeyond2022-08-26 12:38

如果是数据库读取出来的时候可以添加sql排序 order by cast( 列名 as datetime)

yww5952022-08-26 13:06

回复 2楼 mqlbeyond

不是sql提取出来，就是文本框内数据

yuma2022-08-26 14:10

字符串时间是可以比较大小的

给你写个参考：

程序代码：

rivate Sub Form_Load()
Dim a As Date, b As Date
a = CDate("2022-1-1 10:00")
b = CDate("2022-1-1 8:00")
If a > b Then
MsgBox "a大"
Else
MsgBox "b大"
End If
End Sub

cwa99582022-08-26 14:24

首先把日期格式化，一样的格式，然后就可以用字符串来排序了。
Format(2022-1-1 9:10, "yyyy-mm-dd hh:mm")
变为 2022-01-01 09:10
一样的格式，就可以排序了。

能取出逗号前的数据吧？