AnchorStyles.Right : AnchorStyles « System.Windows.Forms « VB.Net by API






AnchorStyles.Right

  
imports System
imports System.Drawing
imports System.Windows.Forms

public class ControlAnchorLeftRight : inherits Form
  public sub New()
    Size = new Size(350,400)

    dim xButtonSize as integer = 120

    dim xMargin, yMargin  as integer
    xMargin = Font.Height * 2
    yMargin = Font.Height * 2

    dim btn as new Button()
    btn.Parent = me
    btn.Text = "Upper Left"
    
    btn.Size = new Size(xButtonSize, 26)
    btn.Location = new Point(xMargin, yMargin)

    btn = new Button()
    btn.Parent = me
    btn.Text = "Middle Span"
    btn.Size = new Size(xButtonSize, 26)
    btn.Location = new Point(xMargin,Cint(me.ClientSize.Height / 2) - 26)
    btn.Anchor = AnchorStyles.Left Or AnchorStyles.Right
  end sub

  public shared sub Main() 
    Application.Run(new ControlAnchorLeftRight())
  end sub
end class

   
    
  








Related examples in the same category

1.AnchorStyles.Bottom
2.AnchorStyles.Left
3.AnchorStyles.Top