From C to VB

  • Thread starter Thread starter Kulber
  • Start date Start date
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 TextBoxBackgroundExample
Inherits Page

Private Sub OnTextBoxTextChanged(ByVal sender As Object, ByVal e As
TextChangedEventArgs)

If myTextBox.Text = "" Then
' Create an ImageBrush.
Dim textImageBrush As New ImageBrush()
textImageBrush.ImageSource = New BitmapImage(New
Uri("TextBoxBackground.gif", UriKind.Relative))
textImageBrush.AlignmentX = AlignmentX.Left
textImageBrush.Stretch = Stretch.None
' Use the brush to paint the button's background.
myTextBox.Background = textImageBrush

Else

myTextBox.Background = Nothing
End If

End Sub

End Class

End Namespace
 
Thank you very much, I will prove it and will tell you if it works.

Now I have to verify how there is inserted the code of the example that it
puts " <Page ... ".
 
Back
Top