求助，查询判断列都是FALSE结果
Dim Conn As New ADODB.Connection
Set Conn=CurrentProject.Connection
Dim Rst As New ADODB.Recordset
Dim strCriteria As String

Rst.Open "订单 ",Conn,adOpenKeyset,abLockOptimistic
strCriteria= "[机号]= ' " & ME![Combo0] & " ' "
If RST( "订单配置 ")= True Then
me.BOM子窗体.Locked=Ttue
Exit IF
ELSE
me.BOM子窗体.Locked=Ttue
EXIT IF
END IF

订单配置字段是判断列，当订单配置是真或是假时，怎么IF RST( "订单配置 ")= True THEN 判断都是FALSE

另，查询时怎样把字符的前或后空格去掉

求助各位高手帮我看看，在此谢谢各位了

[解决办法]
--1、

Dim Conn As New ADODB.Connection
Set Conn = CurrentProject.Connection
Dim Rst As New ADODB.Recordset
Dim strCriteria As String

Rst.Open "select * from 订单 where [机号]= ' " & Me![Combo0] & " ' ", Conn, adOpenKeyset, abLockOptimistic

If Rst( "订单配置 ") = True Then
Me.BOM子窗体.Locked = Ttue
Exit Sub
Else
Me.BOM子窗体.Locked = Ttue
Exit Sub
End If

--2、

--去掉前后的空格
select trim( " abc ")

--去掉左边的空格
select ltrim( " abc ")

--去掉右边的空格
select rtrim( " abc ")
[解决办法]
--Access2003

update NMS set Name=replace([name], ' ', ' ')
[解决办法]
Access2003
update tt set f1=replace(f1, ' ', ' ')