首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > VB Dotnet >

100分,求winform中 用AdjustCellBorderStyle 控制单元格边框有关问题

2012-10-13 
100分,求winform中 用AdjustCellBorderStyle 控制单元格边框问题!如下代码控制单元格,让一个边 没有边框,

100分,求winform中 用AdjustCellBorderStyle 控制单元格边框问题!
如下代码控制单元格,让一个边 没有边框,怎么不好用啊,大家帮帮忙!

  Dim newStyle As New DataGridViewAdvancedBorderStyle()
  With newStyle
  .Top = DataGridViewAdvancedCellBorderStyle.OutsetDouble
  .Left = DataGridViewAdvancedCellBorderStyle.OutsetDouble
  .Bottom = DataGridViewAdvancedCellBorderStyle.OutsetDouble
  .Right = DataGridViewAdvancedCellBorderStyle.None
  End With

  Dim newStyle1 As New DataGridViewAdvancedBorderStyle()
  With newStyle
  .Top = DataGridViewAdvancedCellBorderStyle.OutsetDouble
  .Left = DataGridViewAdvancedCellBorderStyle.None
  .Bottom = DataGridViewAdvancedCellBorderStyle.OutsetDouble
  .Right = DataGridViewAdvancedCellBorderStyle.OutsetDouble
  End With

  Me.DataGridView1.Rows(1).Cells(1).AdjustCellBorderStyle(newStyle, newStyle, False, False, False, False)
  Me.DataGridView1.Rows(1).Cells(2).AdjustCellBorderStyle(newStyle1, newStyle1, False, False, False, False)

[解决办法]
up
[解决办法]
帮你顶
[解决办法]

VB.NET code
Public Class GridViewCustomCell    Inherits DataGridViewTextBoxCell    Private lisSigTopLine As Boolean = False                      Private lisSigButtomLine As Boolean = False                            Public Sub New( _        ByVal isSigTopLine_In As Boolean, _        ByVal isSigButtomLine_In As Boolean)        lisSigTopLine = isSigTopLine_In        lisSigButtomLine = isSigButtomLine_In    End Sub    Public Overrides Function AdjustCellBorderStyle( _        ByVal borderStyleInput_In As DataGridViewAdvancedBorderStyle, _        ByVal borderStylePlaceHolder_In As DataGridViewAdvancedBorderStyle, _        ByVal verticalBorderAdded_In As Boolean, _        ByVal horizontalBorderAdded_In As Boolean, _        ByVal firstVisibleColumn_In As Boolean, _        ByVal firstVisibleRow_In As Boolean _        ) As DataGridViewAdvancedBorderStyle        borderStylePlaceHolder_In.Left = DataGridViewAdvancedCellBorderStyle.None        borderStylePlaceHolder_In.Right = borderStyleInput_In.Right        If lisSigTopLine = True Then            borderStylePlaceHolder_In.Top = _                borderStyleInput_In.Top        Else            borderStylePlaceHolder_In.Top = _                DataGridViewAdvancedCellBorderStyle.None        End If        If lisSigButtomLine = True Then            borderStylePlaceHolder_In.Bottom = _                borderStyleInput_In.Bottom        Else            borderStylePlaceHolder_In.Bottom = _                DataGridViewAdvancedCellBorderStyle.None        End If        Return borderStylePlaceHolder_In    End FunctionEnd Class
[解决办法]
唔唔~我面临你一样的问题!好像AdjustCellBorderStyle也只是对整列进行边框设置!!!~~~~
[解决办法]
请给出 具体 实现代码,谢谢啦

热点排行