VB声明
Declare Function DrawEdge Lib "user32" Alias "DrawEdge" (ByVal hdc As Long, qrc As RECT, ByVal edge As Long, ByVal grfFlags As Long) As Long
说明
用指定的样式描绘一个矩形的边框
返回值
Long，TRUE（非零）表示成功，否则返回零。会设置GetLastError。（在vb里使用：推荐使用。利用这个函数，我们没有必要再使用许多3D边框和面板。所以就资源和内存的占用率来说，这个函数的效率要高得多。它可在一定程度上提升性能）
参数表 参数 类型及说明
hdc Long，要在其中绘图的设备场景
qrc RECT，要为其描绘边框的矩形
edge Long，带有前缀BDR_的两个常数的组合。一个指定内部边框是上凸还是下凹；另一个则指定外部边框。有时能换用带EDGE_前缀的常数,（EDGE_RAISED则画出的样子为凸起，EDGE_SUNKEN则画出的样子为凹下）
grfFlags Long，带有BF_前缀的常数的组合 注解
由于这是一个GDI函数，所以矩形坐标是逻辑坐标
其他能用的:
Private Const BDR_SUNKEN95 As Long = &HA
Private Const BDR_RAISED95 As Long = &H5
Private Const BF_LEFT As Long = &H1
Private Const BF_TOP As Long = &H2
Private Const BF_RIGHT As Long = &H4
Private Const BF_BOTTOM As Long = &H8
Private Const BF_RECT As Long = (BF_LEFT Or BF_TOP Or BF_RIGHT Or BF_BOTTOM)