string in command 1

[andzejek]

Hi!

How to replace portion of command with a string. Here is the code:

dim myStr as string
myStr="5"

me.textbox&myStr..setfocus - this works in VFP, but how to

make it works in MsAccess?

 

[jrbarnett]

Do you want to put the contents of myStr into the textbox then set focus to that textbox?

If so:

Dim myStr As String

myStr = "5"
Me.Textbox.Text = myStr
Me.Textbox.SetFocus

If I have misunderstood your request, can you explain please?

John

 

[andzejek]

Yes you did.
I want to be able to set focus(or something else) to different controls of which names I don't know at design time. Name of these controls will determined at run time.

Andrew

 

[Ed2020]

Andrew,

If I've understood correctly I think you probably want to do something like this:

   '...controls have already been created, strCtrlName declared and contains name of control you wish to set focus to
   Me.Controls(strCtrlName).SetFocus

Ed Metcalfe

Please do not feed the trolls.....

 

[andzejek]

Ok, thank you; I will try this and get back to you later today.

 

[andzejek]

hi!
Ok, it is working for setfocus, but why it does not working for enable - error message "object does not support this method or property

 

[dhookom]

You don't have to set the focus in order to set the value of a control. Setting the focus is only required if you want to update the text property. This is rarely used since the default is to set the Value property.

There is no "enable" property. I think you want something like:

Me(strCtrlName).Enabled =  True

Duane MS Access MVP
[green]Ask a great question, get a great answer.[/green] [red]Ask a vague question, get a vague answer.[/red]
[green]Find out how to get great answers faq219-2884.[/green]

 

[Ed2020]

Or it could be that the control type you are working with cannot be enabled/disabled...

Also remember that a control cannot be disabled whilst it has focus.

Ed Metcalfe.

Please do not feed the trolls.....

 

[andzejek]

this same error message!

I know about focus and enabling/disabling controls. All I want to do is dynamically(depend on conditions) change properties of some labels and textboxes.

Thanks!

 

[Ed2020]

Post you code.

Ed Metcalfe.

Please do not feed the trolls.....

 

[andzejek]

dim myStr as string
dim strCtrlName as control

for n=3 to 7
myStr=trim(str)
strCtrlName="textbox" & myStr
Me(strCtrlName).Enabled = True
next n

 

[PHV]

Replace this:
dim strCtrlName as control
with this:
Dim strCtrlName As String
Dim n As Integer

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[andzejek]

Thank you, it is working now!