Type mismatch err in Random

Article View: fj.lang.visualbasic

Article #119

Back to fj.lang.visualbasic Previous Next

#119

From: rick
Date: Wed, 02 Sep 1998 00:00

16 lines
1043 bytes

i need to pick 100 random numbers and i don't want to type each letter for
a random like A=RND, B=RND.... I tried this:
Dim I, B
 For T = 1 To 100
        For I = 1 To TURN
            Randomize      
	       B(I) = Int((3 * Rnd) + 1)
        Next I

For I= 1 to 100
	Print B(I)
Next I

I get        B(I)<Type Mismatch>     as an error 13

Please help			trepid@bluegrass.net

Technical Details

Message-ID: <01bdd6ce$88c8a5e0$e33154ce@trepid>

Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 105c2e,ece7e6da2adf45d9,start
X-Google-Attributes: gid105c2e,public
From: "rick" <trepid1@hotmail.com>
Subject: Type mismatch err in Random
Date: 1998/09/02
Message-ID: <01bdd6ce$88c8a5e0$e33154ce@trepid>
X-Deja-AN: 387294497
Cache-Post-Path: news.bluegrass.net!unknown@pm103.bluegrass.net
X-Complaints-To: usenet@news1.bluegrass.net
X-Trace: news1.bluegrass.net 904762795 24653 205.198.88.32 (2 Sep 1998 18:59:55 GMT)
Organization: Bluegrass Net
X-Cache: nntpcache 2.3.2 (see http://www.nntpcache.org/)
NNTP-Posting-Date: 2 Sep 1998 18:59:55 GMT
Newsgroups: fj.lang.visualbasic