VB.NET

Issue related to combobox....

Please support our VB.NET advertiser: Intel Parallel Studio Home

•

Join Date: Feb 2006

Posts: 1

Reputation: Gcox18 is an unknown quantity at this point

Solved Threads: 0

Gcox18

Offline

Newbie Poster

Re: Issue related to combobox....

#11

Feb 23rd, 2006

Hey guys, I have a solution for this ridiculous issue. Its pretty infuriating and I have wasted a few hours now working around it. I saw a similar post and here's a way you can do it without having to inherit the combobox as posted above (although that does work):

You cannot set the text property during the selectedindexchanged event. Period. Sucks hard, but its the truth. But, you can do it by causing another event to fire on the combobox control. An easy one is the mouse move event.

....

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
'This moves the mouse over the combobox to cause the mousemove event to fire.  Sets the text property, then puts the cursor back where it was
 
'FIRST MAKE 2 PROPERTIES, ONE IS IsAlteringComboText as Boolean
'SECOND ONE IS OldMousePosition
 
 
'IN THE SELECTEDINDEXCHANGED EVENT OF THE COMBOBOX
If ComboBox.SelectedIndex = 0 then
   Me.IsAlteringComboText = True
   Me.OldMousePosition = Me.Cursor.Position
   Me.Cursor.Position = me.PointToScreen(new point(combobox.location.x+15, combobox.location.Y+15))
end if
 
'IN THE MOUSEMOVE EVENT OF THE COMBOBOX
if Me.IsAlteringComboText then
   Me.IsAlteringComboText = False
   Me.ComboBox.Text = "Finally, the beast is dead!"
   Me.Cursor.Position = Me.OldMousePosition
End If
'This moves the mouse over the combobox to cause the mousemove event to fire.  Sets the text property, then puts the cursor back where it was

'FIRST MAKE 2 PROPERTIES, ONE IS IsAlteringComboText as Boolean
'SECOND ONE IS OldMousePosition


'IN THE SELECTEDINDEXCHANGED EVENT OF THE COMBOBOX
If ComboBox.SelectedIndex = 0 then
   Me.IsAlteringComboText = True
   Me.OldMousePosition = Me.Cursor.Position
   Me.Cursor.Position = me.PointToScreen(new point(combobox.location.x+15, combobox.location.Y+15))
end if

'IN THE MOUSEMOVE EVENT OF THE COMBOBOX
if Me.IsAlteringComboText then
   Me.IsAlteringComboText = False
   Me.ComboBox.Text = "Finally, the beast is dead!"
   Me.Cursor.Position = Me.OldMousePosition
End If