Advertisement
Advertisement
| 05.06.2008 at 10:15AM PDT, ID: 23380200 |
|
[x]
Attachment Details
|
||
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: |
Select Case Forms!frmReports.cboNotesSelection
Case "None":
Me.Notes.Visible = False
Me.Impact_Label.Caption = "Impact"
End Select
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Select Case Forms!frmReports.cboNotesSelection
Case "None":
Me.Notes.Height = 0
Case "5 lines":
'field is fixed in design view at proper length
Case "10 lines"
Case Else:
Me.Notes.CanGrow = True
End Select
End Sub
|