Can Grow

[mayday999]

Hi all,

I have a report I have developed, I have label and field butting up against each other with the border solid on both forming a datasheet look. The problem is that when there is a large amount of data in a field, it expands, while the label does not. Is there any way that the label can be made to expand with its corresponding field?

any help is greatly appreciated.

mayday

 

[dhookom]

The method I use removes all borders from the controls and uses the Line method in code to draw the borders. I place the word "border" in the tag property of every control in the detail section that I want to outline. Then use code in the On Print event of the section:

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
    Dim intMaxHeight As Integer
    Dim ctl As Control
    'Find highest control in Detail section _
      that has a tag property of "Border"
    For Each ctl In Me.Section(0).Controls
        If ctl.Tag = "Border" Then
            If ctl.Height > intMaxHeight Then
                intMaxHeight = ctl.Height
            End If
        End If
    Next
    'Draw a box around each control in Detail _
      that has a tag property of "Border"
    For Each ctl In Me.Section(0).Controls
        If ctl.Tag = "Border" Then
            Me.Line (ctl.Left, ctl.Top)- _
                Step(ctl.Width, intMaxHeight), , B
        End If
    Next
End Sub

Duane MS Access MVP
[green]Ask a great question, get a great answer.[/green] [red]Ask a vague question, get a vague answer.[/red]
[green]Find out how to get great answers faq219-2884.[/green]