本文整理汇总了VB.NET中System.Windows.Forms.DateTimePicker.DropDownAlign属性的典型用法代码示例。如果您正苦于以下问题：VB.NET DateTimePicker.DropDownAlign属性的具体用法？VB.NET DateTimePicker.DropDownAlign怎么用？VB.NET DateTimePicker.DropDownAlign使用的例子？那么, 这里精选的属性代码示例或许可以为您提供帮助。您也可以进一步了解该属性所在类System.Windows.Forms.DateTimePicker的用法示例。
在下文中一共展示了DateTimePicker.DropDownAlign属性的2个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: InitializeDateTimePicker
' Declare the DateTimePicker.
Friend WithEvents DateTimePicker1 As System.Windows.Forms.DateTimePicker
Private Sub InitializeDateTimePicker()
' Construct the DateTimePicker.
Me.DateTimePicker1 = New System.Windows.Forms.DateTimePicker
'Set size and location.
Me.DateTimePicker1.Location = New System.Drawing.Point(40, 88)
Me.DateTimePicker1.Size = New Size(160, 21)
' Set the alignment of the drop-down MonthCalendar to right.
Me.DateTimePicker1.DropDownAlign = LeftRightAlignment.Right
' Set the Value property to 50 years before today.
DateTimePicker1.Value = (DateTime.Now.AddYears(-50))
'Set a custom format containing the string "of the year"
DateTimePicker1.Format = DateTimePickerFormat.Custom
DateTimePicker1.CustomFormat = "MMM dd, 'of the year' yyyy "
' Add the DateTimePicker to the form.
Me.Controls.Add(Me.DateTimePicker1)
End Sub示例2: New
Option Strict On
imports System
imports System.Drawing
imports System.Windows.Forms
public class DTPicker : inherits Form
dim dtp as DateTimePicker
public sub New()
Size = new Size(400,300)
AddHandler me.Load, AddressOf me_Load
dtp = new DateTimePicker()
dtp.Parent = me
dtp.Location = new Point(20,20)
dtp.Size = new Size(ClientSize.Width - 40, dtp.PreferredHeight)
dtp.Anchor = AnchorStyles.Top or AnchorStyles.Left or AnchorStyles.Right
dim fnt as new Font("Times New Roman", 16)
dtp.CalendarFont = new Font(fnt, FontStyle.Bold or FontStyle.Italic)
dtp.CalendarForeColor = Color.Red
dtp.CalendarMonthBackground = Color.Yellow
dtp.CalendarTitleBackColor = Color.Lime
dtp.CalendarTitleForeColor = Color.Blue
dtp.CalendarTrailingForeColor = Color.FromArgb(255,192,192)
dtp.CustomFormat = "dddd,MMMM d, yyyy 'at' h:mm:ss tt"
dtp.Format = DateTimePickerFormat.Custom
dtp.DropDownAlign = LeftRightAlignment.Right
dtp.ShowUpDown = false ' default
AddHandler dtp.ValueChanged, AddressOf dtp_ValueChanged
end sub
public shared sub Main()
Application.Run(new DTPicker())
end sub
private sub UpdateLabels()
Console.WriteLine(dtp.Value.ToString())
Console.WriteLine(dtp.Value.ToLongDateString())
Console.WriteLine(dtp.Value.ToLongTimeString())
Console.WriteLine(dtp.Value.ToShortDateString())
Console.WriteLine(dtp.Value.ToShortTimeString())
end sub
private sub me_Load(ByVal sender as object,ByVal e as EventArgs)
UpdateLabels()
end sub
private sub dtp_ValueChanged(ByVal sender as object,ByVal e as EventArgs)
UpdateLabels()
end sub
private sub txtCustomString_TextChanged(ByVal sender as object,ByVal e as EventArgs)
UpdateLabels()
end sub
end class