2017-01-30 3 views
1

У меня есть рабочая книга с пользовательской формой, которая фиксирует ввод пользователя в строку и отдельные переменные, и я хочу отобразить текст, содержащий эти переменные, в текстовое поле на той же пользовательской форме, используя новую строку и вкладка.Как ввести несколько строковых переменных в текстовое поле

Пример:

Dim dog as String 'rex 
Dim years as Single '5 
Dim owner As String 'Joe 
Dim address as String '123 Sample Street 
Dim value as Single '300.00 

Я хотел бы иметь текстовое поле на моей форме, которая будет отображать:

The dog's name is rex. He is 5 years old. 

Owner:     Joe 
Address:     123 Sample Street 

Treatment value: 300.00 

Я использовал

textbox.value = "The dog's name is " & dog & vbNewLine & vbNewLine & "Owner: " & owner & vbNewLine & "Address: " & address & vbNewLine & vbNewLine & "Treatment value: " & value

Но через какое-то время я не смогу добавить другого персонажа в эту строку, и у меня есть еще много вариантов ables смешивается с текстом.

Можете ли вы предложить, как это можно сделать?


Update: Решено

Большое спасибо за вашу помощь.

ответ

0

Попробуйте так:

textbox.value = "The dog's name is " & dog & vbNewLine & vbNewLine & _ 
"Owner: " & owner & vbNewLine & _ 
"Address: " & address & vbNewLine & vbNewLine _ 
& "Treatment value: " & value 

"_" знаки поможет вам взломать код в несколько строк. Обратите внимание, что у нас есть 2 знака - пробел и подчеркивание.

Небольшая информация - возможно, полезно рассмотреть текст как .Text, а не как .Value. Вот что-то хорошее, чтобы читать - Distinction between using .text and .value in VBA Access

+0

PO не был отформатирован, я думаю, что он хочет иметь 'VBTab' между –

+0

Может быть. Но я думаю, что он подходит к концу линии VBEditor. – Vityata

+0

Спасибо, друг. Также + для подсказки на .text vs .value. –

1

Попробуйте

textbox.value = "The dog's name is " & dog & vbNewLine & vbNewLine 

textbox.value = textbox.value & "Owner: " & owner & vbNewLine 

textbox.value = textbox.value & "Treatment value: " & value & vbNewLine 

Продолжить с другими полями!

+0

Спасибо, Фабио, хорошо работает, но методы Витяты работают лучше для меня. –

Смежные вопросы