Combining enumeration and .NET capabilities, I would suggest the following changes to the original code. This will produce the same result
Dim myEnv As iEnvironment
MessageBox.Show(myEnv.Production.ToString() & ": " & myEnv.Production)
MessageBox.Show(myEnv.Dev.ToString() & ": " & myEnv.Dev)
Discussion on:
Message 5 of 6
0
Votes
Fewer lines of code
Posted by Master_Techie
26th Jan 2007
