This could work...
Option Explicit
Dim bPrint As Boolean
Private Sub Form_Activate()
bPrint = True
Do While bPrint
Print "hi"
DoEvents
Loop
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As
Integer)
If KeyCode = 81 Then 'Q to quit
bPrint = False
Cls
Print "Done"
End If
End Sub
--- HouseDad <[EMAIL PROTECTED]> wrote:
>
>
> Hello all! Boy, I am sure glad I didn't have
> to post the
> message I was working on earlier today. Short story
> is that I came
> in and all the programs were crashing, even on my
> dev machine. I was
> so worried maybe it was due to a recent windows
> update, I almost
> passed out at the thought of having to try to
> explain to my boss how
> overnight all my programs quit working. Luckily, I
> figured out it
> was the network drive was full! I warned them about
> that two months
> ago. Oh well, it was a false alarm, thankfully.
>
> As to my current question, what I am running
> into is limitations
> displaying text on the screen. I usually use a
> textbox to show
> progress reports, etc, and I noticed after so far is
> just quits
> displaying new text. I am assuming this is due to a
> size limitation
> for textboxes. Is there a way around this? What if
> I want to stream
> text to the screen infinitely, how can I do that?
> What if I wanted a
> program to operate in "old style" 80 columns, and
> just "print" text
> to the screen all day. How could I create a "10
> print "hi", 20 goto
> 10" type program in VB?
>
> [C]
>
>
>
------------------------ Yahoo! Groups Sponsor --------------------~-->
Make a clean sweep of pop-up ads. Yahoo! Companion Toolbar.
Now with Pop-Up Blocker. Get it for free!
http://us.click.yahoo.com/L5YrjA/eSIIAA/yQLSAA/k7folB/TM
--------------------------------------------------------------------~->
'// =======================================================
Rules : http://ReliableAnswers.com/List/Rules.asp
Home : http://groups.yahoo.com/group/vbHelp/
=======================================================
Post : [EMAIL PROTECTED]
Join : [EMAIL PROTECTED]
Leave : [EMAIL PROTECTED]
'// =======================================================
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/vbhelp/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
