1.VB中如何让默认的画笔画笔线段的黑色改为其他颜色?

VB中如何让默认的线段的黑色改为其他颜色?

       需要创建画笔，下面是源码android 属性动画源码个例子，注意相关的简易微信赛车 源码API函数要自己引入：

Dim hdc As Long, pen As Long

       Dim p As POINTAPI

       hdc = GetDC(0)

       pen = CreatePen(0, 1, &HFF) '三个参数分别是线条的样式（实线、虚线等）、程序微信语音 源码宽度、画笔画笔登录界面源码下载颜色

       SelectObject hdc,源码手机点餐 源码 pen '把画笔导入设备场景

       MoveToEx hdc, , , p

       LineTo hdc, , 

       DeleteObject pen '记得用完一定要删除画笔！

简易