VB.NET Iterating controls fails

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   Dear Codejock team.
I have a form which look for translation in a resource table.
I have that iterate every control in the form to translate the Caption or Text property, however, I cant access to the axGroupBoxes Caption property.

How can I do to modify this property?

Next, the code:

For Each MiControl As Control In Formulario.
    If TypeOf MiControl Is Label Then

        'This part works fine
        CadenaOriginal = MiControl.Text
         MiControl.Text = My.Resources.Cadenas.ResourceManager.GetObject(MiControl.Tag)

     ElseIf TypeOf MiControl Is AxXtremeSuiteControls.AxGroupBox Then
                        CadenaOriginal = MiControl2.Caption 'This line causes error, because the Control has no the Caption property.
                        MiControl2.Caption = My.Resources.Cadenas.ResourceManager.GetObject(MiControl2.Tag)
     End If
Next

Sadly, I have seen that the Codejock support for Visual.NET is poor: help, samples, documentation even the forum.

May you please, give some hints to resolve this problem?

Best regards, 

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
ElvisM Members Profile Send Private Message Find Members Posts Add to Buddy List Senior Member Joined: 12 October 2006 Location: Venezuela Status: Offline Points: 129	Post Options Post Reply Quote ElvisM Report Post Thanks(0) Quote Reply Topic: VB.NET Iterating controls fails Posted: 26 June 2016 at 7:16pm
	Dear Codejock team. I have a form which look for translation in a resource table. I have that iterate every control in the form to translate the Caption or Text property, however, I cant access to the axGroupBoxes Caption property. How can I do to modify this property? Next, the code: For Each MiControl As Control In Formulario. If TypeOf MiControl Is Label Then 'This part works fine CadenaOriginal = MiControl.Text MiControl.Text = My.Resources.Cadenas.ResourceManager.GetObject(MiControl.Tag) ElseIf TypeOf MiControl Is AxXtremeSuiteControls.AxGroupBox Then CadenaOriginal = MiControl2.Caption 'This line causes error, because the Control has no the Caption property. MiControl2.Caption = My.Resources.Cadenas.ResourceManager.GetObject(MiControl2.Tag) End If Next Sadly, I have seen that the Codejock support for Visual.NET is poor: help, samples, documentation even the forum. May you please, give some hints to resolve this problem? Best regards,
	Product: Xtreme SuitePro (ActiveX) version 17.2 Platform: Windows 10 64bits Language: Visual Basic 2015