VB中textbox如何多行显示？

1、添加TextBox控件。

2、设置TextBox属性。

3、编写代码。

4、运行效果。

5、常见代码:

BorderColor   获取或设置 Web 控件的边框颜色。

BorderStyle   获取或设置 Web 服务器控件的边框样式。

BorderWidth   获取或设置 Web 服务器控件的边框宽度。  

Columns   获取或设置文本框的显示宽度

Enabled   获取或设置一个值，该值指示是否启用 Web 服务器控件。

Height   获取或设置 Web 服务器控件的高度。

MaxLength   获取或设置文本框中最多允许的字符数。

你这样是肯定没有的，因为click事件点击后立即执行完了，根本不能等待你输入的结果的。

理应的形式是：点击后出现textbox然后对话框d出空。你的输入是没法赋值的。

如果要显示，将 String S

TextBox txt = new TextBox()

txt.SetBounds(250, 0, 200, 400)

this.Controls.Add(txt)

txt.Enabled = true

放在构造函数或者form_load事件中。

这样写：

TextBox txt = new TextBox()

String S

private void button1_Click(object sender, EventArgs e)

{

S = txt.Text

MessageBox.Show(S)

}

private void Form1_Load(object sender, EventArgs e)

{

txt.SetBounds(250, 0, 200, 400)

this.Controls.Add(txt)

txt.Enabled = true

}

首先，在窗体画一个名为Text1的文本框，将其Index属性设置为0，Left属性设置为100，Top属性设置为100.

再在窗体上添加一个命令按钮，其单击事件代码如下：

Private Sub Command1_Click()

  Dim n As Integer

  n = InputBox("请输入要生成文本框的个数", , 5)

  For i = 1 To n - 1

    Load Text1(i)

    Text1(i).Left = 100

    Text1(i).Top = 100 + (Text1(i).Height + 100) * i

    Text1(i).Visible = True

  Next i

End Sub

运行程序，单击此按钮，即可根据你设定的个数生成TextBox控件。

---