Stuart McLachlan
stuart at lexacorp.com.pg
Wed Mar 23 17:20:13 CDT 2011
I normally use a listbox for this. Set the rowsource to Value List and make sure that it is not sorted. Function AddToLogList(strData) 'Add new item to the end lstLog.Additem(strData) 'Remove first item if list is now too long If lstLog.Listcount > 50 then lstLog.RemoveItem(0) end if 'Move to last item in list lstLog = strData End Function On 23 Mar 2011 at 14:02, David McAfee wrote: > I'm trying to make a fake console window out of a text box to display > status of events that are happening. > > After every update, I insert a VBCRLF. > > The trouble is, after 16 lines, the text doesn't scroll up as it does > in a DOS window. > > Is there a way to programmatically scroll the vertical scroll bar > down? > > If not, I was thinking of counting the VBCRLF's and if >15, delete > everything up to the first VBCRLF. > > Does anyone have any idea (or samples) of what I am trying to do? > > Thanks, > David > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com >