Visual Basic :: Chart Fill Format Picture

SQL And Connect String To Fill MS Chart - Solved
Hello code warriors
I'm trying to get this code to fill the MS Chart cntl. I'm using VB 6 and MS Access. One of the SELECT statements works the other doesn't. Unfortunately I need the doesn't one working. The difference is they are pulling from two different tables. The one that works only has two fields in it. The one that doesn't has 8 fields, so I thought naming them in the statement would work. But it just comes up blank.

The recordset and connection object are getting created.

Code:
Public cn as New ADODB.Connection
Public rs as New ADODB.Recordset

Private Sub Form_Load()
  Dim Path as String
  path = App.Path & "dbName.mdb"
  cn.ConnectionString = "provider=Microsoft.Jet.OLEDB.4.0;data source=" & Path & ";"
  cn.Open
  If cn.State = adStateClosed Then
     MsgBox "Connection Error", vbCritical, "Error!"
     End
  Else
    Debug.Print "Connection Object Created"
    cn.CursorLocation = adUseClient
  End If

  ' this first one does not work, it just comes up blank
  rs.Open "SELECT PlayerName, Minutes FROM tblHoopStats", cn, adOpenDynamic, adLockOptimistic

  ' this one does work
  rs.Open "SELECT PlayerName, Minutes FROM tblStats", cn, adOpenDynamic, adLockOptimistic

  Debug.Print "Recordset Object Created"
  Set MSChart1.DataSource = rs
  MSChart1.Refresh
End Sub

thanks for any help

Hal

Edited by - Hal on 2/10/2005 10:36:18 AM

Using Flood Fill In Picture Box
In an educational program I am writing, I use a picture box where some colored graphics is desired. I tried using the api FloodFill and it doesn't seem to work. The same code does work on a form.

Thank, Jerry

Draw Circle In Picture Box With Fill
How can I draw a circle into a picture box with a fill color? Thank you

- How To Fill Colour In A Part Of A Picture Box
hey guys,

i need to paint a part of a picture box, how can i do that. attached image may help u to understand.

plz help

thanx in advance
harry

Format A Word Doc Using VB6? Printing Variable Nr Chars To Fill In Mid Of Line
Hi

Here's my situation: I need to format, at run time, a word document. The basic output of data should look aproximately like a label (see sample below):

-- begin sample:

Name of Customer
Address..............................Phone Number
City, ZIP (notes)

Name of Customer Two
Address 2...........................Phone Number
City, ZIP (notes)

Name of Customer Three
Address Three.....................Phone Number
City, ZIP (notes)

... end sample--

Ok, here's the chalenging requirements I am facing:

a. The whole thing has to be completely aligned and justified;
b. Line 2 and 3 have to align the first part to the left, the second part to the right
c. in line two, i have to print a VARIABLE quantity of DOTS that fills the space between the left fields and the right field while keeping the whole thing always aligned and perfectly justified. Since address size is variable, this has proven to be a huge challenge.
d. I have to use a font like Helvetica (or Swiss) to do this. NO Courier or similar :-( which would save me the whole hassle, of course...

If you copy the sample above and paste it into notepad you'll see that though line 3 seems to be perfect in the post, in notepad it will show one dot too many for alignment... that is because the characters do not have fixed sizes when using a different font. And that's my biggest challenge so far...

This is to produce a directory of names and phones, obviously.

So far i tried other techniques to achieve this but I was not successful. Since I have never worked with Word objects using VB6, I haven't got an idea on where to start and how to go about it.

I thought it would be possible to do so by creating fields in Word and then resize them at runtime, but again I don't know how to go about it.

The records come from an ADO recordset in VB6.

I really hope somebody can help and give me some ideas or point me to resources that might help.

Thank you

How To Fill Picture Within Another Picture And........
i am developing s/w for furniture. How to fill picture within another picture as color. i have two pictures one is of chair and another is of fabrics design now i want that when i click command button the chair must be filled within fabrics design as color.

I have downloaded some code which i have attached with this. here is it drag and drop fuction with imagelist mask color .but i tried it but couldnt get it so please

Help me!!!!
Crying for help

Thanx a lot in advance

Problem With Excel Chart Format
I've make a programm in VB using Excel XP. It takes from a .txt file values and titles and makes an excel column chart. My problem is that I can't make visual basic put given titles as Category Axis titles or legend entries under etch column of the chart and delete the Legend box. Also, I wanna white etch column's value above it.

Export Excel Chart To Wmf Format
there is method in excel VBA : chart.export to export chart in worksheet to GIF, JPG or BMP (bitmap format), is it possible to export to wmf format (vector format) (or is there any way to export excel chart to wmf programatically ) ?

thanks in advance

rd

Excel - Need To Format A Chart In Code
Hi all.

I need to change one series that is plotted on my chart (a percentage series) to be plotted against a second Y axis because the scales of the two series are very different and you cannot see the percentage series very well at the moment.

If you right click on a data series on a chart in Excel 97, under the Axis tab there is a frame with the caption 'Plot Series On' and two option buttons, 'primary axis' and 'secondary axis'. If I change it to secondary axis manually, the two series are displayed much better, but I can't work out how I can do this in code.

Does anybody know where this property is? Or if it's even accessible in VBA?

Format Of Chart XValues In Excel VBA
Excel VBA, using Excel 2000
I need to be able to add series from many different spreadsheets to the same chart for comparison.

The first line works great if you manually go to the chart, click "add source data", "data series" and paste it into the X series
But when running in VBA, it creates an error.
However the second line works, but is not how my ranges are formatted:

ActiveChart.SeriesCollection(1).XValues= "='D:as_shipped[MFC_file.XLS]accel'!$E$4:$E$347"
ActiveChart.SeriesCollection(1).XValues= "='D:as_shipped[MFC_file.XLS]accel'!R4C5:R347C5"

How can I make the first line work, or easily reformat to look like the second line.

Thanks!
Dawei

Excel Chart Axis Format To Julian Date
I am producing charts in excel though my VB program. Currently the date format for the x-axis is "dd/mm/yyyy hh:mm:ss".
I'd like it to be "yyyy/JulainDate hh:mm:ss"

I know how to switch it in a cell, format(Date, "y") but not on an axis
Anyone know how?

Adding Labels To A Pie Chart In A Picture Box, How?
I found this code at http://selfonline-education.tripod.c...r/vbasic18.htm and is exactly what I was looking for:

VB Code:
Private Sub Command1_Click() Dim pieData(10) As IntegerPicture1.Cls For i = 0 To 9 pieData(i) = 20 + Rnd() * 100 Total = Total + pieData(i) Next Picture1.DrawWidth = 3 For i = 0 To 9 arc1 = arc2 arc2 = arc1 + 6.28 * pieData(i) / Total If Check1.Value Then Picture1.FillStyle = 2 + (i Mod 5) Else Picture1.FillStyle = 0 End If If Check2.Value Then Picture1.FillColor = QBColor(8 + (i Mod 6)) Else Picture1.FillColor = QBColor(9) End If Picture1.Circle (Picture1.ScaleWidth / 2, Picture1.ScaleHeight / 2), Picture1.ScaleHeight / 2.5, , -arc1, -arc2 Next i End Sub Private Sub Command2_Click() EndEnd Sub Private Sub Command3_Click() Picture1.ClsEnd Sub

My question is how can I add labels next to each slice and a legend next to the pie chart?

Thanks!

Can I Save A Excel Chart As A Picture File?
I am developing an Acess application to generate a Word document as our weekly production report. This Word document report's layout has been pretty much fixed. It has some tables containing data and some charts (can be Excel Charts). I can ,in Access, get this word document object and use vba code to manipulate (update) the data in the table of the Word document using the data in my Access database. I also want to generate the charts in the word document using the data in my Access database. Any Good Ideas?

Currently, I link the worksheets in a workbook in my Access database. I link each worksheet as a table in my Access database and transfer the data to each linked table (worksheet). These worksheet's data is linked to a charts in this workbook. Every time, I change the data in each worksheet, the Chart is changed. How to transfer the chart to the Word documnet without mannualy copy and past as picture to the document.
I want automatically change the charts in the document usning vba either in Access or Excel, Word.

I can also place some Image controls in the Word document and use the picture property to link each picture files. This will require that each chart be saved as a picture file. Can I save each chart as a picture file (eg. bmp file) using vba code?

Chad

Can't Copy MS Chart Graph Into The Picture Box To Be Exported As A .bmp...
Ok whenever I try to capture the graph itself into the picture box, I get "invalid picture" errors. Can anyone tell me how to paste the graph in the picture box? Once that is done I can use SavePicture to export the file as a .bmp. Thanks in advance

Chart.CopyPicture : How To Modify Picture Size/resolution ?
Hello All,

I am using the code below in Xcel (2002) VBA to copy a chart picture to the clipboard and paste it to mspaint.

I need a large and high-res picture for publication. How can I modify in VBA the size & resolution of myChart and the copied picture ?

Please note it seems I have to use Format:=xlBitmap , since Format:=xlPicture does not handle well transparency [I have many semi-transparent colored rectangles on top of myChart forming a 'heatmap']

Thanks.

Olivier

Code:
myChart.CopyPicture Appearance:=xlScreen, Format:=xlBitmap, Size:=xlScreen
Dim Paint
Paint = Shell("MSpaint.EXE", 3)
Application.Wait (Now + TimeValue("0:00:05"))
AppActivate Paint
SendKeys "(^v)", True
....

Excel Truncate Error When Copy Picture Chart
One coworker has a chart in Excel. When she uses shift-edit to copy picture as picture, as shown on screen, she gets an error saying the chart is too large & will be truncated. When she then tries to paste it into Powerpoint, the Y axis is distorted (shortened). Copying as a bitmap works, but greatly increases the file size, which is undesirable for emailing.
However, this doesn't happen on anyone else's machine. They can copy picture as picture as shown on screen (exact same chart) just fine.
The only difference I can find is that the others use W98, while the problem machine uses WXP. All use Office 2K. I use W2K & have no problem.
Is there a solution or setting to this problem? Thanks.

Edited by - salvelinus on 10/20/2005 6:34:41 AM

Can Picture File Insert Into VB Chart Control As Background Image
Hi All,
is there any VB control ( especially Chart control ) can insert a picture file ( jpeg, GIF ) as a background when i diplaying a line-chart ? and How ?

TIA

regards
Jason

Fill Listview Then Double Click To Fill Text Boxes (Resolved)
Hello

I have been working on this project off and on for about 6 months. What I am trying to do is use a text box search and fill a list view with the results. Then select the one I want and have it populate some text boxes on another form. all the fields can contain alpha numeric characters. I have attached the program. If any one can help me it would be greatly appreciated. I have been trying various combinations but have had no success.

Thanks
Bob

Edited by - Bob Taylor on 7/29/2003 4:08:49 PM

Picture Format....
What would be a good picture format that has at least a decent compression? And would be good to use in a game?

Picture Format
Hello!

I have a question. What kind of picture formats(.bmp.jpg.tiff.........) can i load to image and picturebox?

Thank's!

New Picture Format
I need a new picture format that only I and my program can use, Can I do this in VB or do I need to do it in C++ ?

Is there any one out there that can help me!?

//DoomBringer

Png Picture Format
I've looked at several articles describing the png picture format, and they went over my head. So does anyone have any code that can save and especialy load a .png picture format.

Thanks

Picture Resize And Format
hey all,
anyone know if it is possible to resize and format a picture e.g. wrap around text, after inserting it from clipart in VBA,
if so how?
cheers - Mark.

Save Picture In .gif Format?
Hello,

Is there a way of saving the picturebox.picture in .gif Format and load a .gif file into a picturebox.picture?

Help Me Regading Picture Format
hey guys can you help me with this...
I have been able to get a snap shot of the foremost window...

.. but the problem is i dont want ot save it has a .bmp file... i want to save it as a .gif...or a .jpg

any ideas???
please help me

how do i save a snapshot as a picture......but not as a .bmp???

Convert Picture Format ???
How can i convert picture format from BMP to JPG ???

Thanx

Shaykan

How To Make GIF Format From Picture?
help

How to make GIF format from picture?

buildersoft@angelfire.com

Picture Export To Word In Rtf Format
Problem:
I got a jpeg picture saved and I export it to a word document (under rtf format )in a table using:
"{field{*fldinst { INCLUDEPICTURE " & pictname.jpg & " \* MERGEFORMAT \d }}}"
The picture is then linked to the document...
the thing is than the picture appears in the document but is too big...
Does anyone knows what i should write to reduce the size of the picture before exporting it ???
Thanks

Trying To Fill Up A Felx Grid. But It Wont Fill
Hi im trying to write some code for a flex grid to display the ContactMethod and then Contact information.
they come from different tables.
but i have a nice sql for it and it wont fill in at all. it just displays blank boxes every time.

i have on my form load to call in this order
FormatGridBefore
FillGrid
FormatGridAfter

heres the codes:

Private Sub FillGrid()
strsql = "SELECT tblALLcommunication.CommMethod, tblEMPLOYEEcontact.Connection FROM tblALLcommunication INNER JOIN tblEMPLOYEEcontact ON tblALLcommunication.CommID = tblEMPLOYEEcontact.CommID"
Set rs2 = New ADODB.Recordset
rs2.Open strsql, cn, adOpenKeyset, adLockOptimistic, adCmdText
Set flexcontacts.DataSource = rs2
flexcontacts.Refresh
rs2.Close
Set rs2 = Nothing
End Sub

Public Sub FormatGridAfter()
With flexcontacts
.ColWidth(0) = 1520
.ColWidth(1) = 1520
.ColWidth(2) = 3037
End With
End Sub

Public Sub FormatGridBefore()
flexcontacts.FixedCols = 0
End Sub

How Can I Change Or Format A Picture On A Excel Sheet.
i wanna change or format a picture on a Excel Sheet.
How can i do it

How To Save The Picture Image In JPEG Format
Hi Everyone,

am developing a picture in the picture box while run time in Visual Basic.I need to save the picture in JPEG format,am not able to do it..It can be saved in BMP format,but not ion JPEG format..

Anyone knows ple let me know how to save the picture image in JPEG format or converting the BMP format to JPEG format

Thanks
Logeswari

How To Display PackedDIB Format Image To Picture Box
Hi,

How can we display the image which is in packedDIB format, in a picture box in VB6.

note: packedDIB contains a single pointer which points to a memory block containing a BITMAPINFO structure which is followed by the image data.

Basically I will get the image in packedDIB format(its a 6 or 8 digit number iam getting. i think, this is the memory address.). I need to dispay the image in picture box using this packedDIB.

Please Help!
Thanks in Advance,
IPS

How Can I Save A Picturebox.picture In Jpeg Format
How can a Image displayed in a PictureBox be saved in jpeg format in a file.

Drawing Rectangles In Picture That Ist Stored In StdPicture Format
Hey guys!

I really don't like to ask you about some code, but I tried and tried and tried and I didn't get my code to work :-(

I'm working with VBA.
I receive a picture from an interface and this picture is stored in memory in the variable pic (defined as stdPicture).
Now i want to draw rectangles and circles into this picture and then display it. Unfortunately I don't have a PictureBox or Image Control. I have a special Control (ocx) to display the picture. So how can I draw the rectangles and circles into the image-data?

I tried to get it to work with createDC, SelectObject, MoveTo, LineTo,... but it didn't work, obviously because I don't know how to use these commands right. (ok, moveto and lineto are not the problem...)

You can believe me, I really tried several hours, but as time is nearly up I'm asking for your help...

Can anyone pleeeaaase give me some lines of code??

Thanks in advance

Daniel

Clipboard Picture -> Smaller Format && Number Of Bytes
First off, my problem doesn't deal with directx or winsock at all, so please dont move this

Long version: (scroll down to see the short version)

Hello. I wanted to make a small application where you can control another computer from far away.. So far I have a server and a client, and the server is on the computer I want to control, and the client is on the computer that is controlling it. I'm sending messages of what to do (move the mouse, etc.) to the server, which then executes them. One problem.. I can't see what I am doing! So, I figured I'd send images back to the client to show where everything is on the screen (based on the messages sent, I'll know where the mouse is)

So I have the server taking screenshots every second, but I have a bit of a problem.

I need to convert the image that I got from prtscrn, on the clipboard, and I need to convert that into something very small (I've been thinking jpg.) and then I need to get the size of that image (in bytes) so I can send it..

Please help me out.

Short version:

I have an image on the clipboard, I need to convert it into a small image type (jpg or something) and find the size of it in bytes. How can I do that please? Thanks.

~Adams555~

Oh, I forgot to mention. I'm using VB6. And I dont care that the quality of the picture will be worse if I use jpg.. I've gotta get it tiny or it will be horribly laggy.

Is There Any Specific Format For Respondin To A Explorers Request For A Picture?
i dont think so because for when it requested a javascript i just sent the data for it to them and it worked but that wasnt binary data it was text.

Creating A Picture Using Picturebox And The Save It In JPEG Format
How do I crate lines or boxes into a picture box and then sve it a an .jpg?

Tnx.

mØrPh

Insert Picture Doesn't ALSO Convert File Format
I am using Excel 2003, and I am wanting to insert pictures from files using a macro. My image files are HPGL files, for which I had to install a special filter (which used to be included with Word previous to 97, apparently), and they have a ".fp" extension. When I do this manually, I have to specify the particular filename, and then deal with a pop-up window called "Convert File" which makes me pick the HP format out of a list of file formats to convert from (some of which are WMF, JPEG, GIF, TIFF, you get it). Recording this into a macro gives me the same ActiveSheet.Pictures.Insert("filename.fp").Select as usual, which works in the macro as long as I have loaded the image manually already. If I haven't, running that line gives a "Run-time error '1004': Unable to get the Insert property of the Pictures class".

I believe this happens because of the special file format, and the Pictures class isn't automatically invoking the file convert thing (or at least the correct file convert thing). I can't find an object for the file conversion. If anyone knows how to do this, please help! Thanks.

Size Increases When Picture Saved As JPG Format Using IJL11.dll
Thanks a lot to all VB Group members...
I have developed a software generating JPG format picture by using the IJL11.dll. But the picture size(height&width)highly increased and generating only in 72DPI.
How can i generate a picture in its original width, height & 300dpi.

MS Chart Reliability - Radar Chart / 3D Pie Chart
I see a lot of issues with MS chart.... I'm mostly coding my charts (not using MS Chart), but I'm stuck with the Radar Chart ... I haven't found any examples to work on and I need this chart badly (a polygon with nine corners - a nonagon).

Any feedback on MS Chart? Is it reliable and stable? If it is I might end up using it to create my radar chart, but I'm not sure MS Chart can make a Radar Chart... if not then:

The image I've attached shows what I want to code.

Does anybody have any code regarding a RADAR CHART? (not an Active X, source code)

Thanks

_________________________________________________________________

Edited by - vbprog1144 on 5/19/2005 11:48:26 AM

Excel Chart - Paste Special As Picture In Excel Itself
Hi All,

I am working on a report and it needs to be generated daily. After generating and creating charts, I need to paste special those charts as "Pictures". Is there any way to do this? And also i need to paste special every single chart in the work book. I already done a code but it not working properly.. and the important point is i need to paste special the chart at the exact position where i intended to cut. Is this possible???

Pls treat this as emergency and advice me on this.

Thanks in advance..

Regards
Mohan

Embedded Chart In A Worksheet And A Chart Exisiting On Its Own Sheet
what is the difference between a Chart embedded in a worksheet and a chart existing on their own sheets. i mean what is the difference between being embedded in a worksheet and existing on their own sheets.

i came across the statement on the MSDN site

Note Charts embedded in a worksheet are members of the ChartObjects collection, whereas charts that exist on their own sheets belong to the Charts collection.

Is There A Good Graph/Chart Tool Anywhere??? MS Chart Isn't Working For Me!!!
I need to graph 4 columns of data against a time (x-axis) produced from a SQL select in VS.net. I've tried working with the MS chart, but its hard to work with and looks even worse.

I'm looking for something that can produce a "smooth" line chart.

Does anyone know of a GOOD graph/chart tool compatible with VS.net (windows app though, not Web app.)???

And if it is a free tool, that would be even better!!!

Julez

Create Chart In Access Using Chart Object
Code:

Dim rpt As Access.Report
Dim ctlObjFrame As Access.ObjectFrame
Dim SQL As String
Dim cw_rs As DAO.Recordset

SQL = "SELECT (Format([Date1],'DDDDD')),Sum([Events]) AS [SumOfEvents] FROM [Data] GROUP BY (Int([Date1])),(Format([Date1],'DDDDD'))"
Set rpt = CreateReport
Set ctlObjFrame = CreateReportControl(rpt.Name, acObjectFrame, , "", "", 100, 100)
Set cw_rs = CodeDb.OpenRecordset(SQL, dbopendynaset)
cw_rs.MoveFirst
ctlObjFrame.OleData= cw_rs!ChartObject
DoCmd.Restore
I got the above code from a site. It creates a new report & an objectFrame. But during run-time it gives error in "ctlObjFrame.OleData" as "Items not found in the collections" error. Can anyone please tell me why i get this error.

Chart Director Chart Viewer
i have a sample code here for my graph:

Public Sub createChart(viewer As Object, img As String)

Dim cd As New ChartDirector.API
Dim i As Integer
'The XY points for the scatter chart
Dim dataX0()
dataX0 = Array(summationx)
Dim dataY0()
dataY0 = Array(summationy)

' Dim dataX1((frminput.txtx(i - 1)))
' dataX1 = Array((frminput.txty(i - 1)))
'
' Dim dataY1()
' dataY1 = Array()

'Create a XYChart object of size 450 x 420 pixels
Dim c As XYChart
Set c = cd.XYChart(1000, 1000)

'Set the plotarea at (55, 65) and of size 350 x 300 pixels, with a light grey
'border (0xc0c0c0). Turn on both horizontal and vertical grid lines with light
'grey color (0xc0c0c0)
Call c.setPlotArea(55, 65, 350, 300, -1, -1, &HC0C0C0, &HC0C0C0, -1)

'Add a legend box at (50, 30) (top of the chart) with horizontal layout. Use 12
'pts Times Bold Italic font. Set the background and border color to Transparent.
Call c.addLegend(50, 30, False, "timesbi.ttf", 12).setBackground(cd.Transparent)

'Add a title to the chart using 18 pts Times Bold Itatic font.
'Call c.addTitle("Center of Gravity", "timesbi.ttf", 18)

'Set the axes line width to 3 pixels
Call c.xAxis().setWidth(3)
Call c.yAxis().setWidth(3)

'Add an orange (0xff9933) scatter chart layer, using 13 pixel diamonds as symbols

For i = 0 To UBound(arrX)
Call c.addScatterLayer(arrX, arrY, "", cd.DiamondSymbol, 13, &HFF9933)
Next

'Add a green (0x33ff33) scatter chart layer, using 11 pixel triangles as symbols
Call c.addScatterLayer(dataX0, dataY0, "Strategic Area", cd.TriangleSymbol, 13, _
&H33FF33)

'output the chart
Set viewer.Picture = c.makePicture()

'include tool tip for the chart
viewer.ImageMap = c.getHTMLImageMap("clickable", "", _
"title='[{dataSetName}] X = {x} , Y = {value} '")

End Sub

Private Sub ChartViewer1_ClickHotSpot(hotSpot As Collection, Button As Integer, Shift As Integer, X As Single, Y As Single)

End Sub

Private Sub Command1_Click()
frminput.Show
Unload Me

End Sub

Private Sub Form_Load()
createChart Me.ChartViewer1.Object, Me.Picture1
End Sub

but it seems that when ever i would put a label for the the orange point in my graph it would multiply itself like it is being arrayed. i know its kinda confusing but if you want i could post my whole program here so that you could all understand me. thanx!!!

Save A Chart Using Chart Director
Have anyone here use a activeX call Chart Director to create chart? I've successful create the chart i want but i cant seem to save the file. Here is the code i got for the save button:

Code:
Private Sub CmdSave_Click()
Dim c As XYChart
Dim strsavefile As String
With CommonDialog1
'.Filter = "Pictures (*.bmp)|*.bmp"
.DefaultExt = "JPG"
.CancelError = False
.ShowSave
strsavefile = .FileName
If strsavefile = "" Then Exit Sub
End With

Call c.makeChart("strsavefile")

End Sub

I keep getting a object or variable not set. How do i fix this?