VB點虐 與VB不同。
公司主營業(yè)務(wù):網(wǎng)站設(shè)計、網(wǎng)站建設(shè)、移動網(wǎng)站開發(fā)等業(yè)務(wù)。幫助企業(yè)客戶真正實現(xiàn)互聯(lián)網(wǎng)宣傳,提高企業(yè)的競爭能力。創(chuàng)新互聯(lián)建站是一支青春激揚、勤奮敬業(yè)、活力青春激揚、勤奮敬業(yè)、活力澎湃、和諧高效的團隊。公司秉承以“開放、自由、嚴(yán)謹(jǐn)、自律”為核心的企業(yè)文化,感謝他們對我們的高要求,感謝他們從不同領(lǐng)域給我們帶來的挑戰(zhàn),讓我們激情的團隊有機會用頭腦與智慧不斷的給客戶帶來驚喜。創(chuàng)新互聯(lián)建站推出洪洞免費做網(wǎng)站回饋大家。
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
這個比較復(fù)雜,我正好最近在弄這些,首先和你說下任務(wù)量,首先寫好所有抽樣分布的函數(shù),分位數(shù)以及概率的算法,其中分位數(shù)和求概率的算法需要調(diào)用伽瑪分布算法,階乘算法,積分算法,另外要有防止數(shù)據(jù)運算溢出,我完成這些源碼和調(diào)試花了一個星期,所以你如果不是非要用vb做,那就用excel那里面基本都有這些函數(shù)可以調(diào)用,想編編程序,那就用下vba。我之所以用vb點虐 是由于要做一個整合統(tǒng)計分析,回歸分析以及線性規(guī)劃并包含繪圖和云圖的功能,這個必須從底層編起
數(shù)學(xué)上不是有斜二測畫法,算好坐標(biāo)即可畫出
或者用AnyCAD的.Net圖形控件
也可以調(diào)用matlab 實現(xiàn)
你可以通過用VB點虐 控制excel,讓excel生成曲線圖,然后利用excelVBA將圖輸出,最后導(dǎo)入到VB點虐 就可以了。