1.VB中如何让默认的画笔画笔线段的黑色改为其他颜色?
VB中如何让默认的线段的黑色改为其他颜色?
需要创建画笔,下面是源码区块源码计划任务脚本个例子,注意相关的简易smm源码API函数要自己引入:Dim hdc As Long, pen As LongDim p As POINTAPI
hdc = GetDC(0)
pen = CreatePen(0, 1, &HFF) '三个参数分别是线条的样式(实线、虚线等)、程序此消彼长源码宽度、画笔画笔源码实践颜色
SelectObject hdc,源码65539源码 pen '把画笔导入设备场景
MoveToEx hdc, , , p
LineTo hdc, ,
DeleteObject pen '记得用完一定要删除画笔!
简易2024-11-30 10:19
2024-11-30 09:59
2024-11-30 09:30
2024-11-30 09:21
2024-11-30 09:09
2024-11-30 08:46