Access 2000 Текстовое поле частично Подчеркнуто
Нужно найти способ подчеркнуть часть текста в текстовом поле в базе данных Access 2000.
я нашел этот код
Dim ctl As Control
Dim dblSpacing As Double 'space between double underline
dblSpacing = 30
For Each ctl In rpt.Controls
If ctl.Tag = "bl" Then
rpt.Line (ctl.Left, ctl.Top + ctl.Height)-Step(ctl.Width, 0)
End If
If ctl.Tag = "tl" Then
rpt.Line (ctl.Left, ctl.Top)-Step(ctl.Width, 0)
End If
If ctl.Tag = "dbl" Then
rpt.Line (ctl.Left, ctl.Top + ctl.Height)-Step(ctl.Width, 0)
rpt.Line (ctl.Left, ctl.Top + ctl.Height + dblSpacing)-Step(ctl.Width, 0)
End If
Next
Конечная функция
но не делаю то, что хочу. Есть ли способ изменить этот код или другой способ сделать это