第七章設(shè)計圖形和多媒體程序(編輯修改稿)
2025-01-31 09:16 本頁面
【文章內(nèi)容簡介】 Sub 最后在 Command1_Click()中添加代碼=True以啟動定時器 2。 (vb7dh) 四、圖片框控件 1。使用 Visual Basic顏色 Visual Basic提供了兩個選擇顏色函數(shù)QBColor()和 RGB()，其中 QBColor()能夠選擇 16種顏色。表 74列出了 QBColor()能夠選擇的顏色： 表 104 QBColor( )可選擇的顏色 RGB()函數(shù)能夠選擇更多的顏色，此函數(shù)有三個參數(shù)： RGB(R,G,B) R、 G、 B分別指明顏色中紅色、綠色、藍(lán)色的比例，它們的取值范圍為 0～ 255。 圖形方法 1． Scale方法 Scale方法定義繪圖的坐標(biāo)系。語法格式： [對象 .]Scale (LeftX ,TopY) (RightX , BottomY) 對象： 可為 Form和 PictureBox控件。 LerftX , TopY： 所定義坐標(biāo)系中左上角的坐標(biāo)。 RightX , BottomY： 坐標(biāo)系中右下角的坐標(biāo)。 Scale(200,200)(200,200) 如何 定義一個如圖的坐標(biāo)系。 (200,200) (200,200) (0,0) 2． Line方法 Line方法用來畫線，格式為： [對象 .]Line[[Step](X1,Y1)][Step](X2,Y2)[,[Color][,B[F]]]（ 1） (X1,Y1)和 (X2,Y2)：線段的起止坐標(biāo)； (X1,Y1)省略表示從當(dāng)前位置開始畫到 (X2,Y2)點。 （ 2） Step：是相對意義 ， 為相對于當(dāng)前點的坐標(biāo) 。 （ 3） Color：用于設(shè)置畫線顏色 。 （ 4） B：表示以 (X1,Y1)和 (X2,Y2)對角坐標(biāo)畫一方框。 加入 F則表示對矩形框填充。 例如： (200,550)(600,600) Line (800,700)， Vbred,B Line(200,300)(400,100) 與 Line(200,300)Step(200,200)是等效的。 例 3(103) 用 Line方法在窗體上畫出如圖所示的隨機(jī)射線 . (vb10L103) Private Sub Form_Click() Dim i As Integer, x As Single, y As Single Scale (320, 240)(320, 240) For i = 1 To 100 x = 320 * Rnd If Rnd Then x = x y = 240 * Rnd If Rnd Then y = y colorcode = 15 * Rnd Line (0, 0)(x, y), QBColor(colorcode) Next i End Sub 3． C
醫(yī)療健康相關(guān)推薦
鄂ICP備17016276號-1