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

Recommended Answers

All 4 Replies

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.

We need more info. Is your comboBox bound to some datasource?

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

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.