"method or data member not found" using Toolbar button

[kkk1979]

I am not an experienced programmer. I am getting an error as "method or data member not found" when i entered the following code in buttonclick procedure of the toolbar.

select case button.key
case "btn1"
       msgbox ""
case "btn2"
      msgbox ""
end
end select

Can anybody help me in figuring out this problem

Thanks

[SammyB]

I am not an experienced programmer. I am getting an error as "method or data member not found" when i entered the following code in buttonclick procedure of the toolbar.

select case button.key
case "btn1"
msgbox ""
case "btn2"
msgbox ""
end
end select

Can anybody help me in figuring out this problem

Thanks

Kay, your Case statement is not setup correctly: remove the line "end". Also, I think that it does not like button.key. What did you Dim button as? What version of VB are you using: VBA, VB6, or VB.NET?

[kkk1979]

Kay, your Case statement is not setup correctly: remove the line "end". Also, I think that it does not like button.key. What did you Dim button as? What version of VB are you using: VBA, VB6, or VB.NET?

I declared button as Integer, also I removed the end statement. Still I am getting the same error. I am using vb98.

[SammyB]

>I removed the end statement
Great!

>I am using vb98
Why? We can give you general ideas, but I and most others have never seen vb98

>I declared button as Integer
then you cannot have button.key
so what does button equal at the top of your code. Can't you just do

        Select Case button
            Case 1
                MsgBox("First")
            Case 2
                MsgBox("Second")
            Case Else
                MsgBox("Something else")
        End Select

[kkk1979]

I am using vb6.0 version. I tried by removing ".key" as you told. This is not showing anything.

[SammyB]

I am using vb6.0 version. I tried by removing ".key" as you told. This is not showing anything.

Ah, VB6, where is the wipes off the sweat smilie.
You are correct, it should be Button.Key. So,

1. Make sure that you added buttons to the ToolBar
2. Make sure that you entered the keys for the buttons: btn1, btn2

Now, you event routine should look like:

Option Explicit
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
    Select Case Button.Key
        Case "btn1"
            MsgBox "First"
        Case "btn2"
            MsgBox "Second"
    End Select
End Sub

[kkk1979]

I have been trying this from yesterday. I kept the .key as btn1 and btn2 correctly.
getting the same compilation error by highlighting ".key" method in blue color.
I am sorry to tell like this.

[SammyB]

I have been trying this from yesterday. I kept the .key as btn1 and btn2 correctly.
getting the same compilation error by highlighting ".key" method in blue color.
I am sorry to tell like this.

Don't be sorry, this is why we get the big bucks! ;) In #3, you said "I declared button as Integer". VB defines it as MSComctlLib.Button. Does your code look exactly like mine?

[kkk1979]

Yes, have been trying the code which is exactly like yours. But as you asked me about the declaration, then I thought "ok, I need to declare" like that.
So I tried both ways. I think my code doesn't like .key method.(but why I don't know)

[SammyB]

Yes, have been trying the code which is exactly like yours. But as you asked me about the declaration, then I thought "ok, I need to declare" like that.
So I tried both ways. I think my code doesn't like .key method.(but why I don't know)

I would suggest that you start all over again, slowly. Follow these steps:

1. Get out of all windows but this one and start VB6 from the Start button
2. In the New Project dialog, select Standard EXE and press Open
3. If you don't have a Toolbar control in the toolbox, press Ctrl T and place a checkmark before Microsoft Windows Common Controls 6.0
4. Double-click the toolbar icon in the toolbox to add it to your form
5. Click on Custom in the Properties window and press the elipses button.
6. Click on the Buttons tab and click Insert Button.
7. Make the caption 1 and the key btn1
8. Click Insert Button again
9. Make the caption 2 and the key btn2 and press OK
10. Double-click on the toolbar to bring up the code window
11. Add code to the Click event

Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
    Select Case Button.Key
        Case "btn1"
            MsgBox "First"
        Case "btn2"
            MsgBox "Second"
    End Select
End Sub

Now, press the Start button and see if the buttons work.

[rowen33]

I could be wrong, but I think that the Member .key has to belong to the class Button... Hope this helps, Roger

[kkk1979]

I followed the steps,got the same error.But when i double clicked the toolbar from the toolbox(as in step 4), I got toolbar wizard along with toolbar.Does this makes any difference ?? Waiting for your reply !!!!

[kkk1979]

That might be the reason, How do I check that ?
I opened Object Browser, selected "button" option in left pane, nothing is shown in the right pane.
If that is your guess, can you please show how to include the ".key" method to my project.

[SammyB]

I followed the steps,got the same error.But when i double clicked the toolbar from the toolbox(as in step 4), I got toolbar wizard along with toolbar.Does this makes any difference ?? Waiting for your reply !!!!

What is a toolbar wizard? We are not using the same VB6. Remove your toolbar and press Ctrl T to open the Components dialog. Uncheck everything on the Controls tab and press OK. Now, press Ctrl T again and place a checkmark before Microsoft Windows Common Controls 6.0.

Now, try adding the Toolbar again. If you get a wizard, some other VB6 guru will have to help you because I don't do wizards, daemons, or databases. :D Hope this solves it! --Sam

[kkk1979]

How do I check whether all the required members of button are present in my project ??

[SammyB]

How do I check whether all the required members of button are present in my project ??

:confused: Since you are using a non-standard toolbar, we have no way of knowing. Please do what my last post said.

[kkk1979]

Thank you for your help.That is the reason. But how can I include the members to the button ?

[kkk1979]

I looked for the methods of button object in Object Browser, then compared with other system's Button Object. So I found that my system has no methods for button object. Is it possible to add the methods to my system too ? Can you please check it
Thank you very much for your help

[rowen33]

I think in object oriented programming such as Visual Basic .Net you can add your own custom methods to the Button Class. That is all I remember... Roger

[Killer42]

I am not an experienced programmer. I am getting an error as "method or data member not found" when i entered the following code in buttonclick procedure of the toolbar.

select case button.key
case "btn1"
       msgbox ""
case "btn2"
      msgbox ""
end
end select

Can anybody help me in figuring out this problem

Sorry, I haven't followed the rest of the thread yet (short of time) but if you have defined button as anything, that is probably your problem. If this is the type of toolbar I'm familiar with, Button should represent the parameter (ByVal Button As MSComctlLib.Button) which is received when this event procedure is called.

[Killer42]

Oops! Looks as though I spoke too soon.

Are you sure you don't have some custom object you're created (or a form or whatever) called "Button"?

Here's an exercise which might (or might not) help. Change the name of the parameter to something which you know won't match anything else. For example...

Private Sub Toolbar1_ButtonClick(ByVal KillerSaidToDoThis As MSComctlLib.Button)
   Debug.Print KillerSaidToDoThis.Index, KillerSaidToDoThis.Caption, _
               KillerSaidToDoThis.Key
End Sub

[kenobewan]

I believe that we are reaching the end of how much help we can provide here. Clear step by step instructions have been given.

We all started somewhere and there is no shame in being a newbie. My suggestion is find a book or course and learn the basics. This is a site for programmers and not geared to learning the basics - it is assumed by the experts that you have this.

So please learn the fundamentals, it will save you time in the log run. I am sure we could suggest some resources if you like. Thanks.

[Killer42]

I looked for the methods of button object in Object Browser, then compared with other system's Button Object. So I found that my system has no methods for button object.

When you select Button in the object browser, what does it show in the grey window down the bottom?

(Note, I've updated the title of the thread - "Hi All" won't help anyone in the future who needs to search for help on this topic).