如何在vb6中以其他形式使用類對象

Question

我正在嘗試以不同的形式訪問類對象以調用其方法..您能告訴我我該怎么做..？ 這是我的代碼。

Dim a As customers

Private Sub Command1_Click()

Dim txt1 As String
Dim txt2 As String
Set a = New customers   
txt1 = Text1.Text
txt2 = Text2.Text
a.userid = txt1
a.log_in txt1, txt2       

End Sub

它是我以表格1 .....編寫的代碼。用於登錄..為客戶n創建了一個稱為日志記錄過程的對象...，如果它成功登錄，則將打開一個新的表格homw.show。 ......選項有視圖配置文件，其中我正在顯示另一個表單配置文件，並且在其加載方法中要調用另一個顯示配置文件的方法..它如何知道應該顯示誰的配置文件。變得迷茫，因為M剛接觸vb可以幫助我...

Answer 1

在第二種形式上實現init方法，並在Command1_Click中使用它，就像這樣

    ...
    a.userid = txt1
    a.log_in txt1, txt2   

    Dim oFrm As Form2
    Set oFrm = New Form2
    oFrm.Init a
End Sub

在Init您可以調用Show來顯示Form2的實例。 您還可以將在Form_Load執行的所有操作移至此簡單的Init方法-例如填充組合框等。