vb System.Web.UI.UserControl类(方法)实例源码

' 导入命名空间
Imports System.Web.UI
Imports System.Web.UI.WebControls


Public Class SimpleControl
   Inherits UserControl
   Public name As TextBox
   Public output As Label
   Public myButton As Button
   
   
   Public Sub myButton_Click(sender As Object, e As EventArgs)

      output.Text = "Hello, " + name.Text + "."

   End Sub  

End Class