XAML Vs. VB.NET

В этой главе мы напишем тот же пример в VB.Net, чтобы те, кто знаком с VB.Net, могли также понять преимущества XAML.

Давайте снова посмотрим на тот же пример, который написан на XAML —

<Window x:Class = "XAMLVsCode.MainWindow" 
   xmlns = "http://schemas.microsoft.com/winfx/2006/xaml/presentation" 
   xmlns:x = "http://schemas.microsoft.com/winfx/2006/xaml" Title = "MainWindow" Height = "350" Width = "604"> 
	
   <StackPanel> 
      <TextBlock Text = "Welcome to XAML Tutorial with VB.net" Height = "20" Width = "220" Margin = "5"/> 
      <Button Content = "Ok" Height = "20" Width = "60" Margin = "5"/> 
   </StackPanel> 
	
</Window> 

В этом примере мы создали панель стека с кнопкой и текстовым блоком и определили некоторые свойства кнопки и текстового блока, такие как Высота, Ширина и Поля. Когда приведенный выше код скомпилирован и выполнен, он выдаст следующий вывод:

Теперь посмотрите на тот же код, который написан на VB.Net —

Public Class MainWindow
   Private Sub Window_Loaded(sender As Object, e As RoutedEventArgs) 
      Dim panel As New StackPanel() 
      panel.Orientation = Orientation.Vertical 
      Me.Content = panel 
      Dim txtInput As New TextBlock 
		
      txtInput.Text = "Welcome to XAML Tutorial with VB.net" 
      txtInput.Width = 220 
      txtInput.Height = 20 
      txtInput.Margin = New Thickness(5) 
		
      panel.Children.Add(txtInput)  
      Dim btn As New Button()
		
      btn.Content = "Ok" 
      btn.Width = 60 
      btn.Height = 20 
      btn.Margin = New Thickness(5) 
		
      panel.Children.Add(btn)
   End Sub 
End Class 

Когда приведенный выше код скомпилирован и выполнен, выходные данные в точности совпадают с выходными данными кода XAML.

Теперь вы можете визуализировать, насколько просто работать с XAML по сравнению с VB.Net.

В приведенном выше примере мы видели, что то, что мы можем сделать в XAML, может быть сделано и на других процедурных языках, таких как C # и VB.Net.

Давайте посмотрим на другой пример, в котором мы будем использовать как XAML, так и VB.Net. Мы разработаем графический интерфейс в XAML, а поведение будет реализовано в VB.Net.

В этом примере кнопка добавляется в главное окно. Когда пользователь нажимает эту кнопку, он отображает сообщение в окне сообщения. Вот код в XAML, в котором объект Button объявлен с некоторыми свойствами.

<Window x:Class="MainWindow" 
   xmlns = "http://schemas.microsoft.com/winfx/2006/xaml/presentation" 
   xmlns:x = "http://schemas.microsoft.com/winfx/2006/xaml" Title = "MainWindow" Height = "350" Width = "604"> 
	
   <Grid> 
      <Button Name = "btn" HorizontalAlignment = "Center" Width = "60" Height = "30" Content = "Click Me" /> 
   </Grid> 
	
</Window> 

В VB.Net реализовано событие нажатия кнопки (поведение). Это событие отображает сообщение в окне сообщения.

Public Class MainWindow
   Private Sub btn_Click(sender As Object, e As RoutedEventArgs) Handles btn.Click 
      MessageBox.Show("Button is Clicked") 
   End Sub 
End Class 

Когда приведенный выше код скомпилирован и выполнен, он отобразит следующий экран —

Теперь нажмите на кнопку выше, которая говорит «Нажмите меня». Появится следующее сообщение —