Controlleri Formun Ortasına Sabitlemek

Public Function GetControlsWindowSize(tag As String)

    Dim f As Form

    Dim c As Control

    Dim GrpLeft As Long

    Dim GrpRight As Long

    Dim GrpTop As Long

    Dim GrpBottom As Long



        For Each c In f.Controls

            If c.Properties.Item("tag") = tag Then

                If GrpLeft = 0 Or GrpLeft > c.Left Then GrpLeft = c.Left

                If GrpRight = 0 Or GrpRight < c.Left + c.Width Then GrpRight = c.Left + c.Width

                If GrpTop = 0 Or GrpTop > c.Top Then GrpTop = c.Top

                If GrpBottom = 0 Or GrpBottom < c.Top + c.Height Then GrpBottom = c.Top + c.Height

            End If

        Next

End Function

bu kod ile kontrolleri form ortasına yerleştirebilir miyiz

Sonucu öğrenmeniz için denemeniz gerekmektedir.

Denedim olmadı
Muhtemelen ben yapamadım

yanlış anlamadıysam bu fonksiyon sadece bir grup nesnenin sağ-Alt ucunun koordinatlarını veriyor, bugün eklediğiniz bir örnek çalışmada kullanılıyordu,
ama çalıştıramadığınız dolayısıyla ne işe yaradığını bilmediğiniz kodu neden örnek uygulama bölümüne ekliyorsunuz?
kodun kullanıldığı çalışmayı ekleyip "ne işe yaradığını çözemedim  açıklar mısınız" diye sorabilirdiniz.

Denerken nasıl denediniz yani kodu nasıl yazdınız?

https://accesstr.net/konu-popup-formu-is...#pid170755
Bu konudaki ekte kullanılmış @feraz bey, açılacak formun çağıran nesnenin çevresinde açılmasını sagliyor