p2p.wrox.com: Archives - access archive

access thread: Formatting % in Access 2000

Message #1 by "Anonymous on Mon, 21 Jan 2002 22:53:13


Hi,



I am using the percent format and datatype in one of my forms.  But every 

figure that is put into the textbox is multiplied by 100 and the % added 

on at the end.  So, if a user enters 10 into the textbox and tabs to the 

next control, it appears as 1000%.  (He needs to enter .1 into the textbox 

for it to come up as 10%)



Is there any way, I can format this, so that he can enter a number and a % 

will appear at the end of it.  I tried using [fieldname & "%"] in the 

formatting box, but that didn't work.



Thanks guys!

Message #2 by "Richard" <richard@a...> on Mon, 21 Jan 2002 17:26:22 -0800

I handle the situation by checking to see if the number entered is

larger than 1 and if it is I divide by 100. The reason for thecheck is

just in case the user did put it in correctly I want to leave it alone.

Private Sub_CheckNumber(sometextbox)

	if sometextbox > 1 then sometextbox=sometextbox/100

End sub



Call this sub when the control loses focus. Do not call this sub at the

change event since the check will happen too soon.

Hope this helps.



Richard

richard@a... <mailto:richard@a...> 

Cell:  (xxx) xxx-xxxx

Fax:  (xxx) xxx-xxxx



****ORIGINAL MESSAGE*******

I am using the percent format and datatype in one of my forms.  But

every 

figure that is put into the textbox is multiplied by 100 and the % added



on at the end.  So, if a user enters 10 into the textbox and tabs to the



next control, it appears as 1000%.  (He needs to enter .1 into the

textbox 

for it to come up as 10%)

Message #3 by Anonymous on Tue, 22 Jan 2002 04:42:29 +0000

<html><div style='background-color:'><DIV>

<P>&nbsp;</P>

<P>Hi Richard,</P>

<P>Thanks for your advice.&nbsp; I changed the code slightly, but works fine, so now they can input as a decimal figure or
a whole number and it comes up as a percentage.</P>

<P>I made sure they realised they could never use a percentage figure less than 1% for this to work, but they seem happy, so
that's the main thing.</P>

<P>Thanks for your help.</P><P>Private Sub txtPercentage_LostFocus()</P>

<P>&nbsp;&nbsp;&nbsp; Dim numPercentage As Single<BR>&nbsp;&nbsp;&nbsp;
<BR>&nbsp;&nbsp;&nbsp; numPercentage = CSng(txtPercentage.Text)<BR>&nbsp;&nbsp;&nbsp;
<BR>&nbsp;&nbsp;&nbsp; If numPercentage &lt; 1 And numPercentage &gt; 0
Then<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; numPercentage = numPercentage *
100<BR>&nbsp;&nbsp;&nbsp; End If<BR>&nbsp;&nbsp;&nbsp; <BR>&nbsp;&nbsp;&nbsp;
txtPercentage.Text = numPercentage &amp; "%"<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
<BR>End Sub</P>

<DIV></DIV>

<DIV></DIV>

<P>&gt;From: "Richard" <RICHARD@A...></P></DIV>

<DIV></DIV>&gt;Reply-To: "Access" <ACCESS@P...>

<DIV></DIV>&gt;To: "Access" <ACCESS@P...>

<DIV></DIV>&gt;Subject: [access] RE: Formatting % in Access 2000 

<DIV></DIV>&gt;Date: Mon, 21 Jan 2002 17:26:22 -0800 

<DIV></DIV>&gt; 

<DIV></DIV>&gt

<DIV></DIV>&gt;I handle the situation by checking to see if the number entered is 

<DIV></DIV>&gt;larger than 1 and if it is I divide by 100. The reason for thecheck is 

<DIV></DIV>&gt;just in case the user did put it in correctly I want to leave it alone. 

<DIV></DIV>&gt;Private Sub_CheckNumber(sometextbox) 

<DIV></DIV>&gt; if sometextbox &gt; 1 then sometextbox=sometextbox/100 

<DIV></DIV>&gt;End sub 

<DIV></DIV>&gt; 

<DIV></DIV>&gt;Call this sub when the control loses focus. Do not call this sub at the 

<DIV></DIV>&gt;change event since the check will happen too soon. 

<DIV></DIV>&gt;Hope this helps. 

<DIV></DIV>&gt; 

<DIV></DIV>&gt;Richard

<DIV></DIV>&DIV></DIV>&gt;richard@a... <?xml:namespace prefix = mailto /><mailto:richard@a...

<DIV></DIV>&gt;Cell:  (xxx) xxx-xxxx 

<DIV></DIV>&gt;Fax:  (xxx) xxx-xxxx 

<DIV></DIV>&gt; 

<DIV></DIV>&gt;****ORIGINAL MESSAGE******* 

<DIV></DIV>&gt;I am using the percent format and datatype in one of my forms. But 

<DIV></DIV>&gt;every 

<DIV></DIV>&gt;figure that is put into the textbox is multiplied by 100 and the % added 

<DIV></DIV>&gt; 

<DIV></DIV>&gt;on at the end. So, if a user enters 10 into the textbox and tabs to the 

<DIV></DIV>&gt; 

<DIV></DIV>&gt;next control, it appears as 1000%. (He needs to enter .1 into the 

<DIV></DIV>&gt;textbox 

<DIV></DIV>&gt;for it to come up as 10%) 

<DIV></DIV>&gt; 

<DIV></DIV>&gt; 

<DIV></DIV>&gt;--- 

<DIV></DIV>&gt;

<DIV></DIV>&gt;

<DIV></DIV></mailto:richard@a...</div><br clear=all><hr>Chat with friends online, try MSN
Messenger: <a href='http://go.msn.com/bql/hmtag1_etl_EN.asp'>Click Here</a><br></html>

Return to Index

P2P Archives