Results 1 to 2 of 2

Thread: [RESOLVED] vb6 image rollover question

  1. #1

    Thread Starter
    Lively Member
    Join Date
    Apr 2011
    Posts
    95

    Resolved [RESOLVED] vb6 image rollover question

    Hello everyone, I have a quick question. I am trying to make a navigation menu at the bottom of my form that will have rollover buttons. I have written the following code so far, but I am having a bit of trouble. The trouble is when I mouse over the first button, it changes to the right image. However when I move the mouse further to the right, the second one changes to the right image and the first one stays on the second image, and doesn't turn back to the first image. It's like vb6 is missing a rollover command. I have tried a few things but was unable to get anything to work. Please and thanks for all advice and help given.

    Code:
    Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Image1 = LoadPicture(App.Path & "\components\nav\ebbtcbinsmenu1_0.bmp")
    Image2 = LoadPicture(App.Path & "\components\nav\ebbtcbinsmenu2_0.bmp")
    
    End Sub
    
    Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Image1 = LoadPicture(App.Path & "\components\nav\ebbtcbinsmenu1_1.bmp")
    End Sub
    
    Private Sub Image2_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Image2 = LoadPicture(App.Path & "\components\nav\ebbtcbinsmenu2_1.bmp")
    End Sub

  2. #2

    Thread Starter
    Lively Member
    Join Date
    Apr 2011
    Posts
    95

    Re: vb6 image rollover question

    Ok, I have it figured out, I just have to space the buttons out a little more to give the program time to switch back. When they are right next to each other, they never go back to state(0). But when I space them out 1 row they go back fine.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width