第11章圖形程序設(shè)計-wenkub.com
2024-08-28 09:22 本頁面
【正文】 如果 ( x, y)點位于對象之外， Point 方法將返回 True。 ? 直接編寫窗體單擊事件程序代碼如下： ? ? Private Sub Form_Click() ? Const PI = ? (0, 0)(60, 40) ? (10, 10), 8 ‘繪制圓 ? (35, 15), 10, , PI / 2, PI ‘繪制圓弧 ? = 0 ‘設(shè)置填充樣式為實填充 ? = vbRed ‘設(shè)置填充顏色為紅色 ? (50, 15), 10, , PI / 6, PI * 5 / 6 ‘繪制具有填充效果的扇形 ? = 1 ‘設(shè)置填充樣式為虛填充 ? (15, 30), 12, , , , ‘繪制 X長軸橢圓 ? (45, 30), 8, , , , 3 ‘繪制 X短軸橢圓 ? End Sub ? 該程序運行結(jié)果如圖所示： Visual Basic 程序設(shè)計 ? Pset方法 ?Pset方法用于在窗體或圖形框上畫點，其語法格式如下： ? [對象名 .]Pset [Step] (X， Y) [，顏色 ] ?例 118 使用 Pset方法在窗體上的任意位置畫任意顏色的、大小為 1~10之間任意值的點。 ?編寫如下的窗體單擊事件程序代碼： ?Private Sub Form_Click() ?Line (20, 40)(1500, 2020), , B ?Line (200, 400)Step(2020, 2020),vbRed, BF ?End Sub ?本程序運行結(jié)果如圖所示。 ? B表
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號-1