一个很漂亮的VB透明窗体，而且里面写的代码非常的精致。Privatem_cNAscNeoCaptionPrivateSubSkin(fAsForm,cNAscNeoCaption)cN.ActiveCaptionColor=&HFFFFFFcN.InActiveCaptionColor=&HC0C0C0cN.ActiveMenuColor=&H0&cN.ActiveMenuColorOver=&H0cN.InActiveMenuColor=&H0&cN.MenuBackgroundColor=RG