㈠ 怎麼改變畫出矩形的顏色
不是已經給你解釋為什麼會花 還不懂嗎？
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軟體。