當前位置: 首頁>>代碼示例>>VB.NET>>正文


VB.NET Cursors.Help屬性代碼示例

本文整理匯總了VB.NET中System.Windows.Forms.Cursors.Help屬性的典型用法代碼示例。如果您正苦於以下問題:VB.NET Cursors.Help屬性的具體用法?VB.NET Cursors.Help怎麽用?VB.NET Cursors.Help使用的例子?那麽, 這裏精選的屬性代碼示例或許可以為您提供幫助。您也可以進一步了解該屬性所在System.Windows.Forms.Cursors的用法示例。


在下文中一共展示了Cursors.Help屬性的1個代碼示例,這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚,您的評價將有助於係統推薦出更棒的VB.NET代碼示例。

示例1: InitializeRadioButtonsAndGroupBox

Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents RadioButton1 As System.Windows.Forms.RadioButton
Friend WithEvents RadioButton2 As System.Windows.Forms.RadioButton
Friend WithEvents RadioButton3 As System.Windows.Forms.RadioButton

Private Sub InitializeRadioButtonsAndGroupBox()

    ' Construct the GroupBox object.
    Me.GroupBox1 = New GroupBox

    ' Construct the radio buttons.
    Me.RadioButton1 = New System.Windows.Forms.RadioButton
    Me.RadioButton2 = New System.Windows.Forms.RadioButton
    Me.RadioButton3 = New System.Windows.Forms.RadioButton

    ' Set the location, tab and text for each radio button
    ' to a cursor from the Cursors enumeration.
    Me.RadioButton1.Location = New System.Drawing.Point(24, 24)
    Me.RadioButton1.TabIndex = 0
    Me.RadioButton1.Text = "Help"
    Me.RadioButton1.Tag = Cursors.Help
    Me.RadioButton1.TextAlign = ContentAlignment.MiddleCenter

    Me.RadioButton2.Location = New System.Drawing.Point(24, 56)
    Me.RadioButton2.TabIndex = 1
    Me.RadioButton2.Text = "Up Arrow"
    Me.RadioButton2.Tag = Cursors.UpArrow
    Me.RadioButton2.TextAlign = ContentAlignment.MiddleCenter

    Me.RadioButton3.Location = New System.Drawing.Point(24, 80)
    Me.RadioButton3.TabIndex = 3
    Me.RadioButton3.Text = "Cross"
    Me.RadioButton3.Tag = Cursors.Cross
    Me.RadioButton3.TextAlign = ContentAlignment.MiddleCenter

    ' Add the radio buttons to the GroupBox.  
    Me.GroupBox1.Controls.Add(Me.RadioButton1)
    Me.GroupBox1.Controls.Add(Me.RadioButton2)
    Me.GroupBox1.Controls.Add(Me.RadioButton3)

    ' Set the location of the GroupBox. 
    Me.GroupBox1.Location = New System.Drawing.Point(56, 64)
    Me.GroupBox1.Size = New System.Drawing.Size(200, 150)

    ' Set the text that will appear on the GroupBox.
    Me.GroupBox1.Text = "Choose a Cursor Style"
    '
    ' Add the GroupBox to the form.
    Me.Controls.Add(Me.GroupBox1)
    '

End Sub
開發者ID:VB.NET開發者,項目名稱:System.Windows.Forms,代碼行數:52,代碼來源:Cursors.Help


注:本文中的System.Windows.Forms.Cursors.Help屬性示例由純淨天空整理自Github/MSDocs等開源代碼及文檔管理平台,相關代碼片段篩選自各路編程大神貢獻的開源項目,源碼版權歸原作者所有,傳播和使用請參考對應項目的License;未經允許,請勿轉載。