Comboxbox's SelectedIndexCh anged event not functioning

[Chrysan]

I have a popup window, which consist of 2 combobox. The second
combobox's(cboC ube) item collection will change based on the first
combobox's(cboD atabase) event(selectedi ndex_changed) is fired. And, I do have
write such code in code-behind as follow:

Private Sub cboDatabase_Sel ectedIndexChang ed(ByVal sender As Object,
ByVal e As System.EventArg s) Handles cboDatabase.Sel ectedIndexChang ed
Dim strAdomdConnect ionString As String

Try
With mdtsAnalysisDB. Tables(0).Rows( cboDatabase.Sel ectedIndex)
strAdomdConnect ionString =
BuildAdomdConne ctionString(CSt r(.Item("Server Name")),
CStr(.Item("Ana lysisDBName")), CStr(.Item("Use rName")),
CStr(.Item("Pas sword")))
End With

FillCubeCombox( strAdomdConnect ionString)

Catch ex As Exception
Throw New ApplicationExce ption(ex.Messag e.ToString)
End Try
End Sub

Private Sub FillCubeCombox( ByVal pstrAdomdConnec tionString As String)
Dim adomdConn As AdomdConnection
Dim cube As CubeDef

Try
adomdConn = New AdomdConnection (pstrAdomdConne ctionString)
adomdConn.Open( )

cboCube.Items.C lear()

For Each cube In adomdConn.Cubes
cboCube.Items.A dd(cube.Caption )
Next

Catch ex As Exception
Throw New ApplicationExce ption(ex.Messag e.ToString)
End Try
End Sub

But, why my second combobox's(cboC ube) item collection won't change, when my
first combobox's(cboD atabase) selectedindex is changed? Besides, I also set
the first combobox's property(AutoPo stBack) to true.

Please help... Thanks.

FYI, the following is my Page_Load code:

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Load
Dim strAdomdConnect ionString As String

Try
If Not Me.IsPostBack Then
Me.btnOK.Attrib utes.Add("oncli ck", "Done('" &
txtConnectionSt ring.Text & "');")

FillDatabaseCom bobox()

With mdtsAnalysisDB. Tables(0).Rows( cboDatabase.Sel ectedIndex)
strAdomdConnect ionString =
BuildAdomdConne ctionString(CSt r(.Item("Server Name")),
CStr(.Item("Ana lysisDBName")), CStr(.Item("Use rName")),
CStr(.Item("Pas sword")))
End With

FillCubeCombox( strAdomdConnect ionString)
End If

Catch ex As Exception
Throw New ApplicationExce ption(ex.Messag e.ToString)
End Try
End Sub