指示是否應(yīng)該在該字段上創(chuàng)建索引。
設(shè)置和返回值
設(shè)置或返回布爾型值。
說明
索引可提高在 Recordset 中查找或排序值的操作性能。索引對(duì)于 ADO 是內(nèi)部的，您無法在應(yīng)用程序中顯式訪問或使用索引。
Optimize 屬性是“動(dòng)態(tài)的”；該屬性不是 Field 對(duì)象接口的一部分。如果將 CursorLocation 屬性設(shè)置為 adUseClient，則該屬性只在 Field 對(duì)象的 Properties 集合中存在。
要?jiǎng)?chuàng)建字段的索引，請(qǐng)將 Optimize 屬性設(shè)置為 True。要?jiǎng)h除索引，請(qǐng)將該屬性設(shè)置為 False。
用法
Dim rs As New Recordset
Dim fld As Field
rs.CursorLocation = adUseClient '啟用索引創(chuàng)建
rs.Fields.Append "Field1", adChar, 35, adFldIsNullable
rs.Open
Set fld = rs.Fields(0)
fld.Properties("Optimize") = True '創(chuàng)建索引
fld.Properties("Optimize") = False '刪除索引