based on combobox text select textbox for add data

[shalva.gelashvili]

Hi everybody,

I have a combo1 with values "Jan, Feb, Mar, Apr, May"

also text boxes - Jan , Feb, Mar, Apr, May

based on combo1 selection add some data to the textbox which hase the same name as combo1 selection

Thanks

 

[keirnus]

Hi everybody,

I have a combo1 with values "Jan, Feb, Mar, Apr, May"

also text boxes - Jan , Feb, Mar, Apr, May

based on combo1 selection add some data to the textbox which hase the same name as combo1 selection

Thanks

try using OnChange event of the Combobox...
then inside it, append the value of the textbox...
you said "add", right?

 

[shalva.gelashvili]

not exactly

I have some variable i

i want to append i to the text box which has the same name as the selected combo box

 

[Rich]

Why do you have separate fields for each month?

 

[Rich]

http://www.access-programmers.co.uk/forums/showthread.php?t=156416

 

[Rich]

Re: Variable as textbox name

http://www.access-programmers.co.uk/forums/showthread.php?p=750046#post750046

 

[Brianwarnock]

http://www.access-programmers.co.uk/forums/showthread.php?t=156418

 

[Rich]

wrong link to the dp Bri

 

[nIGHTmAYOR]

the easy way would be
in On_Cange event :
Select Case [Me]![Combo1]
Case "Jan"
[Me]![jan] = [Me]![Combo1]
Case "Feb"
[Me]![feb] = [Me]![Combo1]

etc..

Case Else
[Me]![jan]=""
[Me]![feb]=""
etc..
End Select

 

[pono1]

I prefer nightmayor's solution because it's clear what the code is doing...

 Select Case ComboName.Value
     Case "Jan"
       Me.Jan = "Hi"
     Case "Feb"
       Me.Feb = "Hi"
     Case "Mar"
       Me.Mar = "Hi"
 End Select

Yet you could also do this...

  Forms(Me.Name)(Me.ComboName.Value) = "blah"

Regards,
Tim