Hi,

I'm converting a VB 6.0 project to VB.Net.

   In my VB 6.0 project, I have a toolbar in MDI form and I'm using that to every child form instead of adding a toolbar to every child form.

   I have a Sub called "Perform_ButtonClick" in every child form and I'm calling that when a button is pressed in the toolbar according to the form loaded on MDI form.

   In MDI form button click event I'm calling the active forms's "Perform_ButtonClick" Sub so it'll go to relevant form's "Perform_ButtonClick" Sub.

   So how can I implement this in VB.Net? what can I use in VB.Net instead of "ActiveForm" in VB 6.0 ?

Cheers,

   nalla

__________________
nalaka hewage
http://nalakahewage.blogspot.com

Hi Nalla,

U tried using ActiveMdiChild ?

Regards
Ankur Verma

Hi,
At last I got a reply after a long time.ThanX.
yes ,I tried ActiveMdiChild and ActiveForm bot but it shows(highlighted) a systax error.

ActivateMdiChild.Perform_ButtonClick("New")
ActiveForm.Perform_ButtonClick("New")

I tried those 2 but it highlighed a systax error as,
'Perform_ButtonClick' is not a member of 'System.Windows.Forms.Form'

No no, VB .NET works a bit differently. Compiler is right in what it says. 'Perform_ButtonClick'
indeed is not the way to go about as it doesnt exist in .NET.

Raising an event is done a bit differently in VB .NET.

Read a bit about events and how they work in .NET. I've been following your posts, and I belive
you have a good experiance of programming in general so if you just figure out how events
work in VB .NET you would be able to solve your problem yourself. And this information
would come handy with whatever you do in .NET as events work in the same way every where
regardless of the language you r working with in .NET.

Regards
Ankur Verma

Hi,

Perform_ButtonClick is not an event it's a Sub(subroutine) in every form.Let me explain you bit more.

   I have a subroutine called "Perform_ButtonClick" in every form and When "ToolBar_ButtonClick" event is fired in MDI form (when clicked the toolbar in MDI form), it calls the "Perform_ButtonClick" subroutine of the form loaded on MDI form(active form). so it'll go to the relevant form's "Perform_ButtonClick" Subroutime and handles the MDI form's "ToolBar_ButtonClick" event.
   If I create and object from a form and calls that object's Perform_ButtonClick" subroutine as ,

    Private Sub ToolBar_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar.ButtonClick

        Dim objItemMaster As New ItemMaster

        Select Case e.Button.Tag
            Case "New"
                Call objItemMaster.Perform_ButtonClick("New")
            Case "Find"

            Case "Save"

            Case "Refresh"

            Case "Delete"

            Case "Print"

            Case "Close"
        End Select
    End Sub

   then it's working fine. but I have to create the object from the active form (form loaded on the MDI)

Okay Okay, Plese verify the following
1) U have defined a Perform_ButtonClick sub in the child form class defination.
2) Your Child Form class's name is ItemMaster

If my understanding of your problem is right then yours is not a problem at all. You are just missing a step.
The thing is that ActiveMdiChild property is of type Form and Form class indeed doesnt have
any function named Perform_ButtonClick defined in it, as the error indicated in one of your previous
posts suggests.
What you need to do is to cast the ActiveMdiChild to ItemMaster, and then call Perform_ButtonClick,
something like

CType(parForm.ActiveMdiChild,ItemMaster).Perform_B uttonClick("New")

where parForm is your MDI parent.

Regards
Ankur Verma

Hi Ankur,

   I tried what you told. but it highlights "MainMenu.ActiveMdiChild" part as a syntax error. MainMenu is my MDI form class name.

CType(MainMenu.ActiveMdiChild, ItemMaster).Perform_ButtonClick("New")

MainMenu - MDI form class name.
ItemMaster - Child form class name.

Can you please tell me a solution.

ThanX,

Hi Nalla,
I lost touch with the forum for a while. Have you managed to figure out the solution?
If Not, then can you post the exact error you are getting at MainMenu.ActiveMdiChild line.
Because I dont see, why it wont work.
Also I dont know what the word 'Nalla' means. So please enlighten me on that.

Regards
Ankur

Hi Ankur,

Ok. I'll post the source codes of MainMenu.vb and ItemMaster.vb,

MainMenu.vb

    Private Sub ToolBar_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar.ButtonClick

        'Dim objActiveForm As System.Windows.Forms.Form = ActiveForm.Name
        Dim objItemMaster As New ItemMaster

        'Dim objItemMaster As Form = Form.ActiveForm
        ActivateMdiChild(objItemMaster)

        Select Case e.Button.Tag
            Case "New"
                CType(MainMenu.ActiveMdiChild, ItemMaster).Perform_ButtonClick("New")
            Case "Find"

            Case "Save"

            Case "Refresh"

            Case "Delete"

            Case "Print"

            Case "Close"
        End Select
    End Sub


ItemMaster.vb

    Public Sub Perform_ButtonClick(ByVal Button As String)
        Select Case Button
            Case "New"

            Case "Find"

            Case "Save"

            Case "Refresh"

            Case "Delete"

            Case "Print"

            Case "Close"
        End Select
    End Sub

I think those 2 functions are enough for you to understand my problem. If I can have yout e-mail I'll mail you the project.

Hi Ankur,

Sorry I forgot to mention about nalla. nalla means my nick name. My actual name is Nalaka Sanjeewa. My firends call me nalla. It doesn't mean anything, it's like we call "Arhar" to "Azharudin"