主题：自定义函数求助

想自定义一函数应用在DrawCell事件中:

Functions.Execute("函数1",e.Table,e.Row,e.Col,e.Style,e.Text,e.X,e.Y,e.Width,e.Height,e.Graphics)


Dim g As Graphics = Args(9)
if Args(2).Name = "第一列" Then
    Dim Msg as String = Args(1)("第一列")
    Dim fnt As New Font("宋体",9)
    e.StartDraw()  '这行该怎么写?
    g.FillRectangle(Brushes.White,Args(5) ,Args(6) , Args(7), Args(8))
    g.DrawString(msg,fnt,Brushes.Blue,Args(5) + 2, Args(6) + 2)
    e.EndDraw()   '这行该怎么写?
end if