2017-01-30 69 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

但经过一段时间我将无法在这条线上添加另一个角色,而且我还有更多的变体与文本混合在一起。

你能建议如何做到这一点吗?


更新:解决

你的帮助非常感谢。

回答

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和.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

谢谢法比奥,运作良好,但Vityata的方法对我更好。 –

相关问题