From C to VB

[=?Utf-8?B?S3VsYmVy?=]

Hello.

Do you know how to convert this code to VB.NET?

Thank you.

http://msdn.microsoft.com/es-es/library/bb613590.aspx

[rowe_newsgroups]

On Aug 7, 2:31*pm, Kulber <[e-mail]:

Hello.

Do you know how to convert this code to VB.NET?

Thank you.

http://msdn.microsoft.com/es-es/library/bb613590.aspx

It's not that complicated of code, take your time and read through it
and you should be able to figure it out.

Thanks,

Seth Rowe [MVP]
http://sethrowe.blogspot.com/

[Gillard]

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

"Kulber" <Ku****@discussions.microsoft.comwrote in message
news:43**********************************@microsof t.com...

Hello.

Do you know how to convert this code to VB.NET?

Thank you.

http://msdn.microsoft.com/es-es/library/bb613590.aspx

[=?Utf-8?B?S3VsYmVy?=]

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 ... ".

"Gillard" wrote:

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

"Kulber" <Ku****@discussions.microsoft.comwrote in message
news:43**********************************@microsof t.com...

Hello.

Do you know how to convert this code to VB.NET?

Thank you.

http://msdn.microsoft.com/es-es/library/bb613590.aspx