Открытие формы Microsoft Access с нужными размерами и расположением на экране

Открытие формы Microsoft Access с нужными размерами и расположением на экране программы на Microsoft Access кодом VBA: Private Sub Кнопка1_Click() DoCmd.Echo False, "" Dim otstupG As Integer Dim otstupV As Integer Dim shir As Integer Dim visota As Integer otstupG = CurrentDb.OpenRecordset("SELECT имя поля отступG FROM имяТаблицы").Fields(0) otstupV = CurrentDb.OpenRecordset("SELECT имя поля отступV FROM имяТаблицы ").Fields(0) shir = CurrentDb.OpenRecordset("SELECT имя поля ширина FROM имяТаблицы ").Fields(0) visota = CurrentDb.OpenRecordset("SELECT имя поля высота FROM имяТаблицы ").Fields(0) DoCmd.MoveSize otstupG, otstupV, shir, visota End Sub