Click here to Skip to main content
12,458,167 members (56,681 online)
Click here to Skip to main content
Add your own
alternative version

Stats

24.1K views
244 downloads
20 bookmarked
Posted

PercentageUpDown Control

, 29 Jun 2009 CPOL
Rate this:
Please Sign up or sign in to vote.
Specialized version of the NumericUpDown control for entering and displaying percentage values.

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)

Share

About the Author

pinx
Software Developer
Netherlands Netherlands
My first encounters with computers where Sinclair, TI99-4A, C64, Apple II. Have programmed ever since. Worked for a few logistic companies.
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, Delivery+, that helps vehicle planners with their daily job.
I am married and I have two children. I am building an eco-friendly house and try to live green.

You may also be interested in...

Pro
Pro

Comments and Discussions

 
QuestionHow to use Pin
8844316-Aug-07 18:03
member8844316-Aug-07 18:03 
QuestionAny idea how to make a AlphabeticUpDown Class? Pin
Bob Schader13-Apr-07 6:52
memberBob Schader13-Apr-07 6:52 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

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

| Advertise | Privacy | Terms of Use | Mobile
Web01 | 2.8.160826.1 | Last Updated 30 Jun 2009
Article Copyright 2006 by pinx
Everything else Copyright © CodeProject, 1999-2016
Layout: fixed | fluid