G
Guest
Hi EveryBody:
How can I add Sub or Function or property to be a member of TextBox ?
For example TextBox1.Text , text is a property in Textbox1 How Can I add the
following sub to be a member of textbox1:
Public Sub SaveHtml(ByVal stream As Stream)
If stream Is Nothing Then
Throw New ArgumentNullException("SaveHtml : Must specify a
non-null stream to which to save")
End If
Dim content As String = SaveHtml()
Dim writer As New StreamWriter(stream, Encoding.UTF8)
writer.Write(content)
writer.Flush()
End Sub 'SaveHtml
Any Help or redirection will be appreciated
regard's
Husam
How can I add Sub or Function or property to be a member of TextBox ?
For example TextBox1.Text , text is a property in Textbox1 How Can I add the
following sub to be a member of textbox1:
Public Sub SaveHtml(ByVal stream As Stream)
If stream Is Nothing Then
Throw New ArgumentNullException("SaveHtml : Must specify a
non-null stream to which to save")
End If
Dim content As String = SaveHtml()
Dim writer As New StreamWriter(stream, Encoding.UTF8)
writer.Write(content)
writer.Flush()
End Sub 'SaveHtml
Any Help or redirection will be appreciated
regard's
Husam