Microsoft KB Archive/109630

{|
 * width="100%"|

WD: WordBasic Examples: DrawRotateLeft, DrawRotateRight

 * }

Q109630

-

The information in this article applies to:


 * Microsoft Word for Windows, versions 6.0, 6.0a, 6.0c
 * Microsoft Word for Windows NT, version 6.0
 * Microsoft Word for Windows, versions 7.0, 7.0a
 * Microsoft Word for the Macintosh, versions 6.0, 6.0.1

-

SUMMARY
This article contains an example that demonstrates the use of the following WordBasic statements and functions:

"DrawRotateLeft, DrawRotateRight" This article supplements the information in online Help. To open this Help topic, choose Contents from the Help menu and then choose the "Programming with Microsoft Word" topic.

WARNING: ANY USE BY YOU OF THE CODE PROVIDED IN THIS ARTICLE IS AT YOUR OWN RISK. Microsoft provides this macro code "as is" without warranty of any kind, either express or implied, including but not limited to the implied warranties of merchantability and/or fitness for a particular purpose.

Syntax
DrawRotateLeft

DrawRotateRight

Example
The following macro draws an ellipse and then rotates it 10 times in each direction.

  Sub MAIN If SelInfo(27) = - 1 Then FileNewDefault DrawEllipse FormatDrawingObject .HorizontalPos = 200, .VerticalPos = 200, \ .Width = 200, .FillPatternColor = 1, .FillPattern = 16 For Count = 1 To 10 DrawRotateRight Next Count For Count = 1 To 10 DrawRotateLeft Next Count End Sub Additional query words: macro

Keywords : kb3rdparty kbprint kbfield winword macword word6 winword2 word7 word95

Issue type : kbinfo

Technology :