Как добавить символ кавычки (") в строковую переменную?

[Maitris]

А?

[Amed]

Код: Выделить всё

Private Sub Form_Load()
Dim str As String
str = """" & "secret" & """"
MsgBox str
End Sub

[Maitris]

Amed Так можно? Ггг, кавычки в кавычках

[Морфий]

можно, а можно еще и вот так:

Код: Выделить всё

Private Sub Form_Load()
Dim str As String
str = chr(34) & "secret" & chr(34)
MsgBox str
End Sub


[Amed]

Но работает же!

Можно ещё вот так:

Код: Выделить всё

Private Sub Form_Load()
Dim str As String
str = Chr(34) & "secret" & Chr(34)
MsgBox str
End Sub

[Maitris]

МорфийА есть же еще вроде что-то типа & Vb....?

[Морфий]

[Maitris]

Кстати, а где можно посмотреть chr коды символов?

[Maitris]

Морфий Ваши коды получились идентичны

[Морфий]

Морфий Ваши коды получились идентичны

ага, я заметил
---
Ascii коды символов можно посмотреть в ворде в таблице символов.

[Alexander N. Samarin]

Таблица символов: шрифты System и Terminal

[Maitris]

Морфий Ок, сенк

[Yurich]

Двойную кавычку заменяю двумя апострофами. Недостаток - на символ больше.

[Морфий]

можно тогда юзать «парные» кавычки (ascii 171 и 187)

[SHURUP]

Кстати, а где можно посмотреть chr коды символов?

Может это и глупо , но я смотрю их програмно!

Код: Выделить всё

Private Sub Form_KeyPress(KeyAscii As Integer)
Cls
Print Chr(KeyAscii), KeyAscii, "&" & Hex(KeyAscii)
End Sub

привык так
А если нужно узнать код символа, которого нету на клавиатуре - тогда не Ворд, а Пуск Выполнить charmap <enter>

[Ramzes]

А че глупо? а няпример вот так смотруюЖ

for q =32 to 255
list1.additem chr(q) & "---" & q
next

[Sedge]

Двойную кавычку заменяю двумя апострофами. Недостаток - на символ больше.

А sql-запросы на двойных апострофах не плющит?

[marvan]

для определения кодов символов пользую : ASCIIcat
- в нём очень хорошая таблица символов (Dec Hex Oct Binary Chr % HTML Name) и много другой справочной инфы. Представляет собой обычный hlp - файл.