On Error GoTo Err_OPEN_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "窗體名字"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_OPEN_Click:
Exit Sub
Err_OPEN_Click:
MsgBox Err.Description
Resume Exit_OPEN_Click
這是自動生成的打開窗體代碼,要實現數據視圖打開應該怎么改呢?