📅  最后修改于: 2020-11-18 10:30:32             🧑  作者: Mango
在本章中,我们将在VB.Net中编写相同的示例,以便熟悉VB.Net的人也可以了解XAML的优点。
让我们再次看一下用XAML编写的相同示例-
在此示例中,我们创建了一个带有按钮和文本块的堆栈面板,并定义了按钮和文本块的某些属性,例如高度,宽度和边距。编译并执行上述代码后,将产生以下输出-
现在看看用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代码的输出完全相同。
现在,您可以想象与VB.Net相比,使用XAML多么简单。
在上面的示例中,我们已经看到,在XAML中可以执行的操作也可以在其他过程语言(例如C#和VB.Net)中完成。
让我们看看另一个将同时使用XAML和VB.Net的示例。我们将在XAML中设计一个GUI,并且行为将在VB.Net中实现。
在此示例中,按钮添加到了主窗口。当用户单击此按钮时,它将在消息框中显示一条消息。这是XAML中的代码,其中声明了一些属性的Button对象。
在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
编译并执行上述代码后,将显示以下屏幕-
现在,单击上面的按钮,显示“ Click Me”。它将显示以下消息-