Sub HandleClick(menuName As String, itemNum As Integer, strItemText As String)
If strItemText = "打开xml文件" Then
open.show
End If
End Sub
为什么会出现少as,请问我如何写才能实现。
...全文
282打赏收藏
请问在类中打开一个窗口,怎么不行了?请问有别的办法吗?代码如下:
Sub HandleClick(menuName As String, itemNum As Integer, strItemText As String) If strItemText = "打开xml文件" Then open.show End If End Sub 为什么会出现少as,请问我如何写才能实现。
你的问题问的不细,为什么要在类中操作窗口呢?这种办法本身就不好。
你非要这么做,那就如下声明,试一试:
Sub HandleClick(ByRef frmOpen As Form, ByRef menuName As String, ByRef itemNum As Integer, ByRef strItemText As String)
If strItemText = "打开xml文件" Then
frmOpen.Show
End If
End Sub
千万注意不要把open做变量名!!!