Beste,
Ik ben een programma aan het maken die de cash flow weergeeft in een 3 verschillende grafieken.
Deze grafieken worden gemaakt door calculaties in mijn programma. Ik maak gebruik van de " chart " in de toolbox ( VB 2010 Express)
Nu zou ik graag deze 3 verschillende opslaan in een document.
De volgende code heb ik, maar deze slaat 1 grafiek op in 1 document.
Zou iemand mij hiermee kunnen helpen?
Bij voorbaat dank.
Ik ben een programma aan het maken die de cash flow weergeeft in een 3 verschillende grafieken.
Deze grafieken worden gemaakt door calculaties in mijn programma. Ik maak gebruik van de " chart " in de toolbox ( VB 2010 Express)
Nu zou ik graag deze 3 verschillende opslaan in een document.
De volgende code heb ik, maar deze slaat 1 grafiek op in 1 document.
Code:
Displays a SaveFileDialog so the user can save the Image
' assigned to Button2.
Dim saveFileDialog1 As New SaveFileDialog()
saveFileDialog1.Filter = "JPeg Image|*.jpg|Bitmap Image|*.bmp|Gif Image|*.gif"
saveFileDialog1.Title = "Save an Image File"
saveFileDialog1.ShowDialog()
' If the file name is not an empty string open it for saving.
If saveFileDialog1.FileName <> "" Then
' Saves the Image via a FileStream created by the OpenFile method.
Dim fs As System.IO.FileStream = CType _
(saveFileDialog1.OpenFile(), System.IO.FileStream)
' Saves the Image in the appropriate ImageFormat based upon the
' file type selected in the dialog box.
' NOTE that the FilterIndex property is one-based.
Select Case saveFileDialog1.FilterIndex
Case 1
Chart1.SaveImage(fs, _
System.Drawing.Imaging.ImageFormat.Jpeg)
Case 2
Chart1.SaveImage(fs, _
System.Drawing.Imaging.ImageFormat.Bmp)
Case 3
Chart1.SaveImage(fs, _
System.Drawing.Imaging.ImageFormat.Gif)
End Select
Zou iemand mij hiermee kunnen helpen?
Bij voorbaat dank.
Laatst bewerkt door een moderator: