none
Dollar sign does not display on field defined as Currency in Access 2016 RRS feed

  • Question

  • Anyone,

      I have an unbound field on the form that is defined as Currency, 2 decimal places.  It is stored in the database as Currency with 2 decimal places.  When I get the record, I move the field to a combo box, where is displays with the dollar sign.  The combo box has a format of currency also.  When I move it to the form field, is display without the dollar sign.  The dollar sign is on the table and in the combo box, it just does not display when I move it to the form field on the screen.  I have played with settings for a while and cannot get it to display with the dollar sign.  Yet, if I enter a value in the field and tab to the next, the dollar sign displays.  It just does not when I get the value from the table.  Any ideas would be appreciated!

    Tuesday, January 2, 2018 7:48 PM

Answers

  • Hi,

    I would suggest trying the following:

    1. Set the Format property of the Textbox to Currency

    2. Make sure it is unbound (empty Control Source)

    3. Move the value using the following code:

    Me.InvcNoShippingName = CCur(Me.cboInvcNoShipping.ItemData(cboCount - 1))

    Note: Interesting name for a currency value (InvcNoShippingName).

    Hope it helps...

    • Marked as answer by ballj_351 Tuesday, January 2, 2018 8:21 PM
    Tuesday, January 2, 2018 8:12 PM

All replies

  • Hi,

    How exactly are you "moving" the value from the Combobox to the Textbox? Have you tried using the CCur() function?

    Tuesday, January 2, 2018 8:00 PM
  • yes I did use hat function.  Yet, it rounds the value up.  I entered 12.90, which is also stored on the table.  When I use the CCUR function, it makes the field 13, not even 13.00.  I move the field as follows:

     Me.InvcNoShippingName = cboInvcNoShipping.ItemData(cboCount - 1)

    Tuesday, January 2, 2018 8:07 PM
  • Hi,

    I would suggest trying the following:

    1. Set the Format property of the Textbox to Currency

    2. Make sure it is unbound (empty Control Source)

    3. Move the value using the following code:

    Me.InvcNoShippingName = CCur(Me.cboInvcNoShipping.ItemData(cboCount - 1))

    Note: Interesting name for a currency value (InvcNoShippingName).

    Hope it helps...

    • Marked as answer by ballj_351 Tuesday, January 2, 2018 8:21 PM
    Tuesday, January 2, 2018 8:12 PM
  • Fixed.  Awesome.  Your the man!!!!!!!  Thank you very much.
    Tuesday, January 2, 2018 8:21 PM
  • Hi,

    You're welcome. Glad to hear you got it to work. Good luck with your project.

    Tuesday, January 2, 2018 9:05 PM