please help me.. i keep searching anywhere but find no answer

i want to set the default value of a combobox in my edit account module based on the levelofaccesstextbox in my login module but my codes doesn't work

here's my code:
Private Sub editaccount_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If login.LevelofAccessTextBox.Text = "Student" Then
With Me.ComboBox1.Items
.Add("Student")
End With
End If
End Sub

Edited 4 Years Ago by jhedonghae: to clarify

When this code executes is your login form open? I'm guessing that you are populating the LevelofAccessTextBox after verifying login details. Wouldn't it be easier to use a global var and be done with it?

Check your draw mode property of combobox if its not normal ur code will not work.

actually my problem is now solved thanks for everyone's help i used this code instead

Private Sub editaccount_Activated(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Activated
Dim x1 As String
x1 = login.LevelofAccessTextBox.Text
TextBox9.Text = x1
End Sub

I replace combobox with textbox

This question has already been answered. Start a new discussion instead.