Silverlight creare dinamicamente un pulsante tramite VB.Net e C#

Il frammento di codice qui di seguito, illustra come creare dinamicamente un pulsante, impostare alcune proprietà ed aggiungergli un gestore di evento.

Codice VB.Net

'Evento load della pagina

Private Sub MainPage_Loaded(ByVal sender As Object, ByVal e As System.Windows.RoutedEventArgs) Handles Me.Loaded

Dim pulsante As New Button()

pulsante.Name = "btnPulsante"

pulsante.Width = 50

pulsante.Height = 50

pulsante.Content = "Testo"

pulsante.Background = New SolidColorBrush(Colors.Red)

'aggiungo il pulsante alla pagina

LayoutRoot.Children.Add(pulsante)

'creo un gestore per l'event click del pulsante

AddHandler pulsante.Click, AddressOf pulsante_Click

End Sub

'evento click del pulsante

Private Sub pulsante_Click(ByVal sender As Object, ByVal e As EventArgs)

MessageBox.Show("Test")

End Sub

Codice C#

//Evento load della pagina

private void MainPage_Loaded(object sender, RoutedEventArgs e)

{

Button pulsante = new Button();

pulsante.Name = "btnPulsante";

pulsante.Width = 50;

pulsante.Height = 50;

pulsante.Content = "Testo";

pulsante.Background = new SolidColorBrush(Colors.Red);

//aggiungo il pulsante alla pagina

LayoutRoot.Children.Add(pulsante);

//creo un gestore per l'event click del pulsante

pulsante.Click += new RoutedEventHandler(pulsante_Click);

}

//evento click del pulsante

private void pulsante_Click(object sender, RoutedEventArgs e)

{

MessageBox.Show("Test");

}