Login | Register   
LinkedIn
Google+
Twitter
RSS Feed
Download our iPhone app
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX


Tip of the Day
Language: Visual Basic
Expertise: Beginner
Apr 23, 1999

Loop on Non-Numeric Indices

You might occasionally need to execute a group of statements with different and unrelated values of a variable. For example, say you need to verify that a number isn't a multiple of 2, 3, 5, 7, or 11. In these circumstances, you can't use a regular For...Next loop, unless you store these values into a temporary array. Here's a more concise solution:
 
Dim n As Variant 
For Each n In Array(2, 3, 5, 7, 11)
	If (TestNumber Mod n) = 0 Then 
		Print "Not prime"
		Exit For
	End If
Next
You can use the same technique to iterate on non-numeric values:
 
' check if a string embeds a shortened weekday name
Dim d As Variant 
For Each d In Array("Sun", "Mon", "Tue", "Wed", "Thu", _
	"Fri", "Sat")
	If Instr(1, TestString, d, vbTextCompare) Then
		Print "Weekday = " & d
		Exit For
	End If
Next
Francesco Balena
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap
Thanks for your registration, follow us on our social networks to keep up-to-date