Установочная линия в Access VB - PullRequest
Новая
       27

Установочная линия в Access VB

0 голосов
/ 13 декабря 2018

Я видел несколько вопросов / ответов о том, как отрегулировать высоту линий при расширении детального раздела;однако, ничего не видел о ширине линии.

Я получил строку для регулировки высоты, используя: 

Dim CtlDetail As Control
Dim intLineMargin As Integer

intLineMargin = 0

For Each CtlDetail In Me.Section(acDetail).Controls
    With CtlDetail
        If CtlDetail.Name = "Line192" Or CtlDetail.Name = "Line193" Then
        Me.Line ((.Left + .Width + intLineMargin), 0)-(.Left + .Width + intLineMargin, Me.Height)
        End If
    End With
Next

Set CtlDetail = Nothing

End Sub

НО, в то время как линия действительно регулирует высоту, к которой возвращается ширина "линия волос ", а не точки, которые я предпочитаю.

Спасибо за любую помощь, я ценю это.

...