請指教，IF判斷語句出錯

huanghyd

請大家?guī)兔�看看以下代碼，判斷控件MaintenanceLevel2的值，對應小圖片（打勾）為可見顯示的。但我的庫提示：運行錯誤 ‘2424’ 。請指教。謝謝！

Private Sub Report_Open(Cancel As Integer)
If Me.MaintenanceLevel2.value = "A" Then
Me.ImageA.Visible = True

ElseIf Me.MaintenanceLevel2.value = "B" Then
Me.ImageB.Visible = True

ElseIf Me.MaintenanceLevel2.value = "C" Then
Me.ImageC.Visible = True

End If

End Sub

smilingkiss

沒看出端倪，最好上附件！

tzh1600

看字段值是文本屬性,試試不用value,或者用.text

smilingkiss

會不會打開的時候，運行這個代碼的時候，還沒加載控件MaintenanceLevel2的值呢？

huanghyd

上傳個附件，，請幫忙看看。

huanghyd

修改.text也沒有反應。如要先加載控件MaintenanceLevel2的值怎麼做，同一頁面。

smilingkiss

huanghyd 發(fā)表于 2013-12-20 15:27
修改.text也沒有反應。如要先加載控件MaintenanceLevel2的值怎麼做，同一頁面。

做了個按鈕，通過點擊按鈕來實現(xiàn)，當然這個方法好像不太自動，看看哪位高手有更好的方法！

huanghyd

先謝謝smilingkiss 。我是要在打印時執(zhí)行，再加按鈕操作就不好。期待大家解答，謝謝！

Benjamin_luk

將代碼放到:
主體_Format

huanghyd

Benjamin_luk,,  我剛剛測試了沒有反應，也不行。