Imports Infragistics.Shared
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinGrid
Private Sub Button3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button3.Click
' Make the addnew box visible.
Me.UltraGrid1.DisplayLayout.AddNewBox.Hidden = False
' Change the prompt on the add new box.
Me.UltraGrid1.DisplayLayout.AddNewBox.Prompt = "Add a new row"
' Make the add new box compact to save space.
Me.UltraGrid1.DisplayLayout.AddNewBox.Style = AddNewBoxStyle.Compact
' Set the back color of the add new box area and set the border style to etched.
Me.UltraGrid1.DisplayLayout.AddNewBox.Appearance.BackColor = Color.White
Me.UltraGrid1.DisplayLayout.AddNewBox.BorderStyle = UIElementBorderStyle.Etched
' Configure the way button connectors look
Me.UltraGrid1.DisplayLayout.AddNewBox.ButtonConnectorStyle = UIElementBorderStyle.Etched
Me.UltraGrid1.DisplayLayout.AddNewBox.ButtonConnectorColor = Color.Red
' Configure the way buttons look.
' Set the buttons' style to PopupSoft and set the appearance of the buttons.
Me.UltraGrid1.DisplayLayout.AddNewBox.ButtonStyle = UIElementButtonStyle.PopupSoft
Me.UltraGrid1.DisplayLayout.AddNewBox.ButtonAppearance.BackColor = Color.SkyBlue
Me.UltraGrid1.DisplayLayout.AddNewBox.ButtonAppearance.BackColor2 = Color.Blue
Me.UltraGrid1.DisplayLayout.AddNewBox.ButtonAppearance.BackGradientStyle = GradientStyle.Horizontal
' You can also customize the caption of the buttons that show up in the add-new-box.
' Each band has a button in the add-new-box. You can change the caption of these
' buttons by setting the AddButtonCaption property off the bands. You can also set
' the tool-tip text for those buttons as well by setting AddButtonToolTipText property.
Me.UltraGrid1.DisplayLayout.Bands("Customers").AddButtonCaption = "New Customer"
Me.UltraGrid1.DisplayLayout.Bands("Customers").AddButtonToolTipText = "Click to add a new Customers record."
End Sub