㈠ 怎么改变画出矩形的颜色
不是已经给你解释为什么会花 还不懂吗？
Dim x1 As Single, y1 As Single
Dim x2 As Single, y2 As Single
Dim dr As Boolean
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Not dr Then
x1 = X: y1 = Y
x2 = X: y2 = Y
dr = True
Me.FillColor = QBColor(Int(Rnd * 15))
Me.FillStyle = 0
End If
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If dr Then
DrawStyle = 2
DrawMode = vbInvert
Line (x1, y1)-(x2, y2), , B
Line (x1, y1)-(X, Y), , B
x2 = X: y2 = Y
End If
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If dr Then
DrawStyle = 0
DrawMode = vbCopyPen
Line (x1, y1)-(x2, y2), , B
dr = False
End If
End Sub
'Line (x1, y1)-(x2, y2), , B
Line (x1, y1)-(X, Y), , B
x2 = X: y2 = Y
x2,y2记录着鼠标前一个移动的位置（初始值为鼠标按下的那个点） x，y是本次移动的位置 因为你有设置DrawMode 而边线（line没设置颜色默认为黑)和矩形外观颜色的差异就会导致你所谓的花。你试试将 DrawMode=VbBlackness 往同个方向拉一个矩形 不管你删掉那2条line中其中一条也不会花
㈡ Word中对如何一块矩形区域设置颜色如下图
这个可以，但是选定区域必须是完整的段落。Word2007中方法：拉黑选中某几个段落——开始——段落——边框和底纹——边框和底纹——底纹——填充：选择颜色——应用于：段落——确定即可。
㈢ cad如何填充一个矩形为红色
1、这里我画了一个矩形来示例，在矩形的里面填充颜色，要注意矩形必须是封闭的，四周不得有缺口，否则是无法填充的。
㈣ Ps画矩形怎么填充颜色
如下：
1、点击矩形，设置颜色，之后直接在画布上画出形状即可。
㈤ 在word中如何把插入的矩形设置填充颜色为孔雀开屏渐变效果
孔雀开屏填充效果在“预设”中，下面用Word 2007演示给矩形设置孔雀开屏填充效果的操作流程：
一、右键点击矩形，右键菜单中点击“设置自选图形格式”。
㈥ ps 怎么改变矩形工具画出的颜色啊
备用材料：ps软件，电脑。
1、打开ps软件。
㈦ photoshop中怎么调矩形的填充颜色
Photoshop软件画矩形填充颜色的具体方法（CS6）：
点击左侧的【矩形工具】即可进入编辑状态，在上方可以看到“填充”和“描边”，点击就可以设置填充样式以及填充颜色。
填充样式有：无填充、纯色填充、渐变填充和图案填充。
效果图：
㈧ PS中怎么把矩形工具画出来的形状更改颜色中
PS中把矩形工具画出来的形状更改颜色可以使用油漆桶更改。
具体操作方法如下：
1、打开ps软件。