摘要: 1.將菜单栏上按钮如帮助等需要屏蔽掉 Declare Function GetActiveWindow& Lib "User32"() Declare Function SetMenu% Lib "User32"(Byval win&,Byval y&) Sub Click(Source As Button) LotusWin=GetActiveWindow() Call SetMenu(... 阅读全文
posted @ 2005-02-16 08:38 James Wong 阅读(947) 评论(1) 推荐(0) 编辑