insert picturebox into picturebox

[randichan]

I have a code from some article. (picture inner inside the picture outer)
The result of the code is when i was klik the place in the picture outer, the picture inner will show in the place i was klik, but in diagonal place.

It wasnt in the right place i was klik. I want the picture inner will show
in the spot i was klik

picturebox1 name = PictOuter
picturebox2 name = PictInner

Dim pos As String
Dim bos As String

pos = Format(x / PictOuter.Width * 100, "0")
bos = Format(y / PictOuter.Height * 100, "0")

PictInner.Left = PictOuter.Width * pos / 100
PictInner.Top = PictOuter.Height * bos / 100
PictInner.Visible = True

Your information will so helpfull, thanks for your attention

[debasisdas]

From your post/code i don't understand what is your requirement and your English makes it even difficult for me.

[smartchap]

I have checked it is visible at the place where pictouter is clicked. Excatly what is required by you please make clear.