Visual Basic

The Osmosian Order wrote:

Perhaps. But why, then, is your entire reply (shown above) written in English?

The Osmosian Order wrote:

But our machine does, in a real sense, understand English.

The Osmosian Order wrote:

Not yet. But it's a first step.

The Osmosian Order wrote:

So ask again if you really care, and I'll explain our idea.

'Declare the Structure
Public Structure myTestStructure
    Dim val1 As Integer
    Dim val2 As String
End Structure

'Pass the structure
Public Function myFunction() As myTestStructure
    Dim StructureInstance As myTestStructure
    StructureInstance.val1 = 3
    StructureInstance.val2 = "Hi"
    Return StructureInstance
End Function

Public Class MyClassName
    'Declare the Structure    
    Public Structure myTestStructure        
        Dim val1 As Integer        
        Dim val2 As String    
    End Structure    

    'Pass the structure    
    Public Function myFunction() As myTestStructure        
        Dim StructureInstance As myTestStructure        
        StructureInstance.val1 = 3        
        StructureInstance.val2 = "Hi"        
        Return StructureInstance    
    End Function
End Class

Dim objClassInstance as New MyClassName
Dim objTestStructure as New objClassInstance.myTestStructure
objTestStructure = objClassInstance.myFunction