2016-09-14 27 views
-5

對於VBA Access 2010中的字段/對象的「帶到前面」或「發回」以下代碼是否正確?「帶到前面」或「發回」的代碼是否正確?

我的代碼是:

Private Sub Report_Load() 

If IsOpen("Details_ME") Then 

    Me.Controls("DRAFT_Logo").InSelection = True 
    DoCmd.RunCommand acCmdBringToFront 
Else 

    Me.Controls("DRAFT_Logo").InSelection = True 
    DoCmd.RunCommand acCmdSendToBack 

End If 

End sub 

VBA顯示在下面的代碼黃色錯誤:

Me.Controls("DRAFT_Logo").InSelection = True 

任何幫助或建議表示讚賞

+1

黃色的亮點僅僅意味着這就是當前執行的線,它本身不是一個錯誤,這是調試器的只是一個特性 - 什麼是*實際*錯誤消息,」重新獲得? –

回答

0

我做了一點修正,這是有用的,所以它工作正常:)

我應該把代碼爲「當前事件」我而不是「加載事件」。

Private Sub Report_Current() 

If IsOpen("Details_ME") Then 

    Me.Controls("DRAFT_Logo").InSelection = True 
    DoCmd.RunCommand acCmdBringToFront 

Else 

    Me.Controls("DRAFT_Logo").InSelection = True 
    DoCmd.RunCommand acCmdSendToBack 

End If 

End Sub 

謝謝你......