Text in a Picture box 1

I'm not sure I'm clear on what you're asking, but I'll assume you need a picture box because you have some pictures you'd like to contain in it. You can also put a label in it in design time, and simply access the label to populate it with text.

Now, I may well not understand what you're asking; feel free to elaborate.

HTH

Bob

I did something similar a few years ago, where I turned the text in a textbox into the drag cursor for drag and drop operations on that text. I'll try and dig it out - but I seem to recall that it was designed for single- rather than multiline text. However, converting it to multiline shouldn't be too hard ...

You may want to use DrawText API function which supports rendering text on a device context with word wrapping.

Place a picture box on the form and try the following code.
___
[tt]
Option Explicit
Private Declare Function DrawText Lib "user32" Alias "DrawTextA" (ByVal hdc As Long, ByVal lpStr As String, ByVal nCount As Long, lpRect As RECT, ByVal wFormat As Long) As Long
Const DT_CENTER = &H1
Const DT_WORDBREAK = &H10
Private Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type
Private Sub Form_Load()
Dim rc As RECT, strText As String
strText = "The quick brown fox jumps over the lazy dog."
With Picture1
.Move 0, 0, 1500, 1500
.AutoRedraw = True
.BackColor = vbWhite
.ScaleMode = vbPixels '3
rc.Right = .ScaleWidth
rc.Bottom = .ScaleHeight
DrawText .hdc, strText, -1, rc, DT_WORDBREAK 'Or DT_CENTER
End With
End Sub[/tt]

Hypetia,

Sweet! A star for that..

Thats just what I needed - many thanks everyone, especially Hypetia.

Paul