赐教 strSQL = "select FormatDateTime((EntranceTime),4) from TableData"

[pkubzt]

请教各位前辈

我现在用VB写的一个连接数据库一段代码中，由于数据库这个字

段 EntranceTime 的时间格式是 “2007-05-23 13:12:23”这个样

子，我现在想 执行SQL语句把字符变成 13:12 显示在 DataGrid1中

现在是这条语句在 VB 中不能执行

请前辈赐教，谢谢！！！！！！！


conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\Dev Honda\HdBaseData.mdb;Persist Security Info=False;Mode=ReadWrite"

conn.ConnectionTimeout = 20 '20秒等待时间
conn.Open

Rst.CursorLocation = adUseClient
strSQL = "select FormatDateTime((EntranceTime),4) from TableData"
Rst.Open strSQL, conn, adOpenDynamic, adLockOptimistic

[pkubzt]

我现在考虑是不是 我的VB SQL语句的表示有问题

strSQL = "select FormatDateTime((EntranceTime),4) from TableData"

表示有问题

[ZOU_SEAFARER]

strSQL = "select EntranceTime from TableData"
Rst.Open strSQL, conn, adOpenDynamic, adLockOptimistic
text1(i).text = format()

[hongqi162]

使用 CONVERT：

CONVERT (data_type[(length)], expression [, style])

参数
expression

是任何有效的 Microsoft® SQL Server™ 表达式。有关更多信息，请参见表达式。

data_type

目标系统所提供的数据类型，包括 bigint 和 sql_variant。不能使用用户定义的数据类型。有关可用的数据类型的更多信息，请参见数据类型。

length

nchar、nvarchar、char、varchar、binary 或 varbinary 数据类型的可选参数。

style

日期格式样式，借以将 datetime 或 smalldatetime 数据转换为字符数据（nchar、nvarchar、char、varchar、nchar 或 nvarchar 数据类型）；或者字符串格式样式，借以将 float、real、money 或 smallmoney 数据转换为字符数据（nchar、nvarchar、char、varchar、nchar 或 nvarchar 数据类型）。

SQL Server 支持使用科威特算法的阿拉伯样式中的数据格式。

在表中，左侧的两列表示将 datetime 或 smalldatetime 转换为字符数据的 style 值。给 style 值加 100，可获得包括世纪数位的四位年份 (yyyy)。

不带世纪数位 (yy) 带世纪数位 (yyyy)
标准
输入/输出**
- 0 或 100 (*) 默认值 mon dd yyyy hh:miAM（或 PM）
1 101 美国 mm/dd/yyyy
2 102 ANSI yy.mm.dd
3 103 英国/法国 dd/mm/yy
4 104 德国 dd.mm.yy
5 105 意大利 dd-mm-yy
6 106 - dd mon yy
7 107 - mon dd, yy
8 108 - hh:mm:ss
- 9 或 109 (*) 默认值 + 毫秒 mon dd yyyy hh:mi:ss:mmmAM（或 PM）
10 110 美国 mm-dd-yy
11 111 日本 yy/mm/dd
12 112 ISO yymmdd
- 13 或 113 (*) 欧洲默认值 + 毫秒 dd mon yyyy hh:mm:ss:mmm(24h)
14 114 - hh:mi:ss:mmm(24h)
- 20 或 120 (*) ODBC 规范 yyyy-mm-dd hh:mm:ss[.fff]
- 21 或 121 (*) ODBC 规范（带毫秒） yyyy-mm-dd hh:mm:ss[.fff]
- 126(***) ISO8601 yyyy-mm-dd Thh:mm:ss:mmm（不含空格）
- 130* 科威特 dd mon yyyy hh:mi:ss:mmmAM
- 131* 科威特 dd/mm/yy hh:mi:ss:mmmAM

[hongqi162]

select convert(char(5),getdate(),108) from TableData

[jadeluo]

Access并不支持convert函数, 可以用DatePart函数来实现:

strSQL = "select DatePart("h", EntranceTime) & ":" & DatePart("n", EntranceTime) from TableData"

[pkubzt]

jadeluo(秀峰)

您的讲解正确！

我在VB 中的表达试

strSQL = "strSQL = "select DatePart("h", EntranceTime) & ":" & DatePart("n", EntranceTime) from TableData"
Rst.Open strSQL, conn, adOpenDynamic, adLockOptimistic

我现在这样正确吗？
在 Access 中可以执行能执行， 但这样表达的写法在VB中不能执行


strSQL = "select FormatDateTime((EntranceTime),4) from TableData"

在 Access 中可以执行能执行， 但这样表达的写法在VB中不能执行


请前辈赐教

[jadeluo]

上面疏忽了字符串中的双引号, 更正一下:

strSQL = "select DatePart(""h"", EntranceTime) & "":"" & DatePart(""n"", EntranceTime) from TableData"