If adodc1.recordset.fields("sex") = "男" Then Option1.Value = True '男 Else Option2.Value = True '女 EndIf