VB6.0中ActiveBar3.0关闭右键自定义菜单
Private Sub ABar_BandOpen(ByVal Band As ActiveBar3LibraryCtl.Band, ByVal Cancel As ActiveBar3LibraryCtl.ReturnBool)
If Band.Name = "SysCustomize" Then
Band.Visible = False
DoEvents
End If
End Sub
原创
2021-09-10 16:29:33 ·
286 阅读 ·
0 评论