在vb程序中如何获得字段长度？

[happy_gambler]

在一程序中已打开一个数据库的一个表，如何得到表中某一行某一字段的长度？？

[zymfy]

rs.Fields("字段名").ActualSize

：）

[happy_gambler]

为什么我在vb中找不到actualsize

[zymfy]

不可能吧。你是怎么打开这个表的呀。
Dim cnn As New ADODB.Connection
cnn.Open "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=C:\aa\aa.mdb;Jet OLEDB:Database Password=aa"
Dim rs As New ADODB.Recordset
rs.Open "select * from aa", cnn, adOpenKeyset, adLockOptimistic
dim i as Integer
i=rs.Fields("字段名").ActualSize

[happy_gambler]

我是这样打开的
Set DB = DBEngine.Workspaces(0).OpenDatabase(数据库名)
Query = "select * from LW"
Set rsLW = DB.OpenRecordset(Query, dbOpenDynaset)

[happy_gambler]

gz

[night_cai]

field("姓名").size