99偷拍视频精品区一区二,口述久久久久久久久久久久,国产精品夫妇激情啪发布,成人永久免费网站在线观看,国产精品高清免费在线,青青草在线观看视频观看,久久久久久国产一区,天天婷婷久久18禁,日韩动漫av在线播放直播

vb.net制作餅形圖 winform餅圖

我想問下,講數據保存到excel中后,如何在VB.net中繼續寫代碼,使得能夠將這些數據生成一個餅圖?并保存。

用宏功能啊,然后把宏代碼(vb6.0)轉化為Vb.net代碼,有一個關鍵問題,就是VBA中的枚舉類型在Vb.net中不適用,比如.End(xlUp)更改為.End(3)就能運行,另外vb.net中運行Excel對象不一定在點后會出現智能提示(即使你引用后也一樣)你只要確定有該方法或者屬性,直接寫就是了,生成或者調試都是可以通過的

創新互聯公司2013年至今,是專業互聯網技術服務公司,擁有項目成都做網站、網站建設網站策劃,項目實施與項目整合能力。我們以讓每一個夢想脫穎而出為使命,1280元類烏齊做網站,已為上家服務,為類烏齊各地企業和個人服務,聯系電話:028-86922220

誰能告訴我怎么在vb中從數據生成餅形圖?

1. 建一個默認的project

2. 放一個command button

3. 放一個 200x200 pixel 的 Picture box

加入如下代碼:

Option Explicit

Public Sub DrawPiePiece(lColor As Long, fStart As Double, fEnd As

Double)

Const PI As Double = 3.14159265359

Const CircleEnd As Double = -2 * PI

Dim dStart As Double

Dim dEnd As Double

Picture1.FillColor = lColor

Picture1.FillStyle = 0

dStart = fStart * (CircleEnd / 100)

dEnd = fEnd * (CircleEnd / 100)

Picture1.Circle (100, 100), 60, , dStart, dEnd

End Sub

Private Sub Command1_Click()

Picture1.ScaleMode = vbPixels

Call DrawPiePiece(QBColor(1), 0.001, 36)

Call DrawPiePiece(QBColor(2), 36, 55)

Call DrawPiePiece(QBColor(3), 55, 75)

Call DrawPiePiece(QBColor(4), 75, 99.999)

End Sub

試一下吧

用vb.net可以做出餅圖嗎

Dim MyGraphics As Graphics = Me.PictureBox1.CreateGraphics

Dim MyBrush As New SolidBrush(Color.Red)

Dim MyProportion As Single

Dim MyRect As New Rectangle

Dim MyPoint As New PointF

Dim R As Single

Const PI = 3.1415926

MyGraphics.Clear(Color.White)

Dim MyStartAngel As Double

Dim MySweepAngel As Double

R = Math.Min(Me.PictureBox1.Width, Me.PictureBox1.Height) / 2 - 15

MyPoint.X = Me.PictureBox1.Width / 2

MyPoint.Y = Me.PictureBox1.Height / 2

MyRect.X = MyPoint.X - R

MyRect.Y = MyPoint.Y - R

MyRect.Width = R * 2

MyRect.Height = R * 2

MyStartAngel = 0

MyProportion = Val(TextBox7.Text)

MySweepAngel = MyProportion * 360 / PI

MyBrush.Color = Color.Red

MyGraphics.FillPie(MyBrush, MyRect, MyStartAngel, MySweepAngel)

' MyStartAngel = MyStartAngel + MySweepAngel

MyProportion = 0.75

MySweepAngel = 360 * MyProportion

MyBrush.Color = Color.Blue

MyGraphics.FillPie(MyBrush, MyRect, MyStartAngel, MySweepAngel)

VB 如何畫餅圖?

給你一個步驟吧.

設立一個圓心(即定一個點)

再按照用PI轉角來畫就行了.

最后加上你需要的顏色

文章題目:vb.net制作餅形圖 winform餅圖
新聞來源:http://www.yijiale78.com/article24/hhscje.html

成都網站建設公司_創新互聯,為您提供網頁設計公司關鍵詞優化網站維護面包屑導航定制網站外貿網站建設

廣告

聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯

外貿網站制作