|
Dim p As Pen = New Pen(Color.FromArgb(161, 161, 146), 1) g.DrawLine(p, 0, 2, 0, Height - 3) ''''左侧竖线(除了两个边角剩下的线) g.DrawLine(p, 2, 0, Width - 3, 0) ''''上面横线(除了两个边角剩下的线) g.DrawLine(p, Width - 1, 2, Width - 1, Height - 3) ''''右侧竖线(除了两个边角剩下的线) g.DrawLine(p, 2, Height - 1, Width - 3, Height - 1) ''''下面的横线 g.DrawLine(p, 0, 2, 2, 0) ''''左上角 g.DrawLine(p, 0, Height - 3, 2, Height - 1) ''''左下角 g.DrawLine(p, Width - 3, 0, Width - 1, 2) ''''右上角 g.DrawLine(p, Width - 3, Height - 1, Width - 1, Height - 3) ''''右下角
Else ''''draw normal style border ''''采用默认的黑色进行绘制边角 g.DrawLine(Pens.Black, 0, 2, 0, Height - 3) g.DrawLine(Pens.Black, 2, 0, Width - 3, 0)
上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] ... 下一页 >> [办公软件]在sybase中插入图片、PDF、文本文件 [办公软件]安装Sybase ASE [办公软件]linux指令大全(完整篇) [办公软件]Linux新手入门常用命令大全 [办公软件]在RedHat Linux 9里安装gaim0.80 [办公软件]浅谈Linux 下Java 1.5 汉字方块问题解决方法 [办公软件]Linux程序员必读:中文化与GB18030标准 [办公软件]linux指令大全 [办公软件]制作Linux启动盘的四种方法 [办公软件]Linux文件系统的反删除方法
|