Imports System
Imports System.Windows
Imports System.Windows. Input
Imports System.Windows. Controls
Imports System.Windows. Media
Imports System.Windows. Media.Imaging
Namespace SDKSample
Partial Public Class TextBoxBackgrou ndExample
Inherits Page
Private Sub OnTextBoxTextCh anged(ByVal sender As Object, ByVal e As
TextChangedEven tArgs)
If myTextBox.Text = "" Then
' Create an ImageBrush.
Dim textImageBrush As New ImageBrush()
textImageBrush. ImageSource = New BitmapImage(New
Uri("TextBoxBac kground.gif", UriKind.Relativ e))
textImageBrush. AlignmentX = AlignmentX.Left
textImageBrush. Stretch = Stretch.None
' Use the brush to paint the button's background.
myTextBox.Backg round = textImageBrush
Else
myTextBox.Backg round = Nothing
End If
End Sub
End Class
End Namespace
"Kulber" <Ku****@discuss ions.microsoft. comwrote in message
news:43******** *************** ***********@mic rosoft.com...
Hello.
Do you know how to convert this code to VB.NET?
Thank you.
http://msdn.microsoft.com/es-es/library/bb613590.aspx