vb问题，请教高手帮忙，急啊

热力四射

做了两个窗口，一个主窗口三个按钮，一个窗口是个tabcontrol，有三个tabpage ，想按按钮1，跳出窗口自动显示tabpage1，按按钮2自动显示tabpage2，按按钮3自动显示tabpage3图如下




写了个代码，如下

Public Class mainForm
    Public hoge As New helpForm
    Public i As Integer

    Public Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        i = 0
        hoge.test(i)
        helpForm.Show()
    End Sub


    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        i = 1
        hoge.test(i)
        helpForm.Show()
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        i = 2
        hoge.test(i)
        helpForm.Show()
    End Sub


End Class


Public Class helpForm

    Public t As Integer

    Public Sub test(ByVal x As Integer)
        t = x
    End Sub

    Public Sub helpForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Select Case t
            Case 0
                TabControl1.SelectedIndex = 0
            Case 1
                TabControl1.SelectedIndex = 1
            Case 2
                TabControl1.SelectedIndex = 2

        End Select
    End Sub

End Class


在Class helpForm中想定义一个全局变量t来接受mainform传递来的值 来判断显示哪个tabpage，但是问题是在helpform中的 helpForm_Load中，t的值并没有保存，一直都是0，也就是一直只能显示tabpage1，请高手帮帮忙，该怎么解决

热力四射

回复 落魄书生 的帖子

谢谢大大， hoge.test是想把i的值传到helpform的t里，然后在用show叫出help窗口，

现在问题是我在helpform里定义的全局变量 t 的值只在Public Sub test(ByVal x As Integer) 这里变化，到了Public Sub helpForm_Load里值又变回0了，也就是说 t 并没有达到全局变量的作用，怎么才能让 Public Sub test(ByVal x As Integer)  的 t 的值代到Public Sub helpForm_Load里啊

Neithen

把test名字改成"New"就行，

热力四射

回复 落魄书生 的帖子

谢了，成了，感谢！！！！！

热力四射

回复 Neithen 的帖子

谢谢，按照书生的做法做成了