VB做的T型窗体-异形窗口.rar

【文件属性】：
文件名称：VB做的T型窗体-异形窗口.rar
文件大小：142KB
文件格式：RAR
更新时间：2022-07-30 04:31:00
VB源码-窗体界面 VB制作一个异形窗口，今天分享的是一个“T型窗体”，制作的关键是把握好这种T形窗口的八个顶点，定位好是关键，以下代码或许对你制作T字形异形窗口有帮助： 　　ReDim XY(7) As POINTAPI 'T 型有八个顶点 　　With Me 　　XY(0).X = 0 　　XY(0).Y = 0 　　XY(1).X = .ScaleWidth 　　XY(1).Y = 0 　　XY(2).X = .ScaleWidth 　　XY(2).Y = .ScaleHeight / 2 　　XY(3).X = .ScaleWidth - (.ScaleWidth / 3) 　　XY(3).Y = .ScaleHeight / 2 　　XY(4).X = .ScaleWidth - (.ScaleWidth / 3) 　　XY(4).Y = .ScaleHeight 　　XY(5).X = .ScaleWidth / 3 　　XY(5).Y = .ScaleHeight 　　XY(6).X = .ScaleWidth / 3 　　XY(6).Y = .ScaleHeight / 2 　　XY(7).X = 0 　　XY(7).Y = .ScaleHeight / 2 　　End With

【文件预览】：
codesc.net
----T型窗体()
--------工程1.vbw(50B)
--------MSSCCPRJ.SCC(190B)
--------Form1.frx(360KB)
--------Form1.frm(3KB)
--------工程1.vbp(610B)