我是一个初学者,有两个问题请各位高手指教,感激涕零!!

chunyi

两个问题请指教,感激!!!!!!!!!

1\在录入数据时,比如:客户档案窗体中,我想在填加新记录时,各个文本框才可以修改数据,不是填加新记录时,是不可以修改记录的,只可以以只讲读的方式看,

2\在录入产品档案窗体中时,录入类别时,如果产品类别是没有的新类别,是不是以下代码?

If MsgBox("输入之类别找不到，是否要立即添加？", 4) = 6 Then

     DoCmd.OpenForm "产品类别", , , , acFormAdd  '开启产品类别窗体

     Forms![产品类别]![产品类别] = Me![产品类别].Text

     Response = acDataErrContinue

     'Forms![客户]![Command12].Enabled = True

Else

    SendKeys "{escape}" '若不要添加，则还原?

为什么系统不执行上面的代码?是代码不对吗?

Trynew

第一个问题，在成为当前事件中判断主关键字是否为空来设置能否编辑：

Private Sub Form_Current()

    If IsNull(Me.客户姓名) Then

        Me.AllowEdits = True

    Else

        Me.AllowEdits = False

    End If

End Sub



第二个问题，首先要把下拉列表框的数据属性选项页的“限于列表”设为“是”，才会触发“不在列表”事件。另外还要在产品类别窗体关闭时更新下拉列表框的数据。