473,738 Members | 6,332 Online
Bytes | Software Development & Data Engineering Community
+ Post

Home Posts Topics Members FAQ

Coding for Shape Opeartor

1 New Member
Dear Friends,
I have prepared a programme in Visual Basic for SHAPE OPERATOR.But my coding are changing the shape only.It does not changes the fill style of the shape tool .And it is not giving ant error msg. Anyhow anybody knows if there is any error in its please write to me.I am needed this programme for my assignment.

MY CODING :
Private Sub Command1_Click( )
Dim i%
If (Option1.Value = True) Then
Shape1.Shape = 0
Shape1.Visible = True
End If
If (Option2.Value = True) Then
Shape1.Shape = 1
Shape1.Visible = True
End If
If (Option3.Value = True) Then
Shape1.Shape = 2
Shape1.Visible = True
End If
If (Option4.Value = True) Then
Shape1.Shape = 3
Shape1.Visible = True
End If
If (Option5.Value = True) Then
Shape1.Shape = 4
Shape1.Visible = True
End If
If (Option6.Value = True) Then
Shape1.Shape = 5
Shape1.Visible = True
End If
For i = 0 To (List1.ListCoun t) Step -1
If (List1.Selected (i) = True) Then
List1Fill.Style = (i)
End If
Next
End Sub

Private Sub Command2_Click( )
End
End Sub

Private Sub Form_Load()
List1.AddItem "solid"
List1.AddItem "Transparen t"
List1.AddItem "HorizontalLine "
List1.AddItem "vertical Line"
List1.AddItem "Upward Diagonal"
List1.AddItem "Downward Diagonal"
List1.AddItem "Cross"
List1.AddItem "Diagonal Cross"
End Sub



Pl. reply to me
Sep 3 '06 #1
0 1926

Sign in to post your reply or Sign up for a free account.

Similar topics

0
1945
by: minjie | last post by:
Hello, I have several reports that were written with ADO shape command (in C++) to access Microsoft Access database. Now we have migrated all the data from Access to DB2 UDB (version 8.1), and the shape command does not work any more. I have changed the provider and connection string from: pConn->Provider = "MSDataShape"; SAFE_CALL( pConn->Open( "DBQ=myAccessDB.mdb; DefaultDir=.; Driver={Microsoft Access Driver (*.mdb)};", "sa", "", 0...
144
6910
by: Natt Serrasalmus | last post by:
After years of operating without any coding standards whatsoever, the company that I recently started working for has decided that it might be a good idea to have some. I'm involved in this initiative. Typically I find that coding standards are written by some guy in the company who has a way of coding that he likes and then tries to force everybody else to write code the way he likes it, not for any rational reason, but simply for the...
3
2210
by: PM | last post by:
Hi, Im a student currently designing a game for a project. As part of my game, I want to be able to drag a shape over a series of panels. The shape needs to be able to be dropped on any of the panels. If the shape is dropped outside any of the panels, I want it to be returned to its original position.
0
1972
by: nets-rac | last post by:
Hi, I use c# to automate powerpoint. I created a new shape with PowerPoint.Shape shape = slide.Shapes.AddTextbox(MsoTextOrientation.msoTextOrientationHorizontal, left, top, width, height); shape.TextFrame.TextRange.Text = text; Now I want the text to be right-aligned but I can't find a solution!
1
2990
by: JWest46088 | last post by:
I am a little confused about what I need to do here. I created four separate classes (Circle, Rectangle, Square, and Triangle) that each calculate their own area and perimeter via user input. Now I have to extend the Shape class with Circle and Rectangle classes, first. Then, I have to extend Rectangle with Square and Triangle classes. Was I supposed to calculate the area and perimeter of the four shapes in the Shape class, or did I do it...
5
8847
by: Peter Webb | last post by:
I have created two sets of circles using addshape, innercircle(i) and outercircle(i), and I want to group them in pairs so innercircle(1) and outercircle(1) are grouped, etc. I am supposed to be able to use the shapes.range(array()).group command to do this. This works if I just stick numbers in at random, but I actually want to put in the index numbers for innercircle(i) and outercircle(i). I have tried everything I can think of. How...
1
2392
by: divinechick | last post by:
Hi, went to freewebs css editor and pasted my code: <STYLE type="text/css"> <!--BODY {scrollbar-face-color: #fffffff; scrollbar-highlight-color: #867955; scrollbar-3dlight-color: #867955; scrollbar-darkshadow-color: #867955; scrollbar-shadow-color: #867955; scrollbar-arrow-color: #867955; scrollbar-track-color: #140313;}-->
4
3897
by: Linda Liu[MSFT] | last post by:
Hi Moondaddy, I downloaded your sample project and run it and did see the problem on my side. There're three problems in the source code of your project. 1. You should move the following lines of code from the GetGeometry method within the CustomPolyLine class: _points.Add(new Point(10, 10));
12
4340
by: ab12 | last post by:
I'm trying to write a program in C that gets a shape outlined with asterisks from the user, and returns that shape filled with asterisks. It will also get the coordinates of a point inside the shape from which to start filling. I need to use recursion here. for example, to be clear: input: (ignore the line, think of that as blank space) ***** *___* ***** coordinates are (2,1) /*its an array so numbering will start from 0*/ output...
0
8787
by: Hystou | last post by:
Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can effortlessly switch the default language on Windows 10 without reinstalling. I'll walk you through it. First, let's disable language synchronization. With a Microsoft account, language settings sync across devices. To prevent any complications,...
0
9473
Oralloy
by: Oralloy | last post by:
Hello folks, I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>". The problem is that using the GNU compilers, it seems that the internal comparison operator "<=>" tries to promote arguments from unsigned to signed. This is as boiled down as I can make it. Here is my compilation command: g++-12 -std=c++20 -Wnarrowing bit_field.cpp Here is the code in...
0
9334
jinu1996
by: jinu1996 | last post by:
In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven tapestry of website design and digital marketing. It's not merely about having a website; it's about crafting an immersive digital experience that captivates audiences and drives business growth. The Art of Business Website Design Your website is...
1
9259
by: Hystou | last post by:
Overview: Windows 11 and 10 have less user interface control over operating system update behaviour than previous versions of Windows. In Windows 11 and 10, there is no way to turn off the Windows Update option using the Control Panel or Settings app; it automatically checks for updates and installs any it finds, whether you like it or not. For most users, this new feature is actually very convenient. If you want to control the update process,...
0
9208
tracyyun
by: tracyyun | last post by:
Dear forum friends, With the development of smart home technology, a variety of wireless communication protocols have appeared on the market, such as Zigbee, Z-Wave, Wi-Fi, Bluetooth, etc. Each protocol has its own unique characteristics and advantages, but as a user who is planning to build a smart home system, I am a bit confused by the choice of these technologies. I'm particularly interested in Zigbee because I've heard it does some...
0
8208
agi2029
by: agi2029 | last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing, and deployment—without human intervention. Imagine an AI that can take a project description, break it down, write the code, debug it, and then launch it, all on its own.... Now, this would greatly impact the work of software developers. The idea...
1
3279
by: 6302768590 | last post by:
Hai team i want code for transfer the data from one system to another through IP address by using C# our system has to for every 5mins then we have to update the data what the data is updated we have to send another system
2
2744
muto222
by: muto222 | last post by:
How can i add a mobile payment intergratation into php mysql website.
3
2193
bsmnconsultancy
by: bsmnconsultancy | last post by:
In today's digital era, a well-designed website is crucial for businesses looking to succeed. Whether you're a small business owner or a large corporation in Toronto, having a strong online presence can significantly impact your brand's success. BSMN Consultancy, a leader in Website Development in Toronto offers valuable insights into creating effective websites that not only look great but also perform exceptionally well. In this comprehensive...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.