[RESOLVED] Object variable or With block variable not set (Error 91) Usercontrol

[Nightwalker83]

Hi,

I am moving some code of mine over to a user control but I am receiving "Object variable or With block variable not set (Error 91)" when I click the command button.

 Public UserControl1 As UserControl1
Private Sub cmdRoll_Click()
 UserControl1.Roll
End Sub

Private Sub Form_Load()
 Set UserControl1 = UserControl1
End Sub

If I change the set line to

 Set UserControl1 = New UserControl1

I receive "Invalid use of New keyword".

Why is this happening?

Thanks,


Nightwalker

[DataMiser]

Why would you try to set an object to a new instance of an object and use the same name as the original. Even if that would work it would be rather silly and a total waste of code and cpu time.


Have you added the usercontrol to your form?

If so does it not have the name UserControl11 ? That would be the default.

Also if it is added then you do not need to dim it and you do not need to set it and if you did you would have to use a different name from the original.

For example you can

Dim txtB as TextBox
Set txtB=Text1

You can not

Dim TextBox as textbox
Set TextBox=TextBox

Also if you want to add a control at run time then you have to use the add method of the controls collection

[Nightwalker83]

If so does it not have the name UserControl11 ? That would be the default.

That was the problem! For some reason the default control had a name of "UserControl11" when I placed on the form even though double checking the name of the user control in the IDE it is "UserControl1". Removing the extra "1" solved the problem. Although, I still do not understand why it the default did not have the same name as the user control?

[LaVolpe]

Although, I still do not understand why it the default did not have the same name as the user control?

Copy and paste 3 textboxes to a form and you get: Text1, Text2, Text3. So copy 3 Usercontrol1 and you get Usercontol11, Usercontol12, Usercontol13

[DataMiser]

Yep the real problem is that you did not name your user control. By default it will be UserControl1 and when you add any control to a form it always takes its name and adds a number by default the first 1 being 1 so with a default user control you get UserControl11. This is normal behavior

[Nightwalker83]

Copy and paste 3 textboxes to a form and you get: Text1, Text2, Text3. So copy 3 Usercontrol1 and you get Usercontol11, Usercontol12, Usercontol13

Yep the real problem is that you did not name your user control. By default it will be UserControl1 and when you add any control to a form it always takes its name and adds a number by default the first 1 being 1 so with a default user control you get UserControl11. This is normal behavior

Thanks!