VB 2010元素到變量

Question

如果您在VB 2010中構建了一個HousePet的結構，並且您想訪問名爲Coat的結構元素，那麼將元素移動到變量Coat所需的代碼行是什麼？

Structure HousePet 
    Public _Breed as String 
    Public _PetCoat as String 
    Public _Cost as Double 
End Structure 

    Sub Main() 
     Dim HoundDog As HousePet 
     Dim Coat as String 
     **Insert Code Here** 
    End Sub 

Answer 1

首先，你需要結構體的類型的變量：

Private MyPet As HousePet 

然後你就可以像這樣訪問：

Coat = MyPet._PetCoat 

Answer 2

'Public _Cost as Double 
'A Typo? 
'Did you mean Public _Coat as Double 

Sub Main() 
    Dim HoundDog As HousePet 
    Dim Coat As String 

    Dim x As HousePet 

    Coat = x._Cost 'Or is it a typo? x._Coat? 
End Sub