你可以通過用VB點虐 控制陵埋excel,讓excel生成曲線圖,然后利用譽攔excelVBA將圖輸尺虛螞出,最后導(dǎo)入到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)站回饋大家。
分類: 電腦/網(wǎng)絡(luò) 程序設(shè)計 其他編程語言枝渣改
問題描述:
VB6中的form1.circle (100,200),rgb(0,255,0)的語句如何在VB中使用?。?/p>
急用??!梁早?。。。。。。?/p>
解析:
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
這份文件列出了參鎮(zhèn)亮數(shù)在PowerMILL提銷喊供。 表1 列出一般PowerMILL參數(shù), 表2 列出了有效的PowerMILL安裝額外的參數(shù)表。 表1。 PowerMILL參數(shù)。 標(biāo)識符說明 (AdditionalStock)最大厚度的股票估計要去除刀具御斗寬路徑。這是用來作為一種輔助手
不需編寫函數(shù)自己繪制表格;檔慧
如果用的是VB6,可以用行毀答MSFlexGrid控件實現(xiàn)表格
如果用余團的是VB.Net,可以使用DataGridView實現(xiàn)表格