vba代码怎么转VB

Question

Public Function ButtonEffectInit(Form As Form, Optional FontHeight As Integer = 255, _
                                 Optional ButtonFlag As String = "Xp", _
                                 Optional MenuFlag As String = "XpMenu") '   Form.Section(acDetail).OnMouseMove = "=BtnMouseMoveEffect()"     '这里
 '   Form.Section(acHeader).OnMouseMove = "=BtnMouseMoveEffect()"
 '   Form.Section(acFooter).OnMouseMove = "=BtnMouseMoveEffect()"
 '   If TypeOf ctl.Parent Is Page Or ctl.Parent.Name = Form.Name Then   '这里上面的注释的代码请问怎么转成VB的？

Answer 1

VBA作为VB的子集，本身就使用了VB语法，还要怎么转啊。

Answer 2

添加对Office的引用，创建对应的对象。
别的一样。