子MultiRow怎么覆盖父MultiRow的事件？

在父MultiRow里面写了一个共通事件，
Protected Overrides Sub OnEditingControlShowing(ByVal e As GrapeCity.Win.MultiRow.EditingControlShowingEventArgs)
        MyBase.OnEditingControlShowing(e)
        e.CellStyle.BackColor = Color.White
        e.CellStyle.ForeColor = Color.Black
    End Sub

在Form里面添加这个MultiRow(TestMultirow1)后，因为这个Form比较特殊，所以颜色不希望是设置过的颜色。于是写了
Private Sub TestMultirow1_EditingControlShowing(ByVal sender As System.Object, ByVal e As GrapeCity.Win.MultiRow.EditingControlShowingEventArgs) Handles TestMultirow1.EditingControlShowing
        e.CellStyle.BackColor = Color.FromArgb(128, 128, 128)
        e.CellStyle.ForeColor = Color.White
    End Sub
结果发现，写的方法没有覆盖父MultiRow的这个事件，还是又走了一遍。

我不确定e里面是不是有个Cancel或者Handle的属性。
如果有， 你可以试试用它来解决。

没有的

原因是因为EditingControlShowing事件是在 MyBase.OnEditingControlShowing(e)这个方法中发出的。所以你在EditingControlShowing事件中改成灰色和白色之后， 在 OnEditingControlShowing方法中又被改成黑色和白色了。 所以没有效果。


解决方法是，给你自定义的MultiRow 添加一个事件，名字叫做： AfterEditingControlShowing， 这个事件在OnEditingControlShowing方法的最后一句发出。  然后在form中，处理AfterEditingControlShowing事件，在这个事件中把颜色改成灰色和白色。

相关代码如下：

第一步，给Multirow添加AfterEditingControlShowing事件，并发出这个事件：

1. 
   
2.     Protected Overrides Sub OnEditingControlShowing(ByVal e As EditingControlShowingEventArgs)
   
3.         MyBase.OnEditingControlShowing(e)
   
4.         e.CellStyle.BackColor = Color.White
   
5.         e.CellStyle.ForeColor = Color.Black
   
6.         Me.OnAfterEditingControlShowing(e)
   
7.     End Sub
   
8. 
   
9. 
   
10. Protected Sub OnAfterEditingControlShowing(e As EditingControlShowingEventArgs)
    
11.         RaiseEvent AfterEditingControlShowing(Me, e)
    
12. End Sub
    
13. 
    
14. Public Event AfterEditingControlShowing As EventHandler(Of EditingControlShowingEventArgs)
    

复制代码

第二步，在form中处理AfterEditingControlShowing事件，并在事件中设成你想要的颜色。

1. 
   
2. Private Sub myMR1_AfterEditingControlShowing(ByVal sender As Object, ByVal e As EditingControlShowingEventArgs)
   
3.     e.CellStyle.BackColor = Color.FromArgb(&H80, &H80, &H80)
   
4.     e.CellStyle.ForeColor = Color.White
   
5. End Sub
   
6. 
   

复制代码

Me.AfterEditingControlShowing 没有这个属性哦

恩  现在加上了
:Z 刚才忘贴上来了。

不对把？定义了Event，只能用raiseevent来执行，现在就直接出ERROR了

再试试

呵呵，不行的啊

已经改成raiseevent啊，为什么还不行？