Question

我有特定的TextBoxes我输入信息，我想使用TextBox中的信息来完成一个句子。

示例：鲍勃有一辆_____自行车，费用为_____。空格将用这些特定TextBox中填充的内容完成。点击我的＆＃34; copy＆＃34;按钮。

我只走到这一步。我需要其他的话来保持静止，只填空。

Private Sub CommandButton2_Click()

    If (Value1 = True) Then
        ActiveSheet.Range("A1").Copy
        textBox2.Text =  textBox1.Text
    End If

End Sub

Answer 1

userform上的文本框可以作为方法引用。

因此，如果您的文本框名为“Textbox1”和“Textbox2”，那么您可以使用以下内容来引用它们：

Me.Textbox1
Me.Textbox2

'Can only be used within the userform code only; to use the names _
    elsewhere, you'll need to save them to a variable

您可以使用.value

更改文本框中的文字

Me.Textbox2.Value = Me.Textbox1.Value

如果您需要使用变量代替文本框的名称，那么您可以.Controls方法：

Dim textboxName As String
textboxName = "Textbox1"

Me.Controls(textboxName) = "New value"

范围的内容可以保存到变量中，然后传递给userform：

savedText = ws.Range("A1").Value
Me.Textbox1.Value = savedText

希望这有帮助！

在句子中使用文本框条目

1 个答案: