在PictureBox的Paint事件里面寫:
正安網(wǎng)站制作公司哪家好,找成都創(chuàng)新互聯(lián)!從網(wǎng)頁(yè)設(shè)計(jì)、網(wǎng)站建設(shè)、微信開發(fā)、APP開發(fā)、成都響應(yīng)式網(wǎng)站建設(shè)等網(wǎng)站項(xiàng)目制作,到程序開發(fā),運(yùn)營(yíng)維護(hù)。成都創(chuàng)新互聯(lián)從2013年成立到現(xiàn)在10年的時(shí)間,我們擁有了豐富的建站經(jīng)驗(yàn)和運(yùn)維經(jīng)驗(yàn),來(lái)保證我們的工作的順利進(jìn)行。專注于網(wǎng)站建設(shè)就選成都創(chuàng)新互聯(lián)。
e.Graphics.DrawLine(Pens.Black, New Point(0, 0), New Point(50, 50)))
跟樓上的方法相比這個(gè)一般不會(huì)沒掉,樓上的方法在刷新的時(shí)候除非手動(dòng)重繪,不然就會(huì)沒掉
[{"word":"VB.NET畫直線方法\n該方法繪制一條連接由坐標(biāo)對(duì)指定的兩個(gè)點(diǎn)的線條,所以我們需要指定這兩個(gè)點(diǎn)的坐標(biāo),如下所示、\nDrawL in e(pen,x1.y1,x2,y2)或者DrawL in e(pen,Po in t1,Poin t2)\n下面示例將在PictureBox控件表面繪制一條直線、\nDim g As\nGraphics=Me.PictureBox\n1.CreateGraphics\nDim mpen As New\nPen(Color.Red)g.DrawLin e(mpen,0,80,0,160)\n也可以使用如下代碼來(lái)實(shí)現(xiàn)一樣的甲\n__\n"}]
這個(gè)必須用控件的方法解決,VB6有個(gè)Line控件很容易解決這個(gè)問題,但是VB.NET沒有了,幸好微軟也想到了這個(gè)缺陷,提供免費(fèi)的Visual Basic PowerPacks控件箱,其中有Line控件。
Visual Basic PowerPacks下載地址:
使用 LineShape 控件繪制直線: