[AccessD] Circle method

Gustav Brock gustav at cactus.dk
Fri Aug 29 05:16:09 CDT 2003


Hi Susan

So what did you expect these to look like?

/gustav


> Below, I've listed a simple example of using the Circle method. There are
> three sets of circles in each example, and the first two are commented
> out -- simply uncomment and comment to see the variety, but that's not the
> question. The same arguments are producing different results in different
> databases on the same system -- which I find truly odd. An editor re-created
> the example on his system and they samples were very different. He then,
> copied his code from his sample database into mine and they worked as
> expected -- truly odd since both mdbs were running on the same system. Any
> clues? I'm clueless.

> Susan H.

> Private Sub Report_Page()
>   Me.DrawWidth = 50
>   'Me.Circle (Me.ScaleWidth / 2, Me.ScaleHeight / 2), 2000, vbRed, 0, 3.142
>   'Me.Circle (Me.ScaleWidth / 2, Me.ScaleHeight / 2), 1700, vbYellow, 0,
> 3.142
>   'Me.Circle (Me.ScaleWidth / 2, Me.ScaleHeight / 2), 1400, vbBlue, 0, 3.142
>   'Me.Circle (0, 0), 2000, vbRed, , 3.142
>   'Me.Circle (0, 0), 1700, vbYellow, , 3.142
>   'Me.Circle (0, 0), 1400, vbBlue, , 3.142
>   Me.Circle (Me.ScaleWidth / 2, Me.ScaleHeight / 2), 2000, vbRed, , , 1
>   Me.Circle (Me.ScaleWidth / 2, Me.ScaleHeight / 2), 1700, vbYellow, , , 1
>   Me.Circle (Me.ScaleWidth / 2, Me.ScaleHeight / 2), 1400, vbBlue, , , 1
> End Sub
-------------- next part --------------
A non-text attachment was scrubbed...
Name: Susan2.gif
Type: image/gif
Size: 9665 bytes
Desc: not available
URL: <http://databaseadvisors.com/pipermail/accessd/attachments/20030829/601a7006/attachment-0002.gif>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: Susan1.gif
Type: image/gif
Size: 5117 bytes
Desc: not available
URL: <http://databaseadvisors.com/pipermail/accessd/attachments/20030829/601a7006/attachment-0003.gif>


More information about the AccessD mailing list