VB.NET DataGridTableStyle.GridLineStyleChanged事件代码示例

OStack程序员社区-中国程序员成长平台 › 门户 › 编程› VB.NET›VB.NET教程

原作者: [db:作者] 来自: [db:来源] 收藏邀请

本文整理汇总了VB.NET中System.Windows.Forms.DataGridTableStyle.GridLineStyleChanged事件的典型用法代码示例。如果您正苦于以下问题：VB.NET DataGridTableStyle.GridLineStyleChanged事件的具体用法？VB.NET DataGridTableStyle.GridLineStyleChanged怎么用？VB.NET DataGridTableStyle.GridLineStyleChanged使用的例子？那么恭喜您, 这里精选的事件代码示例或许可以为您提供帮助。您也可以进一步了解该事件所在类System.Windows.Forms.DataGridTableStyle的用法示例。

在下文中一共展示了DataGridTableStyle.GridLineStyleChanged事件的1个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于我们的系统推荐出更棒的VB.NET代码示例。

示例1: AddCustomDataTableStyle

Private Sub AddCustomDataTableStyle()
   myDataGridTableStyle1 = New DataGridTableStyle()
   AddHandler myDataGridTableStyle1.MappingNameChanged, AddressOf MappingNameChanged_Handler
   AddHandler myDataGridTableStyle1.GridLineStyleChanged, AddressOf GridLineStyleChanged_Handler
   myDataGridTableStyle1.MappingName = "Customers"

   ' Set other properties.
   myDataGridTableStyle1.AlternatingBackColor = Color.LightGray
   myDataGridTableStyle1.GridLineStyle = System.Windows.Forms.DataGridLineStyle.None

   ' Add a GridColumnStyle and set its MappingName.
   Dim myBoolCol = New DataGridBoolColumn()
   myBoolCol.MappingName = "Current"
   myBoolCol.HeaderText = "IsCurrent Customer"
   myBoolCol.Width = 150
   myDataGridTableStyle1.GridColumnStyles.Add(myBoolCol)

   ' Add a second column style.
   Dim myTextCol = New DataGridTextBoxColumn()
   myTextCol.MappingName = "custName"
   myTextCol.HeaderText = "Customer Name"
   myTextCol.Width = 250
   myDataGridTableStyle1.GridColumnStyles.Add(myTextCol)

   ' Create new ColumnStyle objects.
   Dim cOrderDate = New DataGridTextBoxColumn()
   cOrderDate.MappingName = "OrderDate"
   cOrderDate.HeaderText = "Order Date"
   cOrderDate.Width = 100

   ' Use PropertyDescriptor to create a formatted column.
   Dim myPropertyDescriptorCollection As PropertyDescriptorCollection = _
               Me.BindingContext(myDataSet, "Customers.custToOrders").GetItemProperties()
   Dim csOrderAmount = New DataGridTextBoxColumn _
            (myPropertyDescriptorCollection("OrderAmount"), "c", True)
   csOrderAmount.MappingName = "OrderAmount"
   csOrderAmount.HeaderText = "Total"
   csOrderAmount.Width = 100

   ' Add the DataGridTableStyle object to GridTableStylesCollection.
   myDataGrid.TableStyles.Add(myDataGridTableStyle1)
End Sub

Private Sub MappingNameChanged_Handler(ByVal sender As Object, ByVal e As EventArgs)
   MessageBox.Show("MappingName Changed", "DataGridTableStyle")
End Sub

Private Sub GridLineStyleChanged_Handler(ByVal sender As Object, ByVal e As EventArgs)
   MessageBox.Show("GridLineStyle  Changed", "DataGridTableStyle")
End Sub

开发者ID:VB.NET开发者，项目名称:System.Windows.Forms，代码行数:50，代码来源:DataGridTableStyle.GridLineStyleChanged

注：本文中的System.Windows.Forms.DataGridTableStyle.GridLineStyleChanged事件示例由纯净天空整理自Github/MSDocs等源码及文档管理平台，相关代码片段筛选自各路编程大神贡献的开源项目，源码版权归原作者所有，传播和使用请参考对应项目的License；未经允许，请勿转载。