投稿者 おおぎっち  (社会人) 投稿日時 2009/9/22 04:57:03
今、システムに関する数値を返すメソッドをまとめたクラスを作っているのですが

Public Class Form1

    Dim systemonitor As New systemmonitor

    Private Sub Form1_Load(ByVal sender As System.ObjectByVal e As System.EventArgs) Handles MyBase.Load

        MsgBox(systemonitor.TotalPmemMB)

    End Sub
End Class

systemmonitor.vb
Public Class systemmonitor

    Public Function TotalPmemMB() As Integer
        Return Math.Ceiling(My.Computer.Info.TotalPhysicalMemory / 1024 / 1024)
    End Function

End Class


これで起動時に物理メモリの合計をMBに直し、整数で表示されますが

systemonitor.TotalPmemMB

ではなく

systemonitor.Memory.TotalPmemMB

としたいのです。
ほかにもsystemonitor.Memoryから

systemonitor.Memory.TotalPmem
systemonitor.Memory.TotalPmemKB
systemonitor.Memory.TotalPmemMB
systemonitor.Memory.TotalPmemGB

といくつかのメソッドをまとめたいのですがどうすればよいでしょうか。
コード、説明をいただけましたら幸いです。
よろしくお願いいたします。