jds1207 wrote:

I need to write a function that will pass two parameters: partnumber and format style to format the partnumber.

pham quang dan wrote:

the code to explaint voices and imagines throght LAN and wireless

Dim strValue As String
Private Sub radButton_CheckChanged(...) Handles radButton.CheckChanged
If radButton.Checked = True
strValue = radButton.Text 'or whatever value it is the you want
End If
End Sub

<big> foreach a as control in form1.controls<br />
if a.gettype="RadioButton" then<br />
return a.name<br />
end if<br />
next</big>

Public Function GetTotalVMSizeInKb() As ULong
    Dim x As ULong = My.Computer.Info.TotalVirtualMemory
    Return (x / 1024)
End Function

Public ReadOnly Property VirtualMemory() As ULong
    Get
        Dim vVirtualMemory As ULong = My.Computer.Info.TotalVirtualMemory
        Return (mVirtualMemory / 1024)
    End Get
End Property

Public ReadOnly Property VirtualMemory() As ULong
    Get
        Return (My.Computer.Info.TotalVirtualMemory / 1024)
    End Get
End Property

Dave Kreskowiak wrote:

Oh! And using a "global" variable like this (mVirtualMemory) is really bad practice! You're violating rules of Encapsulation and making it harder to debug your code. There is no reason, that I can see, for having that variable declared in Class scope. It should have been done inside the Property code.