|
Dim p As Pen = New Pen(Color.Yellow, 2) g.DrawLine(p, 1, 1, 1, Height - 2) g.DrawLine(p, 1, 1, Width - 2, 1) g.DrawLine(p, Width - 1, 2, Width - 1, Height - 2) g.DrawLine(p, 2, Height - 1, Width - 2, Height - 1)
ElseIf (state = 3) Then ''''绘制按下的显示边框 ''''与一般边框用高光区别的是显示暗褐色 Dim p As Pen = New Pen(SystemColors.ControlDark, 2) g.DrawLine(p, 1, 1, 1, Height - 2) g.DrawLine(p, 1, 1, Width - 2, 1) g.DrawLine(p, Width - 1, 2, Width - 1, Height - 2) g.DrawLine(p, 2, Height - 1, Width - 2, Height - 1)
ElseIf (state = 4) Then ''''绘制不可用状态边框 ''''与一般边框用高光区别的是显示亮色 Dim p As Pen = New Pen(SystemColors.ControlLight, 2) 上一页 [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文件系统的反删除方法
|