modüle
[code]Option Compare Database
Option Explicit

Private Const LABEL_RAISED_BackColor = 14474460
Private Const LABEL_SUNKEN_BackColor = 15785160
Dim lngLabelCurrentColor As Long


Public Sub LabelSpecialEffect(frm As Form, Optional intEffect As Integer = 2)
On Error Resume Next
Dim ctl As Control
Dim strControlName As String

For Each ctl In frm.Controls
With ctl
If .ControlType = acTextBox Or .ControlType = acComboBox Then
.BorderStyle = 1
.BorderC

Merhaba, ben günlük yolcu sayılarının girilip, "Form1" de sayısal ve grafiksel olarak izlendiği bir veri tabanı yaptım. "Form1" deki grafikte sayıların çizgi grafiğinin yanında değil de üstünde olmasını (yanında olunca grafik çizgisi ile karışıp okunamadığı oluyor) ve 1 punto daha büyümesini sağlayamadım. Yardımlarınızı rica ediyorum, iyi çalışmalar.