【正文】 參考代碼： Private Sub Form_Paint() Dim i As Integer, x As Single, y As Single, h As Single x = y = h = 255 / y For i = 0 To y (0, i)(x, i), RGB(i * h, i * h, 255) Next i End Sub 讀者可以分析下面代碼，然后上機驗證代碼所產生的效果。設置秒針 Line1(SH).BorderWidth = 1 Line1(SH).X1 = 0 Line1(SH).Y1 = 0 Line1(SH).X2 = * Cos(Angle) Line1(SH).Y2 = * Sin(Angle) = Str(Date + Time()) 39。 A． Line B． Circle C． Pset D． Line和 Circle 答案： B ４．若要改變坐標系的度量單位，應通過來 修改。 A．扇形 B．橢圓弧 C．圓形 D．圓弧 答案： B 8．關于 Line方法的 B和 F參數使用方法敘述正確的是 。 B．窗體上由 Line、 Circle、 Pset方法繪制的圖形。 答案：（ 4） 150 （ 5） 200 （ 6） 350（ 7） 350 4．在下面程序的空白處填寫合適的代碼，實現(xiàn)如下功能。如圖 812所示。 圖 811 Private Sub （ 11） (100, 100)(100, 100) = 2 = vbRed （ 12） （ 13） （ 14） End Sub Private Sub Form_Resize() （ 15） End Sub 答案： (11) Form_Paint() （ 12） (100, 100)(100, 100) （ 13） (100, 100)(100, 100) （ 14） (50, 50)(50, 50), , B （ 15） Call Form_Paint １．畫出變化的月亮和滿天星。 答案：（ 1）線段終點的橫坐標 （ 2）線段終點的縱坐標 2．當我們使用 Circle方法畫弧線時，從圓弧起點到鐘點采用 （ 3） 時針方向。 A． Line、 Circle和 Pset方法 B． Line、 Circle、 Pset和 Point方法 C． Line和 Shape控件 D． Line、 Circle、 Pset方法和 Line和 Shape控件 答案： A 10．代碼“ ” 將不能清除 。 答案： C 6．通過使用 Line方法不能繪制出的圖形是 。 D． Scale方法不是設置坐標系的唯一方法。設置時針 Line1(HH).X1 = 0 Line1(HH).Y1 = 0 Line1(HH).X2 = * Cos(Angle) Line1(HH).Y2 = * Sin(Angle) Angle = * (75 (Minute(Now) + Second(Now) / 60)) 39。 提示：在窗體上添加圖片框（ picture1），設置合適的字體， AutoRedraw屬性設置為“ true” 。畫同心圓 Private Sub Command1_Click() = 同心圓 (100, 100)(100, 100) r = 10 For i = 1 To 10 (0, 0), r + 5 * i Next i End Sub 39。 Line1的 BorderWidth屬性設置為 2， Shape1的 FillColor和 BorderColor屬性設置為黑色，Shape1的 FillColor和 BorderColor屬性設置為白色，timer1和 timer2的 Interval屬性設置為 100。 ☆ 掌握直線和形狀控件的使用方法。 說出 Pset方法和 Point方法的基本功能和使用方法。 第 8章 圖形程序設計 知識要點 習題與解答 實訓指導 測驗題 描述 VB缺省的坐標系，用戶自定義坐標系的方法有哪些？ 答案：缺省情況下，坐標系的坐標原點在對象的左上角，橫向向右為 X軸的正方向，縱向向下為 Y軸的正方向。它的語法格式如下： [對象 .]Point (x ,y ) 其中：對象和 (x ,y )的用法和 Pset方法相同。 Color為所畫圖形的顏色。 （ 1） Line方法 Line方法的基本功能是在窗體或圖片框上畫直線和矩形。 ① RGB（）函數 RGB（）函數通過紅、綠、藍三種基本色的混合來生成某種顏色，其語法格式為： RGB（ red,green,blue） 其中， red、 green和 blue三個參數都是必要參數，分別表示紅、綠和藍色的顏色成分，它們的取值范圍都是 0~255間的整數。工具箱中除了標簽、直線、形狀外的控件放在最上層，標簽、直線和形狀控件放在中間層，最下層放置的是由圖形方法所繪制的圖形。 缺省情況下，坐標系的坐標原點在對象的左上角，橫向向右為 X軸的正方向，縱向向下為 Y軸的正方向。 ②使用 Scale方法來設置坐標系。 ②代碼中使用 Zorder方法。用戶可以使用圖形控件方便地完成規(guī)則幾何圖形的繪制。 (x1,y1)和 (x2,y2)分別表示線段的起始坐標和終止坐標。 （ 3） Pset與 Poin