Here's how I would do it:
dt = New Table( "datetbl", Add Rows( 6 ),
New Column( "My Date", Numeric, "Continuous", Format( "ddMonyyyy", 12 ),
Input Format( "ddMonyyyy" ),
Set Values( [3786912000, 3788035200, 3788985600, 3790800000, 3792009600, 3792268800] ) )
);
date_list = dt:my date << get values;
cdate_list = {};
// Convert dates to character strings
for (i = 1, i <= nitems(date_list), i++,
cdate_list[i] = format(date_list[i], "ddMonyyyy");
);
nw = new window("Test Dates", << modal,
lineup = Lineup Box( N Col( 2 ),
textbox("Select start date: "),
date1_lb = combo box(cdate_list),
textbox("Select end date: "),
date2_lb = combo box(cdate_list),
),
ok_btn = button box("OK",
start_date = date1_lb << get selected;
end_date = date2_lb << get selected;
)
);
// Convert character dates back to real dates
start_dt = informat(start_date, "ddMonyyyy");
end_dt = informat(end_date, "ddMonyyyy");