4  4991 
Hi Endran,
Here beneath a sample
Did you know there is a newsgroup
Microsoft.public.dotnet.languages.vb
I hope this sample helps anyway?
Cor
\\\made by Herfried.K.Wagner, Fergus Cooney and Cor Ligthert
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Dim g As New System.Drawing.Drawing2D.GraphicsPath
g.AddString( _
"Endran", _
System.Drawing.FontFamily.GenericSansSerif, _
System.Drawing.FontStyle.Bold, _
200, _
New Point(0, 0), _
System.Drawing.StringFormat.GenericDefault _
)
Me.BackColor = Color.Red
Me.Region = New System.Drawing.Region(g)
g.Dispose()
Me.AutoScaleBaseSize = New System.Drawing.Size(0, 0)
Me.ClientSize = New System.Drawing.Size(800, 800)
Button1.BackColor = System.Drawing.SystemColors.ActiveCaptionText
Button1.ForeColor = System.Drawing.Color.Red
Button1.Location = New System.Drawing.Point(50, 40)
Button1.Size = New System.Drawing.Size(20, 20)
Button1.Text = "X"
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Button1.Click
Me.Close()
End Sub
///
Hi Endran,
Here beneath a sample
Did you know there is a newsgroup
Microsoft.public.dotnet.languages.vb
I hope this sample helps anyway?
Cor
\\\made by Herfried.K.Wagner, Fergus Cooney and Cor Ligthert
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Dim g As New System.Drawing.Drawing2D.GraphicsPath
g.AddString( _
"Endran", _
System.Drawing.FontFamily.GenericSansSerif, _
System.Drawing.FontStyle.Bold, _
200, _
New Point(0, 0), _
System.Drawing.StringFormat.GenericDefault _
)
Me.BackColor = Color.Red
Me.Region = New System.Drawing.Region(g)
g.Dispose()
Me.AutoScaleBaseSize = New System.Drawing.Size(0, 0)
Me.ClientSize = New System.Drawing.Size(800, 800)
Button1.BackColor = System.Drawing.SystemColors.ActiveCaptionText
Button1.ForeColor = System.Drawing.Color.Red
Button1.Location = New System.Drawing.Point(50, 40)
Button1.Size = New System.Drawing.Size(20, 20)
Button1.Text = "X"
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Button1.Click
Me.Close()
End Sub
///
Cor Ligthert Thanks a lot. I am new for this group -----Original Message-----
Hi Endran,
Here beneath a sample
Did you know there is a newsgroup
Microsoft.public.dotnet.languages.vb
I hope this sample helps anyway?
Cor
\\\made by Herfried.K.Wagner, Fergus Cooney and Cor
LigthertPrivate Sub Form1_Load(ByVal sender As System.Object,
ByVal e AsSystem.EventArgs) Handles MyBase.Load
Dim g As New System.Drawing.Drawing2D.GraphicsPath
g.AddString( _
"Endran", _
System.Drawing.FontFamily.GenericSansSerif, _
System.Drawing.FontStyle.Bold, _
200, _
New Point(0, 0), _
System.Drawing.StringFormat.GenericDefault _
)
Me.BackColor = Color.Red
Me.Region = New System.Drawing.Region(g)
g.Dispose()
Me.AutoScaleBaseSize = New System.Drawing.Size(0, 0)
Me.ClientSize = New System.Drawing.Size(800, 800)
Button1.BackColor =
System.Drawing.SystemColors.ActiveCaptionTextButton1.ForeColor = System.Drawing.Color.Red
Button1.Location = New System.Drawing.Point(50, 40)
Button1.Size = New System.Drawing.Size(20, 20)
Button1.Text = "X"
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e
AsSystem.EventArgs) Handles Button1.Click
Me.Close()
End Sub
///
.
Cor Ligthert Thanks a lot. I am new for this group -----Original Message-----
Hi Endran,
Here beneath a sample
Did you know there is a newsgroup
Microsoft.public.dotnet.languages.vb
I hope this sample helps anyway?
Cor
\\\made by Herfried.K.Wagner, Fergus Cooney and Cor
LigthertPrivate Sub Form1_Load(ByVal sender As System.Object,
ByVal e AsSystem.EventArgs) Handles MyBase.Load
Dim g As New System.Drawing.Drawing2D.GraphicsPath
g.AddString( _
"Endran", _
System.Drawing.FontFamily.GenericSansSerif, _
System.Drawing.FontStyle.Bold, _
200, _
New Point(0, 0), _
System.Drawing.StringFormat.GenericDefault _
)
Me.BackColor = Color.Red
Me.Region = New System.Drawing.Region(g)
g.Dispose()
Me.AutoScaleBaseSize = New System.Drawing.Size(0, 0)
Me.ClientSize = New System.Drawing.Size(800, 800)
Button1.BackColor =
System.Drawing.SystemColors.ActiveCaptionTextButton1.ForeColor = System.Drawing.Color.Red
Button1.Location = New System.Drawing.Point(50, 40)
Button1.Size = New System.Drawing.Size(20, 20)
Button1.Text = "X"
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e
AsSystem.EventArgs) Handles Button1.Click
Me.Close()
End Sub
///
. This thread has been closed and replies have been disabled. Please start a new discussion. Similar topics
by: Paul Schnitter |
last post by:
Update:
My custom control is based on the article
"Creating Visual Basic .NET controls from scratch"
in "Adventures in .NET" on MSDN.
It is designed to be a replacement for the VB6 shape...
|
by: autogoor |
last post by:
Hi,
I have a web page for user to input rectangle dimensions, say (10, 10,
100, 40), and then forward the information to a cgi with a url
something like...
|
by: MS |
last post by:
Is there a way of srawing rectangles on a form in code?
Using the line method on a report works fine. Is there an eqivalent for a
form?
Cheers!
|
by: Giox |
last post by:
Hello everybody, I have a little problm using custom shape windows
form. I 'm using the idea illustrated in MSDN (use of TransparenceKey)
and all works well but as spoecified on MSDN this works...
|
by: Ken Allen |
last post by:
I just upgraded to Visual Studio .NET and I'm impressed
with the ease you can do some otherwise time consuming
tasks. I've noticed that when making nonrectangular forms
using the transparencykey...
|
by: dsvagelj |
last post by:
Hi. I wanted to create a non rectangular form (Winamp, BSPlayer), and I
followed the instructions in MSDN on the topic. Created a bitmap, set
the background color of the bitmap to blue 0000ff, set...
|
by: saravanansvks |
last post by:
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...
|
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...
|
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...
|
by: KevinRR |
last post by:
Hi,
this it a sample code. let say I draw squares on a form
SolidBrush myBrush = new SolidBrush(Color.Red);
Graphics formGraphics = formnew.CreateGraphics();
...
|
by: Charles Arthur |
last post by:
How do i turn on java script on a villaon, callus and itel keypad mobile phone
|
by: emmanuelkatto |
last post by:
Hi All, I am Emmanuel katto from Uganda. I want to ask what challenges you've faced while migrating a website to cloud.
Please let me know.
Thanks!
Emmanuel
|
by: BarryA |
last post by:
What are the essential steps and strategies outlined in the Data Structures and Algorithms (DSA) roadmap for aspiring data scientists? How can individuals effectively utilize this roadmap to progress...
|
by: Sonnysonu |
last post by:
This is the data of csv file
1 2 3
1 2 3
1 2 3
1 2 3
2 3
2 3
3
the lengths should be different i have to store the data by column-wise with in the specific length.
suppose the i have to...
|
by: marktang |
last post by:
ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However,...
|
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,...
|
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...
|
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...
|
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,...
| |
