代码
Dim obj As object = basemainform.controls("C1Ribbon1")obj.AllowMinimize = Trueobj.Minimized = True
加好友 
发短信
Post By：2014/7/22 14:30:00 [显示全部帖子]
