999精品在线视频,手机成人午夜在线视频,久久不卡国产精品无码,中日无码在线观看,成人av手机在线观看,日韩精品亚洲一区中文字幕,亚洲av无码人妻,四虎国产在线观看 ?

VB下開發制作手繪板的小技巧

2015-07-04 06:56:46黎明
世紀之星·交流版 2015年4期

黎明

摘 要:隨著軟件技術的不斷更新發展,計算機繪圖方便高效,在生活生產中扮演著極為重要的角色, Windows環境下的Visual Basic提供了豐富的圖形功能。按鼠標可以在窗體上繪制各種圖形,并且可下以更改畫筆粗細及顏色。

關鍵詞:Visual Basic;手繪板;程序設計

Visual Basic 本身具有強大的圖形繪制功能,不但可以用SHAPE控件完成繪圖,也可以用代碼的形式來繪制。所開發的簡易繪圖板主要的特點就是用鼠標在屏幕上繪制想要的各種圖案,并具可以設置畫筆的粗細,以及選擇畫筆的色彩和背景色等,可以設置清除按鈕,對不滿意的圖清除重畫。程序執行效果圖如下:

從手繪板的界面可以發現,需要做三個按鈕,一個滾動條。按鈕主要的功能是設置畫布的背景色,設置畫筆的顏色,以及清除圖案。而滾動條的作用則是設置畫筆的粗細,以便于在繪制圖案的時候可以靈活的調整筆的寬度。

具體的開發步聚如下:

1.程序,啟動VB程序;

2.在程序界面(FORM)下,拖出三個按鈕(BUTTON),分別命名為畫布背景色,畫筆顏色,清除圖案;

3.在窗口中,添加標簽和滾動條,如上圖,這里需要注意設置滾動條的屬性值min=1,max=20,這里的意思是畫筆最細為1像索點的寬度,最大為20像索點的寬度。

4.手繪板界面的創建完成后,接下來就是功能的實現,這需要為按鈕加代碼,具體的如下:

如 畫布背景色(BUTTON1):

Private Sub Command1_Click()

CommonDialog1.ShowColor //通用對話框功能打開;

FORM1.BackColor = CommonDialog1.Color //背景色與通用對話框顏色一致

End Sub

這里需要強調的一點,有一個隱形的控件大家在圖中是看不到的,就是COMMONDIALOG(通用對話框控件),這個控件在程序執行中不顯示,但必須要有,功能特別強大,主要可以提供如顏色設置,字體設置,打印機設置等最主要的功能。這個控件需要在VB部件下添加。

畫筆顏色按鈕(BUTTON2)代碼如下:

Private Sub Command2_Click()

CommonDialog1.ShowColor //通用對話框功能打開;

FORM1.ForeColor = CommonDialog1.Color //畫筆色與通用對話框顏色一致;

End Sub

清除圖案按鈕(BUTTON3)代碼如下:

Private Sub Command1_Click()

FORM1.Cls //清屏;

End Sub

接下來,就是給滾動條加代碼,加代碼的目的,是拖動的時候,畫筆本身的寬度發生改變,具體代碼如下:

Private Sub HScroll1_Change()

FORM1.DrawWidth = HScroll1.Value //滾動條的VALUE值始終不會超過前面的設置的MIN,MAX的值;

End Sub

那么上面的控件代碼都做好了,是不是就可以直接繪制呢?當然,這是不行的。因為我們還沒有給鼠標設置功能,我們的目的是按下鼠標左鍵不放開,在窗體上就可以繪制任何的圖形,接下來的二段代碼會告訴你怎么做:

1.先要定義好坐標點的位置:

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) //MOUSEDOWN是指按下鼠標事件

CurrentX = X

CurrentY = Y

End Sub

2.開始繪制畫線

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

//mousemove是指鼠標移動的事件

If Button = 1 Then //這句代碼的意思是按下左鍵開始繪制,如果你想按右鍵只需要將BUTTON值設為2即可;

Line -(X, Y) //LINE代碼主要是繪制線條

End If

End Sub

只需要將上面的二段代碼在VB代碼窗中添加完成,那么簡易手繪板的制作就大功告成了。在整個程序設計的過程中,我們先應該清楚需要用到哪些控件,需要實現什么樣的功能,然后具體如何來實施,這是程序開發必要的三個過程。可能在上面的手繪板制作過程中大家還有不清楚的地方,希望多動手,多實踐,一定可以做出更優秀的,實用的工具。

參考文獻:

[1]楊明廣.王秀華. Visual Basic程序設計教程[M].北京:中國科學技術出 版社,2006.

[2]王秀華.余建坤. Visual Basic程序設計上機和級考實訓教程[M].北京: 中國科學技術出版社,2006.

[3]孫遠光 Visual Basic程序設計實用教程 北京理工大學出版社,2010年.

主站蜘蛛池模板: 国产成人亚洲综合a∨婷婷| 亚洲一级毛片免费观看| 2018日日摸夜夜添狠狠躁| 日本伊人色综合网| 国产杨幂丝袜av在线播放| 成人国产一区二区三区| 日韩精品一区二区深田咏美| 日本人妻丰满熟妇区| 国产剧情一区二区| 国产精品亚洲综合久久小说| 欧美国产日韩在线播放| 国产精品久久久久鬼色| 欧美精品色视频| 爆乳熟妇一区二区三区| 婷婷六月天激情| 亚洲精品桃花岛av在线| 蜜桃视频一区二区| 久久精品娱乐亚洲领先| 亚洲无码高清视频在线观看| 奇米精品一区二区三区在线观看| 五月天久久婷婷| 国产成熟女人性满足视频| 亚卅精品无码久久毛片乌克兰| 国产浮力第一页永久地址| 亚洲 日韩 激情 无码 中出| 青青青国产在线播放| 久久精品国产国语对白| 欧美色综合久久| 久久香蕉国产线| 成人午夜视频网站| 亚洲视频影院| 亚洲人成人无码www| 国产极品嫩模在线观看91| 成人精品视频一区二区在线| 亚洲AⅤ永久无码精品毛片| 欧美精品v日韩精品v国产精品| 97在线碰| 日本一区高清| 国产主播在线一区| 国产青青草视频| 综合色亚洲| 特级做a爰片毛片免费69| 四虎国产成人免费观看| 日韩欧美中文| 亚洲日韩在线满18点击进入| 国产在线一二三区| 亚洲日产2021三区在线| 玖玖精品在线| 91精品啪在线观看国产| 精品无码视频在线观看| 久久久久久久久久国产精品| 欧美伦理一区| 亚洲欧美不卡视频| 免费看的一级毛片| 手机精品福利在线观看| 久久久久亚洲AV成人网站软件| 99视频全部免费| 97超爽成人免费视频在线播放| 少妇极品熟妇人妻专区视频| 日韩av手机在线| 国产毛片基地| 不卡午夜视频| 欧美日韩综合网| 国产办公室秘书无码精品| 日韩人妻精品一区| 日韩精品一区二区三区免费| jizz在线免费播放| 91午夜福利在线观看| 国产成人欧美| 久久婷婷综合色一区二区| 综合社区亚洲熟妇p| 国产手机在线小视频免费观看| 国产精品手机在线观看你懂的| 国产综合在线观看视频| 亚洲国产天堂久久九九九| 香蕉在线视频网站| 国产综合在线观看视频| 亚欧乱色视频网站大全| 精品一区二区三区四区五区| 国产精品视频免费网站| 茄子视频毛片免费观看| 久久国产亚洲欧美日韩精品|