getting dropdownlist / checklists values

Hi!

I've been on a trial version for this week.  My initial objectives are to have some regression scripts created to do the following tasks:

1) verify list of values from dropdownlists on web portal pages

2) verify list of values with checklists / checkboxes on web portal pages

I'm working on a web portal app that have lots of dropdownlists with lots of values.  I need some assistance in getting each of the values from the dropdownlist and display it to confirm, then write into the logs or datasource and perform a comparison, returning pass/fail results.  I was able to do the following so far (in VB):

1) get the total count of the dropdownlist

Dim P_Count = Pages.MainPlaceholderDrpdwnPortFolioSelect.ChildNodes.Count.ToString()           
Log.WriteLine ("Total number of Portfolios is " +P_Count)

2) get the default selected value

Log.WriteLine (Pages.MainPlaceholderDrpdwnPortFolioSelect.SelectedOption.Text.ToString())

3) perform the comparison (only with innertex, which is pulls the whole text of combined values together)

 Dim PortfoliosRuntime = Pages.MainPlaceholderDrpdwnPortFolioSelect.InnerText 
 Dim PortfoliosList = Data("PortfoliosList").ToString() 'same as Data(0).ToString()

 If PortfoliosRuntime = PortfoliosList Then
        Log.WriteLine (PortfoliosRuntime)
        Log.Writeline ("Portfolios lists matched!")
 Else
       Throw New Exception("Portfolios lists didn't matched!")
 End If

I need help in the following and getting it work:

1) For-Next loop to loop through each value of the dropdownlist and confirmed in MessageBox or log

Dim i
For i=0 to P_Count-1
Log.WriteLine ("Loop count = " + i.ToString())
Next

2) get MessageBox to work and display message box for each value

Dim MsgBox As New NativeWindow()
MsgBox.AssignHandle(ActiveBrowser.Window.Handle)
MessageBox.Show(MsgBox, "This is a message!" 

I appreciate it and thanks in advance for your assistance.

Thanks,

Stephen