Improper Month Being Displayed In ComboBox

[Ark68]

This line of code is not giving me the rsults I expect.

.uf1_month.Value = Format(usr_mnth, "mmm")

usr_mnth = 4

Expecting the value of combobox uf1_month to be "Apr" but it's being displayed as "Jan"

Corrections?

 

[MARK858]

Maybe

.uf1_month.Value = Format(DateSerial(2019, usr_mnth, 1), "mmm")

or

.uf1_month.Value = MonthName(usr_mnth, 1)

 

[Ark68]

Thankyou Mark ... you pointed me in the right direction with your suggstion!

 

[MARK858]

You're welcome (btw my edit added another suggestion if you didn't see it). Why you were getting the wrong result is using 4 in the format was giving the 4th day in 1900 i.e. 4th January 1900.