vb程序設(shè)計(jì)第8章圖形程序設(shè)計(jì)-文庫吧資料
2025-01-18 20:42本頁面
【正文】 析下面代碼，然后上機(jī)驗(yàn)證代碼所產(chǎn)生的效果。 提示：在窗體上添加圖片框（ picture1），設(shè)置合適的字體， AutoRedraw屬性設(shè)置為“ true” 。繪制 y軸 CurrentX = 2 * pi CurrentY = (Sin(CurrentX) + Cos(2 * CurrentX)) / 2 For i = 2 * pi To 2 * pi Step 39。建立新坐標(biāo)系 (2 * pi, 0)(2 * pi, 0) 39。 圖 86 參考代碼： 利用點(diǎn)實(shí)現(xiàn) Private Sub Form_Paint() Dim i As Single, pi As Double pi = 4 * Atn(1) (2 * pi, 1)(2 * pi, 1) (2 * pi, 0)(2 * pi, 0) (0, 1)(0, 1) For i = 2 * pi To 2 * pi Step (i, (Sin(i) + Cos(2 * i)) / 2) Next i End Sub 利用小線段實(shí)現(xiàn) Private Sub Form_Paint() Dim i As Single, pi As Double pi = 4 * Atn(1) 39。畫同心圓 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。 提示：在窗體上添加圖片框（ picture1）、兩個(gè)命令按鈕（ mand1和 mand2），命令按鈕的 Caption屬性分別設(shè)置為“同心圓”和“同心矩形”。 圖 82 參考代碼： Private Sub Form_Click() Dim i As Integer For i = 1 To 100 Randomize CurrentX = Rnd() * CurrentY = Rnd() * (0, 0) Next i End Sub 【 實(shí)訓(xùn) 】 在窗體上畫出螺旋線，如圖 83所示。兩個(gè)小球相向而行 Private Sub Timer1_Timer() If + + 400 Then = 200 = + 200 Else = True = False End If End Sub 39。 Line1的 BorderWidth屬性設(shè)置為 2， Shape1的 FillColor和 BorderColor屬性設(shè)置為黑色，Shape1的 FillColor和 BorderColor屬性設(shè)置為白色，timer1和 timer2的 Interval屬性設(shè)置為 100。程序運(yùn)行白球和黑球分別向右和左運(yùn)動(dòng)，當(dāng)兩球相撞后，分別向相反方向運(yùn)動(dòng)，如圖 81所示。 ☆ 掌握利用 PaintPicture方法實(shí)現(xiàn)像素操作的方法。 ☆ 掌握利用 Circle方法在窗體或圖片框上繪制圓、橢圓或弧等圖形的技巧。 ☆ 掌握直線和形狀控件的使用方法。目標(biāo)圖形的大小，可以通過目標(biāo)圖形與源圖像大小的比例而得，即如果目標(biāo)圖形比源圖形大，就可得到放大的圖形。 PaintPicture方法常常用來從一個(gè)窗體或圖片框控件中向另一個(gè)對(duì)象復(fù)制一個(gè)矩形區(qū)域的像素。（使用方法略） 怎樣通過 PaintPicture方法實(shí)現(xiàn)像素操作。 說出 Pset方法和 Point方法的基本功能和使用方法。 熟悉利用 Circle畫圖的方法，說出下面幾個(gè)語句的含義（ pi = ）。分別用來在窗體或圖片框上畫直線和矩形、正方形、橢圓、圓、圓角矩形及圓角正方形 熟悉利用 Line畫圖的方法，說出下面幾個(gè)語句的含義。一種是通過修改 ScaleTop、 ScaleLeft、 ScaleWidth和 ScaleHeight的屬性值建立坐標(biāo)系；另一種是使用 Scale方法來設(shè)置坐標(biāo)系。 第 8章 圖形程序設(shè)計(jì) 知識(shí)要點(diǎn) 習(xí)題與解答 實(shí)訓(xùn)指導(dǎo) 測(cè)驗(yàn)題 描述 VB缺省的坐標(biāo)系，用戶自定義坐標(biāo)系的方法有哪些？ 答案：缺省情況下，坐標(biāo)系的坐標(biāo)原點(diǎn)在對(duì)象的左上角，橫向向右為 X軸的正方向，縱向向下為 Y軸的正方向。 x2,y2指定 picture內(nèi)剪貼區(qū)的位置，即傳送圖形矩形的左上角坐標(biāo)。 x1,y1指定在對(duì)象上繪制 picture的目標(biāo)坐標(biāo)，即目標(biāo)矩形區(qū)域的左上角坐標(biāo)，它可以是目標(biāo)控件的任意位置。 PaintPicture方法的語法格式如下： [對(duì)象 .] PaintPicture picture,x1,y1,width1,height1,x2,y2,width2,height2,opcode 其中： 對(duì)象為調(diào)用該方法的對(duì)象名稱，通常是目標(biāo)圖形對(duì)象。它的語法格式如下： [對(duì)象 .]Point (x ,y ) 其中：對(duì)象和 (x ,y )的用法和 Pset方法相同。 Color用來指定點(diǎn)的顏色。它的語法格式如下： [對(duì)象 .]Pset [Step] (x ,y ) [,color] 其中： 對(duì)象是調(diào)用 Pset方法的對(duì)象名稱。 aspect是所畫圓的縱橫尺寸比。 Color為所畫圖形的顏色。 (x ,y )用來指定圓心坐標(biāo)。 （ 2） Circle方法 Circle方法的基本功能是在窗體或圖片框上繪制圓、橢圓、弧或扇形。 Line方法的語法格式為： [對(duì)象 .] Line [[Step](x1,y1)][Step](x2,y2)[,顏色 ][,B][ F] 其中： 對(duì)象可以是窗體或圖片框，缺省為窗體。 （ 1） Line方法 Line方法的基本功能是在窗體或圖片框上畫直線和矩形。 （
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1