Click here to Skip to main content
6,822,613 members and growing! (20,655 online)
Email Password   helpLost your password?
Desktop Development » Edit Controls » General     Beginner License: The Code Project Open License (CPOL)

PercentageUpDown Control

By Pinx

Specialized version of the NumericUpDown control for entering and displaying percentage values.
VB, Windows, .NET, Visual-Studio, WinForms, Dev
Revision:4 (See All)
Posted:14 Dec 2006
Updated:29 Jun 2009
Views:13,048
Bookmarked:19 times
printPrint   add Share
      Discuss Discuss   Broken Article?Report  
4 votes for this article.
Popularity: 2.15 Rating: 3.57 out of 5
1 vote, 25.0%
1

2

3
1 vote, 25.0%
4
2 votes, 50.0%
5

Sample Image - PercentageUpDown.jpg

Introduction

I have been looking for a good way for entering percentages in the same way as numeric values are entered. In the past, I used a normal NumericUpDown, put a label behind it with "%", and did the mathematics of multiplying with and dividing by 100 in the form.

There is, of course, a better way to do it. Maybe, it's because it is so simple that nobody has published the source code for it on CodeProject. The control I present here also makes it easy to bind to floating point fields in a dataset.

By the way, I made the control look properly themed with Skybound's VisualStyles. To make it work, you have to put Skybound.VisualStyles.VisualStyleContext.Create() between the form's MyBase.New and InitializeComponent.

Source Code

Because it is so small, I give you the complete source code listing here. It is written in VB.NET, but I'm sure you can convert it to C#.

Public Class PercentageUpDown _
    Inherits Windows.Forms.NumericUpDown

    Public Overrides Sub DownButton()
        If Not Me.ReadOnly Then
            MyBase.DownButton()
        End If
    End Sub

    Public Overrides Sub UpButton()
        If Not Me.ReadOnly Then
            MyBase.UpButton()
        End If
    End Sub

    Public Overrides Property Text() As String
        Get
            Return MyBase.Text.TrimEnd("%")
        End Get
        Set(ByVal Value As String)
            MyBase.Text = Value & "%"
        End Set
    End Property

    <System.ComponentModel.Category("Data"), _
     System.ComponentModel.DefaultValue(0.0)> _
    Public Shadows Property Value() As Double
        Get
            Return MyBase.Value / 100
        End Get
        Set(ByVal Value As Double)
            MyBase.Value = Value * 100
        End Set
    End Property
End Class

License

This article, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

About the Author

Pinx


Member
I have been a VB.NET programmer for quite some years. I work with a small firm, that specializes in supply chain planning for bulk products. We have our own application, VMIScheduler, that helps vehicle planners with their daily job.
I am married and I have two children.
Occupation: Web Developer
Location: Netherlands Netherlands

Other popular Edit Controls articles:

Article Top
You must Sign In to use this message board.
FAQ FAQ 
 
Noise Tolerance  Layout  Per page   
 Msgs 1 to 2 of 2 (Total in Forum: 2) (Refresh)FirstPrevNext
QuestionHow to use Pinmember8844319:03 16 Aug '07  
QuestionAny idea how to make a AlphabeticUpDown Class? PinmemberBob Schader7:52 13 Apr '07  

General General    News News    Question Question    Answer Answer    Joke Joke    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads.

PermaLink | Privacy | Terms of Use
Last Updated: 29 Jun 2009
Editor: Smitha Vijayan
Copyright 2006 by Pinx
Everything else Copyright © CodeProject, 1999-2010
Web21 | Advertise on the Code Project