Private Sub نوع_الخطاب_AfterUpdate()
If Me.نوع_الخطاب = "داخلى" Then
Me.الجهة_الخارجية_الوارد_منها.Enabled = False
Me.الجهة_الداخلية_الوارد_منها.Enabled = True
End If
If Me.نوع_الخطاب = "خارجى" Then
Me.الجهة_الداخلية_الوارد_منها.Enabled = False
Me.الجهة_الخارجية_الوارد_منها.Enabled = True
End If
End Sub