Using third party control to realize QQ vertical menu in VB

Editor's words: After one months of preparation, the third party control recommended today officially started, today's recommended control is provided by the Netizen Wooke, small series here on behalf of all netizens thanked him.

The source code package is a Verticalmenu control, please download the test after the decompression

Use examples:

QQ is one of the software that we often use. I believe we are familiar with the interface of QQ. In this, I recommend a VB can easily achieve this like the QQ vertical menu of Third-party control Verticalmenu.

Here's how you can use the Verticalmenu Control Development Program in conjunction with an instance (development environment for Visual Basic 6.0,windowsxp).

(i) Loading of Verticalmenu controls

Run Visual Basic 6.0 and create a new project. Then select Project (P)-> "Part" in the menu to display the Parts dialog box, as shown in Figure 1.

Figure 1

Click the browse (B) button to locate the Vertmenu.ocx file from the folder where the Verticalmenu control is stored, and add it to the list of available controls. Click the OK button to close the Parts dialog box. The Verticalmenu control appears in the Toolbox. As shown in Figure 2

Figure 2

(ii) Settings for common properties of Verticalmenu controls

Select the Verticalmenu control in the toolbox and place it on the Form1 of the new project. Adjust the size well. As shown in Figure 3

Figure 3

Then click the right mouse button on the control. The Verticalmenu property Page dialog box pops up. As shown in Figure 4

Figure 4

⒈ Property Description:

Menues

Menucur: The menu number that is currently being set (the default ordinal number starts at 1)

Menusmax: Total number of menus

Menustartup: The sequence number of the menu that is displayed by default when the program is run

Menuobjects

Menucaption: The name of the current menu

Menultemcur: The item ordinal that is currently being set (the default ordinal number starts at 1)

Menuitemmax: The number of items in the current menu

Menuitemobjects

Menultemcaption: The name of the current item

Menuitempicture: Icon for current item