>Hi,
>I would like to have my form's background filled up with some kind of
>nice wall paper files(bmp, wmf..?). VB's backcolor property has solid,
>plain color choices, and I didn't like any of those.
>For eg. in sample example of Access 7, some form have nice stone type
>background, but it is actually .BMP file of fixed size. Even if you
>stretch it, it looses its resolution.
>What is the work around this requirement.
>Please help me.
>Thanks,
>-- Kiran
I have always used:
'Tile of background
'img' is the name of the image control placed on the form with
'the follow properties set: visible=false, index=0, name=img
'and the Forms.Autoredraw property set to true for good measure.
img(0).Picture = LoadPicture("TILE.BMP")
maxx = Int(Screen.Width / img(0).Width) + 1
maxy = Int(Screen.Height / img(0).Height) + 1
For i = 0 To maxx - 1
For j = 0 To maxy - 1
itm = i * maxy + j + 1
Load img(itm)
img(itm).Enabled = True
img(itm).Visible = True
img(itm).Left = i * img(0).Width
img(itm).Top = j * img(0).Height
Next j
Next i
--------------------------------------------------------------
Computer analyst to programmer:
"You start coding. I'll go find out what they want."
--------------------------------------------------------------
VB Site: http://www.qns.com/~robinson/vb/vb.html
--------------------------------------------------------------