Invalid Use Of Property in User Control

[lotus18]

Hello World!

This is my very first time to create my own user control LOL. Can anyone improve this for me? And also I'm having trouble with LoadPicture function : ) tHANkS

Rey Sean

[kadghar]

Hello World!

This is my very first time to create my own user control LOL. Can anyone improve this for me? And also I'm having trouble with LoadPicture function : ) tHANkS

Rey Sean

what version of VB is the file for?
why dont you debug it and post the code that its giving you trouble?, i think that'll be easier and faster, and will allow people that doesnt have the version needed to help you.

(that was just a suggestion)

[Killer42]

Subscribing .

[lotus18]

Subscribing .

Hey Killer, have any idea?

[QVeen72]

Hi Lotus,

When you are using a Picture, You have to use all the 3 Properties :
Let, Get And Set
Add this property to your user Control :and your Picture problem will be solved:

Public Property Let Picture(ByVal New_Picture As StdPicture)
    Set imgNormal.Picture = New_Picture
    PropertyChanged "Picture"
End Property
 

Regards
Veena

[lotus18]

Hi Lotus,

When you are using a Picture, You have to use all the 3 Properties :
Let, Get And Set
Add this property to your user Control :and your Picture problem will be solved:

Public Property Let Picture(ByVal New_Picture As StdPicture)
    Set imgNormal.Picture = New_Picture
    PropertyChanged "Picture"
End Property
 

Regards
Veena

Hi Veena

Thanks for responding. I'll try that later. : )

Rey Sean

[lotus18]

Hi Veena

Thanks for responding. I'll try that later. : )

Rey Sean

Thanks Veena. It worked!

[Killer42]

Glad to see you got it sorted. Thanks for that, Veena.

Sorry lotus18, I subscribed so I could get back to this thread, but haven't had the time.

[lotus18]

Glad to see you got it sorted. Thanks for that, Veena.

Sorry lotus18, I subscribed so I could get back to this thread, but haven't had the time.

Hey Killer42 any suggestions for my control? I know it looks so simple, would you like to improve this one for me? LOL ^ ^

Rey Sean

[Killer42]

Hey Killer42 any suggestions for my control? I know it looks so simple, would you like to improve this one for me? LOL ^ ^

Just leaving work now. I'll try to have a look at it tonight at home.

I've only created a couple of fairly simple user controls, myself. Mostly just to try it out. I'll try to track down a funny one and post it - it's basically just a picturebox with coloured dots bouncing around in it.

[lotus18]

Just leaving work now. I'll try to have a look at it tonight at home.

I've only created a couple of fairly simple user controls, myself. Mostly just to try it out. I'll try to track down a funny one and post it - it's basically just a picturebox with coloured dots bouncing around in it.

I'll watch for it : )

Rey Sean

[Killer42]

I'll watch for it : )

Sorry, got pretty busy. Hopefully tonight.

[Killer42]

I did find this cute little one. Just add the user control file to your project, place one on a new form, and add this code in the form...

Private Sub Form_Resize()
  Tailer1.Move 0, 0, Me.ScaleWidth, Me.ScaleHeight
End Sub

This is not really necessary, of course - it's just to keep it the same size as the form.

I couldn't post the source of the user control, TheScripts kept spitting the dummy for some reason. Too long, I guess, even though I chopped it into chunks. So I'll put it in a zip file.

Tip: Check out the Style (and possibly TailLength) property. It looks as though only styles "Dot trail", "Bubbles" and "Smoke" are working.