The SplitterPref can be used where you want to set the splitter at run time.

Example
 
Private Sub Command1_Click()
   If Dir$(App.Path & "\ddLookout.dat") <> "" Then
      GetPrefs
   End If
End Sub

SplitterPref Property

Gets/sets the current splitter position. This property is Read and Write at run time. Use this string to save and restore user changes to the splitter positions of ActiveSizer controls.

Syntax

Object.SplitterPref [= Value]

Example
 
Private Sub Form_Load()
   ' Restore presaved splitter settings from your
   ' application’s registry key
   asizer.SplitterPref = App.GetSetting(App.ProductName, _
      "FormSettings", "MainformSplitters")
End Sub
 
Private Sub Form_Unload()
   ' Save splitter settings to the application’s registry key
   App.SaveSettings App.ProductName, "FormSettings", _
      "MainformSplitters", asizer.SplitterPref
End Sub