首先界面（随便弄的）
其次，button1的代码：
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
TextBox1.Text = TextBox1.Text.ToUpper
End Sub
End Class
好，完成，运行测试
首先界面（随便弄的）
其次，button1的代码：
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
TextBox1.Text = TextBox1.Text.ToUpper
End Sub
End Class
好，完成，运行测试
