else에 문자열 선언 오류가 발생했습니다.

캠프 문자열이 있습니다. 이 코드를 작성할 때 오류가 발생합니다 :else에 문자열 선언 오류가 발생했습니다.

*Me.BoatDesc =< the expression you entered refer to an object that is close*

것은 여기에 만약 내가 잘못 정정 해줘 내 코드

private Sub Save_Click() 

Dim Camp As String 

If Me.BoatDesc = "Camp" Then 

Me.Amount = Me.Amount * 12 

End If

입니다.

출처

2013-03-19 Tukai Nancy

정확한 내용은 무엇입니까? – SLaks

내 양식은 정상적으로 작동하지만 올바른 결과 만 표시합니다. 금액 텍스트 상자에 결과가 표시되지만 multiple.there에는 텍스트 오류가 표시되지 않지만 if Me.BoatDesc = "Camp"가 선택되었을 때 표시됩니다. 그것에 내가 그 오류가 내 질문에 말을 참조하십시오 –

시도 me.boatdesc.text = "캠프" – Kasnady

VB.Net이 아닌 VBA를 사용하고 있습니다. 여기에 몇 가지 메모가 있습니다

간단한 양식이며 코드가 실행될 때 열립니다. 저장을 클릭하면 코드가 실행됩니다. MS 액세스 바운드 형식의 기본값은 저장하는 것이므로 다른 이름을 사용하는 것이 좋습니다.

a simple form

이

디자인보기에서 폼입니다 만 속성 시트에서 볼 수 있듯이 BoatDesc라는 이름의 제어 및 다른 이름 금액이 있음을 유의하십시오.

form design view

저장 버튼 코드 인 [이벤트 절차]가.

코드가 Form2를, 내가 함께 일하고 형태에 속한다는 것을

save button property

주, 그리고 노골적인 단어 옵션 상단에 나타납니다. 즉, 이름없는 변수를 가질 수 없기 때문에 이름을 잘못 지정하는 것이 훨씬 어렵습니다.

code picture

이

은 저장 버튼에 의해 실행되는 코드입니다.

Option Compare Database 
Option Explicit 

Private Sub Save_Click() 
    ''Do not mix up strings, variables, controls and fields 
    ''If you want to know if a control, BoatDesc, equals 
    ''the string "camp", you do not need this 
    ''Dim Camp As String 

    If Me.BoatDesc = "Camp" Then 
     Me.Amount = Me.Amount * 12 
    End If 
End Sub

출처

2013-03-20 14:07:33 Fionnuala

감사 Remou..works 괜찮 .. .. :) –

else에 문자열 선언 오류가 발생했습니다.

답변

관련 문제