Scrolling Browser Vertically

Is there any browser property or method that we can use to show scrolling bars specially VERTICAL scroll bar even if it has no records to scroll down.

DEFINE VARIABLE q1 AS HANDLE NO-UNDO.

DEFINE VARIABLE hObj AS HANDLE NO-UNDO.
DEFINE VARIABLE hBuff AS HANDLE NO-UNDO.
DEFINE VARIABLE hRepBrowse AS HANDLE NO-UNDO.
DEFINE VARIABLE rNextRowId AS ROWID NO-UNDO.

CREATE BROWSE hRepBrowse ASSIGN

QUERY = q1
ROW-MARKERS = FALSE
FRAME = FRAME f1:HANDLE
HIDDEN = FALSE
NO-VALIDATE = TRUE
WIDTH = 25
HEIGHT = 9
ROW = 2
SEPARATORS = TRUE
SENSITIVE = TRUE
.

.

.

CREATE QUERY q1.
q1:ADD-BUFFER(hBuff).
hRepBrowse:QUERY = q1.
hRepBrowse:ADD-COLUMNS-FROM(hBuff:NAME).
q1:QUERY-PREPARE("FOR EACH " + hBuff:NAME).
q1:QUERY-OPEN().