Centralised MsgBox
in [Visual Basic]
|
Prev: crack for VSFlex8 in VB6.0
Next: Component Handles
From: Karl E. Peterson on 8 Oct 2009 20:40 Scott M. wrote: > You all just keep on making my point for me. As long as you know where to stick it... yer welcome. -- ..NET: It's About Trust! http://vfred.mvps.org
From: Karl E. Peterson on 8 Oct 2009 20:41 Alex Clark wrote: > Ahh, my apoligies, Karl. Accepted. -- ..NET: It's About Trust! http://vfred.mvps.org
From: Karl E. Peterson on 8 Oct 2009 20:54 Scott M. wrote: >> To prevent myself from committing the same perceived offence, perhaps we >> should consider the usage of "Call" in .NET is like the usage of "Let" in >> VB6; it's there but of little utility. > > To the best of my recollection, "Let" was absolutly required as the property > setter, in other words, there was a valid reason for the keyword. Call > provides no such benefit in .NET. It accomplishes nothing. Let hasn't been required since Dartmouth BASICs. It was one of the very first optional keywords. I'm pretty sure the very earliest GW/IBM BASICs allowed it to be omitted. Yep! As is becoming the typical case here, I'm right and you're just making shxt up. The following code is from ALPHABET.BAS, dated 04/08/1982, which shipped with IBM PC BASIC v1.00 -- take a look at lines 90, 110, etc: 1 WIDTH 80 2 KEY OFF: CLS : GOTO 20000 3 CLS 5 CLEAR 100 10 DIM A$(13), D$(13), C$(13) 20 DATA EGG, CELERY, BALL,BAG,GLOVE,COAT 30 DATA PANTS, SUIT,CLOVER, WEED, GRASS 40 DATA COW, CHICKEN 50 FOR J=1 TO 13 60 READ A$(J) 70 NEXT J 80 FOR K=1 TO 13 90 L=1 100 FOR J=1 TO 13 110 E=0 120 FOR M=1 TO 13 130 IF A$(J) = C$(M) THEN E=1 140 NEXT M 150 IF E=0 THEN 160 ELSE 200 160 D$(L) = A$(J) 170 L=L+1 200 NEXT J 210 B$ = D$(1) 220 FOR L=1 TO 13-K+1 230 IF D$(L) < B$ THEN 250 ELSE 300 250 B$ = D$(L) 300 NEXT L 400 C$(K) = B$ 410 NEXT K 500 FOR K=1 TO 13 510 PRINT C$(K) 520 NEXT K 600 END 20000 REM 20010 KEY OFF: CLS : GOTO 20030 20020 CLS 20030 FOR J=2 TO 22 20040 LOCATE 2,2:PRINT CHR$(201):LOCATE 2,79:PRINT CHR$(187) 20050 LOCATE 23,2:PRINT CHR$(200):LOCATE 23,79:PRINT CHR$(188) 20060 LOCATE J,2:PRINT CHR$(186) 20070 LOCATE J,79:PRINT CHR$(186) 20080 NEXT J 20090 FOR J=3 TO 78 20100 LOCATE 2,J:PRINT CHR$(205) 20110 LOCATE 23,J:PRINT CHR$(205) 20120 NEXT J 20130 REM 20140 LOCATE 4,32: PRINT "Program Diskette" 20150 LOCATE 5,33:PRINT " for" 20160 LOCATE 7 ,27:PRINT "THE IBM PERSONAL COMPUTER" 20170 LOCATE 9 ,26: PRINT "PROGRAMMING AND APPLICATIONS" 20180 REM 20190 LOCATE 11,39: PRINT "by" 20200 LOCATE 13,19: PRINT "Larry Joel Goldstein and Martin Goldstein" 20210 REM 20220 LOCATE 16,29: PRINT "<<ALPHABET SECTION 7.2>>" 20230 LOCATE 17,37: PRINT "PAGE 171" 20240 LOCATE 19,22: PRINT "Copyright (C) 1982 The Robert J. Brady Company" 20250 LOCATE 21,28: PRINT "PRESS ANY KEY TO CONTINUE" 20260 X$ = INKEY$: IF X$ = "" THEN 20260 20270 GOTO 3 Blinking luser... -- ..NET: It's About Trust! http://vfred.mvps.org
From: Mike Williams on 9 Oct 2009 03:56 "Scott M." <s-mar(a)nospam.nospam> wrote in message news:%23bRNDOGSKHA.1236(a)TK2MSFTNGP05.phx.gbl... > Make you a deal Mike... You point out *exactly* what I've > said in this thread that is evangelistic about .NET and I'll do > exactly as you suggest. Make you a deal, Scotty. You be a good little troll and go away and play somewhere else and I'll pretend that you're not a troll at all. Mike
From: Mike Williams on 9 Oct 2009 04:18
"DanS" <t.h.i.s.n.t.h.a.t(a)r.o.a.d.r.u.n.n.e.r.c.o.m> wrote in message news:Xns9C9EC22A6EBB6thisnthatroadrunnern(a)216.196.97.131... > The OP never did come back with any more info or to state > his matter was resolved. I wonder why. .. . . because Scotty is involved in the thread. Scotty is a troll. Mike |