скроллы в Mdi

vb6.0. Есть десяток MDI форм с туевой хучей всяких элеменов. Их так много, что в 800х600 они не влезают. Как бы к этим формам пределать скроллы. Никаких свойств отвечающих за скроллы у mdi - ных форм я не обнаружил. Попытался подкопаться через win api

Private Declare Function SendMessage _
Lib "user32" Alias "SendMessageA" ( _
ByVal hwnd As Long, _
ByVal wMsg As Long, _
ByVal wParam As Long, _
ByRef lParam As style _
) As Long

Private Type style
styleOld As Long
styleNew As Long
End Type

Public Form_Load()
Dim Rtn As Long
Dim st As style
ScaleMode = vbPixels
st.styleOld = 0
st.styleNew = 1085276160 '(WS_BORDER Or WS_CHILD Or WS_HSCROLL Or WS_VSCROLL Or WS_OVERLAPPED)

Rtn = SendMessage(hwnd, 124, &HFFFFFFF0, st)

но не знаю как получить указатель на структуру. К тому же он ругался на переполнение при передаче dword-ового параметра.

PS. Можно ли как-то через ADO сжимать Access-овскую базу (т.е. удалять удаленные объекты).

PPS. Как видно из моего сообщения, VB я не знаю.