VB6的绘图方法与常用函数.ppt

VB6的绘图方法与常用函数.ppt

ID:57052621

大小:624.50 KB

页数:47页

时间:2020-07-30

VB6的绘图方法与常用函数.ppt_第1页
VB6的绘图方法与常用函数.ppt_第2页
VB6的绘图方法与常用函数.ppt_第3页
VB6的绘图方法与常用函数.ppt_第4页
VB6的绘图方法与常用函数.ppt_第5页
资源描述:

《VB6的绘图方法与常用函数.ppt》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、VB6的繪圖方法與常用函數常用繪圖方法(Method)指令ClsClearScreen,清除螢幕用點、線、圓….等繪圖方法所畫出的圖形或是用Print輸出的字串,都可以用Cls方法來加以清除。語法[Object].Cls物件.Cls常用繪圖方法、指令(續)Pset用來畫任意顏色的點語法[Object.]Pset[Step](X,Y)[,color]其中的X,Y是單精度變數,因此可以使用小數數值、變數。如果不指定color引數,就以ForeColor屬性的顏色為顏色。如果將color引數,設定為BackCo

2、lor就會有「消除」的效果。常用繪圖方法、指令(續)Point可以讀取任意點的顏色值語法[Object.]Point(X,Y)Picture1AutoRedraw:TrueDrawWidth:5常用繪圖方法、指令(續)Line畫一條線語法B:畫框BF:畫框且填滿[Object.]Line[[Step](X1,Y1)]–[Step](X2,Y2),[Color][,B[F]]]Line(X1,Y1)-(X2,Y2)Line–(X1,Y1)常用繪圖方法、指令(續)Circle畫圓語法Radius:半徑Star

3、t:弧的起點End:弧的終點Aspec:長短軸比[Object.]CircleStep(X,Y),Radius,Color,Start,End,Aspec牛刀小試(1)試寫一程式,模擬小畫家的噴霧、畫筆與畫線的功能牛刀小試(1)---續Picture1Box*1Shape*16CommandButton*8牛刀小試(1)---續屬性設定PictureBox(Picture1)AutoRedraw:TrueAppearance:0–平面BorderStyle:1–單線固定ScaleMode:3–像素Shap

4、e(Shape1(0)~(15))CommandButton(Command1~5)Caption:如圖示Command4(0)~(3)表示線條寬度設定牛刀小試(1)---續全域變數宣告:mode1噴霧、2畫筆、3畫線ttt滑鼠左鍵點選的狀態0第一次點選、1第二次點選xx,yy記錄滑鼠第一次點選的座標selcolor從調色盤選取的顏色值ttt的起始值設為0Picture1的起始線條寬度為1填充Shape1,建立調色盤當滑鼠的左鍵點選調色盤後,將色碼值指派給selcolor變數牛刀小試(1)---續

5、當按下Command1設定為「噴霧」當按下Command2設定為「畫筆」當按下Command3設定為「畫筆」當按下Command4(0)~(3)時按所對應Index的Caption設定Picture1的線條寬度當按下Command5時,清空Picture1的內容牛刀小試(1)---續當mode=1時(噴霧),以滑鼠所點選的位置座標為中心,上下左右各延伸十個像素,以亂數取20個座標點,分別畫上一點當mode=2時(畫筆),以滑鼠第一次點選的位置為基準繪上一點,並令ttt變數值為1,倘若第二次點選滑鼠,則令t

6、tt變數值為0當mode=3時(畫線),以滑鼠第一次點選的位置為基準繪上一點,並令ttt變數值為1,以xx及yy變數記錄起點,倘若第二次點選滑鼠,則令ttt變數值為0,且於(xx,yy)到第二次的點選點繪製一條線當mode=2且ttt=1時,移動滑鼠的同時,於Picture1上繪製前一個座標到目前座標間的線條常用的字串函數Left()傳回字串左邊指定數量的字元語法Left_str=Left(Str,n)將Str字串的左邊n個字元放到Left_str中n為小數時,則系統會自動將n以四捨五入轉成整數型態如果n

7、>Str的長度時,將傳回全部字串Str=“ABCDEFG”sss=Left(Str,3)sss=“ABC”常用的字串函數(續)Right()傳回字串右邊指定數量的字元語法Right_str=Right(Str,n)將Str字串的右邊n個字元放到Right_str中n為小數時,則系統會自動將n以四捨五入轉成整數型態如果n>Str的長度時,將傳回全部字串Str=“ABCDEFG”sss=Right(Str,3)sss=“EFG”常用的字串函數(續)Mid()傳回字串中間指定數量的字元語法Mid_str=M

8、id(Str,n)將Str字串的第n個字元起後的全部字元放到Mid_str中Mid_str=Mid(Str,n,m)將Str字串的第n個字元起後的m個字元放到Mid_str中Str=“ABCDEFG”sss=Mid(Str,3)sss=“CDEFG”Str=“ABCDEFG”sss=Mid(Str,3,4)sss=“CDEF”常用的字串函數(續)Len()傳回字串的長度語法Len_str=Len(Str)將Str字串長度的

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。