23-01-21, 10:10
|
| Όνομα: Γιάννης Έκδοση λογισμικού Office: Ms-Office 2016 Γλώσσα λογισμικού Office: Αγγλική | | Εγγραφή: 08-12-2020
Μηνύματα: 153
| |
Έφτασε... :) Κώδικας: Private Sub Form_Load()
Dim ctl As Control
For Each ctl In Me.Detail.Controls
If ctl.ControlType = acTextBox Then
ctl.ColumnWidth = 2000
End If
Next
End Sub
|