VB ADO 的严重问题!

Question

dim...........
dim..........
Private Sub Form_Load()
Set cn = New ADODB.Connection
temp = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\题库.mdb;Persist Security Info=False "
cn.Open (temp) '打开与数据库的连接
'If cn.State = adStateOpen Then MsgBox "Connection to NorthWind Successful!"
Set adoRs = New ADODB.Recordset
adoRs.Open "select*from type2", cn, adOpenStatic, adLockOptimistic

Set fd1 = adoRs.Fields("ID")
Set fd2 = adoRs.Fields("题干")
Set fd3 = adoRs.Fields("选项1")
Set fd4 = adoRs.Fields("选项2")
Set fd5 = adoRs.Fields("选项3")
Set fd6 = adoRs.Fields("选项4")
Set fd7 = adoRs.Fields("正确答案")
Set fd8 = adoRs.Fields("选择的答案")
adoRs.Fields("选择的答案").Attributes = adFldIsNullable
FieldShow
End Sub

发生错误 ”对象打开时，不允许操作”
我主要是想允许访问null的字段
我在网上查了下,可以用Format(rs.fields("abc").value)来实现,不过这样有没有问题

Answer 1

adoRs.Fields("选择的答案").Attributes = adFldIsNullable
这句有问题的
如果你允许访问NULL，可以使用.Fields("选择的答案").value & ""这样的方式
说实在的，大多数情况没有必要对NULL进行很特别的操作的，简单的判断一下就可以了

Answer 2

这个字段 "选择的答案" 没有必要在 type2表里存在的