Mega Code Archive

 

Categories / VB.Net Tutorial / WPF

 

Reference SystemParameters

<Window x: Class="Windows.CenterScreen"     xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"     xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"     Title="CenterScreen" Height="300" Width="300"     >   <Button Margin="15" Click="cmdCenter_Click">Center Me</Button> </Window> //File:Window.xaml.vb Imports System Imports System.Collections.Generic Imports System.Text Imports System.Windows Imports System.Windows.Controls Imports System.Windows.Data Imports System.Windows.Documents Imports System.Windows.Input Imports System.Windows.Media Imports System.Windows.Media.Imaging Imports System.Windows.Shapes Imports System.ComponentModel Namespace Windows   Public Partial Class CenterScreen     Inherits System.Windows.Window     Public Sub New()       InitializeComponent()     End Sub     Private Sub cmdCenter_Click(sender As Object, e As RoutedEventArgs)       Dim height As Double = SystemParameters.WorkArea.Height       Dim width As Double = SystemParameters.WorkArea.Width       Me.Top = (height - Me.Height) / 2       Me.Left = (width - Me.Width) / 2     End Sub   End Class End Namespace