Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Remove arrow from combo box unless mouseover-ed
#1
Since ComboBoxes does not have MouseMove property, use a TextBox Over the ComboBox. Name the ComboBox as "cmbCombo" and the TextBox as "txtBox" and w/ this code it should work:
Code:
Private Sub cmbCombo_Click()
    txtBox.Text = cmbCombo.List(cmbCombo.ListIndex)
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    txtBox.Visible = True
End Sub

Private Sub txtBox_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    txtBox.Visible = False
End Sub

When the mouse is over the TextBox, this will get invisible and you will see the ComboBox, and when the mouse is over the form or any other object(easy to implement) it will become visible again but the text will change with the combo box.
Reply
#2
lol. would never have thought of that Dragoons Master.

But don't the textbox and combobox have different border styles? (Depending on which style you use on the combobox)

If so, i would take a screenshot of the combobox, add the picture into a picture box then add a label inside the picturebox and change the caption of the label, and make the picbox visible or not visible.

Long way around it, but it it's going to be users looking at it, visual perfection is the key Wink
Reply
#3
Well, it works but its visual efects bcouse you didnt realy edit the object, but it does look perfect ^^
Reply


Forum Jump:


Users browsing this thread: 2 Guest(s)