获取硬盘序列号在window7下乱码问题？

MsgValue = ""
    Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
    '获取硬盘序列号
    Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_PhysicalMedia", , 48)
    For Each objItem In colItems
        MsgValue = MsgValue & vbCrLf & "硬盘 = " & objItem.SerialNumber
    Next

    Text1 = MsgValue在xp系统下非常正常的，但是在window7下会出现乱码：
硬盘 = 馋桫这样的，请问怎么回事啊，怎么处理？