Cudzysłów w VBA

Question

W moim bieżącym kodzie VBA, mam zapytanie, w którym używam Chr(34), aby umieścić cudzysłowy między niektórymi z moich zmiennych.

Zastanawiam się, jakie alternatywy istnieją w tym. To jest proste pytanie, wiem, ale nie miałem żadnych sukcesów z powtarzających cudzysłowie jak ten

" & zmiennego łańcucha tutaj & "

Mój kod jest niechlujny dla jednego i nie zrozumiałe dla ludzi, którzy nie są zaznajomieni z VBA:

comboService = Chr(34) & Me.Combo8.Value & Chr(34) 

również ten nie pracował:

comboService = """" & Me.Combo8.Value & """" 

Czy możesz mi powiedzieć dlaczego?

Z góry dziękuję.

Answer 1

to:

comboService = """ & Me.Combo8.Value & """ 

jest to, co pisał, ale trzeba dodać dodatkowy cudzysłów, aby dodać dosłownego cudzysłów:

comboService = """" & Me.Combo8.Value & """" 

cudzysłów wewnątrz łańcucha są czego szukasz.

aVar = "This: "" is a literal quotation mark" 

Answer 2

Wziąłem strony z SM (stary vbCrLf) jakiś czas temu, a tylko zdefiniować żadnych „trudnych” znaków Muszę postaci napisu w górnej części mojego kodu ...

Dim vbDblQuote As String vbDblQuote = Chr (34)

teraz można po prostu użyć tego pseudo-stałym, jak budować ciągi ...

strMyString = "Jeszcze jeden łańcuch" & vbDblQuote & "cytatami" & vbDblQuote & "!"

To sprawia, że ​​kod jest bardziej czytelny, a także pomaga uniknąć „miscounted błędy cytuję”

Answer 3

Znalazłem takie samo zachowanie, jeśli wyjście do pliku przy użyciu polecenia Write. Wszelkie podwójne cudzysłowy się powtarzają.

Jednak jeśli skonstruujesz ciąg znaków, a następnie wypiszesz go do pliku przy użyciu polecenia Drukuj, tak się nie stanie i wszystko działa zgodnie z oczekiwaniami.