[2005] Button Help

[bharanidharanit]

Hello sir,
I am having 3 linklabels on the form and 1 button.
Consider these are the linklabels.
a
b
c

When "a" is clicked, button is visible on the form and when i click the button HTML output is displayed (i had already attached HTML pages to my project and also i know how to display output for HTML pages in the project) .

For a,b,c i am having different HTML pages.

What i actually need is?
I want to use only one button. But when i click a,b,c linklabels, the appropriate HTML output must be displayed.

[Shaggy Hiker]

So when you click one of the labels, you need to set some form level variable to indicate which one was pressed. Then the button click event would display the HTML based on the value of that variable.

[bharanidharanit]

So when you click one of the labels, you need to set some form level variable to indicate which one was pressed. Then the button click event would display the HTML based on the value of that variable.

Hello sir,
I cant get you sir,
Can u explain me in more detail?

[bharanidharanit]

Hello sir,
How to set form level variables to detect which button is pressed?

[BrailleSchool]

Hello sir,
How to set form level variables to detect which button is pressed?

you would create a public variable at the top of the code page. something like

Public MyVariableName as integer = 0

then in the relevant event for the link label, you would do something like:

MyVariableName = 1

of course, the value of MyVariableName would be different for each, eg:
MyVariableName = 1
MyVariableName = 2
MyVariableName = 3

then you would check the value of MyVariableName and do what you want accordingly. eg:

Select Case MyVariableName
Case 1
'do something for MyVariableName = 1
Case 2
'do something for MyVariableName = 2
Case Else
'do something for MyVariableName when its not = 1 or = 2
End Select

of course, i used an integer but you can use any data type, i suppose

[dminder]

You can also set the .Tag property on the Button then display the HTML based on the .Tag Property.

 Private Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
        Button1.Tag = "a"
    End Sub

    Private Sub LinkLabel2_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel2.LinkClicked
        Button1.Tag = "b"
    End Sub

    Private Sub LinkLabel3_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel3.LinkClicked
        Button1.Tag = "c"
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If Button1.Tag IsNot Nothing Then
            Select Case Button1.Tag.ToString
                Case "a"
                    'Show HTML for a
                Case "b"
                    'Show HTML for b
                Case "c"
                    'Show HTML for c
                Case Else
                    MessageBox.Show("Not a valid selection")

            End Select
        End If
    End Sub

The way they were describing in previous posts on using a form level variable is something similar to what is above, see below:

Public Class Form1

    Private LabelClicked As String = "a"

    Private Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
        LabelClicked = "a"
    End Sub

    Private Sub LinkLabel2_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel2.LinkClicked
        LabelClicked = "b"
    End Sub

    Private Sub LinkLabel3_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel3.LinkClicked
        LabelClicked = "c"
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Select Case LabelClicked
            Case "a"
                'Show HTML for a
            Case "b"
                'Show HTML for b
            Case "c"
                'Show HTML for c
            Case Else
                MessageBox.Show("Not a valid selection")

        End Select
    End Sub

End Class

Either way the result is the same. I hope this helps you some!

Good Luck!

D

[bharanidharanit]

You can also set the .Tag property on the Button then display the HTML based on the .Tag Property.

 Private Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
        Button1.Tag = "a"
    End Sub

    Private Sub LinkLabel2_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel2.LinkClicked
        Button1.Tag = "b"
    End Sub

    Private Sub LinkLabel3_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel3.LinkClicked
        Button1.Tag = "c"
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If Button1.Tag IsNot Nothing Then
            Select Case Button1.Tag.ToString
                Case "a"
                    'Show HTML for a
                Case "b"
                    'Show HTML for b
                Case "c"
                    'Show HTML for c
                Case Else
                    MessageBox.Show("Not a valid selection")

            End Select
        End If
    End Sub

The way they were describing in previous posts on using a form level variable is something similar to what is above, see below:

Public Class Form1

    Private LabelClicked As String = "a"

    Private Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
        LabelClicked = "a"
    End Sub

    Private Sub LinkLabel2_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel2.LinkClicked
        LabelClicked = "b"
    End Sub

    Private Sub LinkLabel3_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel3.LinkClicked
        LabelClicked = "c"
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Select Case LabelClicked
            Case "a"
                'Show HTML for a
            Case "b"
                'Show HTML for b
            Case "c"
                'Show HTML for c
            Case Else
                MessageBox.Show("Not a valid selection")

        End Select
    End Sub

End Class

Either way the result is the same. I hope this helps you some!

Good Luck!

D

Thankyou sir,
But i am having nearly 1000 of linklabels. Then the coding is some tough. Is there any other possible easy way to do this?

[Ozzapoo]

1000? Isn't that a bit too much to fit on one form? But if you are, are you going to be creating them manually or using some piece of code to generate them when the form loads?

[dminder]

Well to do what you described in the original post those are your best 2 options. Regardless if it is 1, 10 or 1000, you will still have to do the same thing - welcome to our world!!

D