Переменная VBA ставит цитату в начале, не сообщая

Question

Это мой первый вопрос, поэтому извиняюсь, если это дубликат, я не могу выразить это словами, которые приводят к связанным результатам.

По сути, я пытаюсь извлечь из SQL значениеэто просто говорит «Входящие»

У меня есть функция для этого:

Function MailboxInbox(ActiveEmail As String, ActiveEmailInbox As String, ValidMailbox, conn As ADODB.Connection, rs As ADODB.Recordset, sConnString As String)
Call OpenSQLCon.ConnectSqlServer(conn, rs, sConnString)
Dim SQL As String
SQL = "Select distinct coalesce(Mailbox_1,Mailbox_2,Mailbox_3) from [MAP].[Config].[TB_SU_MAP_Mailbox_Configuration] where Mailbox_Name ='" & ActiveEmail & "'"
Debug.Print SQL
' Open the connection and execute.
        conn.Open sConnString
        Set rs = conn.Execute(SQL)
        If rs.EOF = True Or rs.BOF = True Then
        ValidMailbox = 1
        Exit Function
        Else
        ActiveEmailInbox = rs(0)
        Debug.Print ActiveEmailInbox

        End If

'Close SQL
Call CloseSQLCon.CSC(conn, rs, sConnString)
End Function

В этом я подключаюсь к серверу SQL, отправляю запрос на выполнение и вытягиваю обратноединственное значение, которое я положил в набор записей. Эта часть отлично работает. В таблице SQL значением является «Входящие», пять символов, нет ».

Однако, когда я заполняю переменную« ActiveEmailInbox »значением из набора записей, он задается как « Входящие

Когда я позже использую это значение в коде, я не могу установить почтовый ящик, в котором я хочу просмотреть, на «Входящие», так как он установлен на «Входящие . Бит, которыйМеня беспокоит, когда я распечатываю значение ActiveEmailInbox в окне отладки, которое говорит Inbox.

Любая помощь будет принята с благодарностью. Спасибо.

Answer 1

Хотя это может быть связано с симптомом, а не с реальной проблемой, вы можете попробовать вырезать первый символ из строки при его возврате, что означает, что «удаляется».

   ActiveEmailInbox = Right(ActiveEmailInbox , Len(ActiveEmailInbox) - 1)