如何用VB.NET調(diào)用excel的畫圖命令，即用.NET得到一組點(diǎn)坐標(biāo)后，調(diào)用excel根據(jù)點(diǎn)畫出曲線圖并顯示在VB.NET里

你可以通過用VB.net控制excel，讓excel生成曲線圖，然后利用excelVBA將圖輸出，最后導(dǎo)入到VB.net就可以了。

十余年的左權(quán)網(wǎng)站建設(shè)經(jīng)驗，針對設(shè)計、前端、開發(fā)、售后、文案、推廣等六對一服務(wù)，響應(yīng)快，48小時及時工作處理。營銷型網(wǎng)站的優(yōu)勢是能夠根據(jù)用戶設(shè)備顯示端的尺寸不同，自動調(diào)整左權(quán)建站的顯示方式，使網(wǎng)站能夠適用不同顯示終端，在瀏覽器中調(diào)整網(wǎng)站的寬度，無論在任何一種瀏覽器上瀏覽網(wǎng)站，都能展現(xiàn)優(yōu)雅布局與設(shè)計，從而大程度地提升瀏覽體驗。成都創(chuàng)新互聯(lián)從事“左權(quán)網(wǎng)站設(shè)計”,“左權(quán)網(wǎng)站推廣”以來，每個客戶項目都認(rèn)真落實執(zhí)行。

用VB編寫畫圖程序

提供一個繪制任意曲線的簡單代碼。其他功能類似，希望能舉一反三。

在窗體中添加一個Picture?box，然后輸入命令如下：

Dim?oldx?As?Single

Dim?oldy?As?Single

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

If?Button?=?1?Then???????'當(dāng)鼠標(biāo)左建按下時發(fā)生

Picture1.Line?(oldx,?oldy)-(X,?Y)

oldx?=?X

oldy?=?Y

End?If

End?Sub

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

oldx?=?X

oldy?=?Y

End?Sub

VB.net中如何畫圖？

分類: 電腦/網(wǎng)絡(luò) 程序設(shè)計 其他編程語言

問題描述:

VB6中的form1.circle (100,200),rgb(0,255,0)的語句如何在VB中使用??？

急用啊！?。。。。。?！

解析:

VB與VB不同。

VB已經(jīng)有專門繪圖的類。

可以定義筆刷然后用Drawing類中的方法繪制。

Private Sub DrawEllipse()

Dim myPen As New System.Drawing.Pen(System.Drawing.Color.Red)

Dim formGraphics as System.Drawing.Graphics

formGraphics = Me.CreateGraphics()

formGraphics.DrawEllipse(myPen, New Rectangle(0,0,200,300))

myPen.Dispose()

formGraphics.Dispose()

End Sub

Private Sub DrawRectangle()

Dim myPen As New System.Drawing.Pen(System.Drawing.Color.Red)

Dim formGraphics as System.Drawing.Graphics

formGraphics = Me.CreateGraphics()

formGraphics.DrawRectangle(myPen, New Rectangle(0,0,200,300))

myPen.Dispose()

formGraphics.Dispose()

End Sub

本文題目：vb.net畫圖畫程序 vb畫圖語句
本文鏈接：http://m.newbst.com/article30/dogphso.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供建站公司、網(wǎng)站策劃、面包屑導(dǎo)航、做網(wǎng)站、品牌網(wǎng)站設(shè)計、云服務(wù)器

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)