Vb6 在Visual Basic 6中获取磁盘序列号

我有一个名为GetDiskSerial的工具问题。有关此软件的详细信息，请查看以下链接：

使用此工具，我们可以检索所有信息（如序列号、设备名称、型号和…）

我的问题是，当我检查我的设备序列号时，它没有正确显示我的序列号。getdiskserial有一个这样的例子

例如，我有一个外部硬盘，其序列号为860021300502211041

它显示了8600213005022111041，其中有一个额外的字符'S'

对于模型来说，它显示的硅功率已经错过了charachter'S'， 所以这个“S”被添加到序列号中。 我上传了此图像以获取更多信息：

getdiskserial在许多类型的语言程序中都有很多演示源代码。我试图通过检查它的代码来解决我的问题，我发现这个问题是由它的模块引起的。 在其模块中，它具有如下功能：

Public Type DiskInfo
SerialNumber        As String * 21
ModelNumber         As String * 39
FirmwareRev         As String * 9
InterfaceType       As String * 10
MediaType           As String * 40
BufferSize          As Long
Cylinders           As Long
Heads               As Long
Sectors             As Long
SectorsPerTrack     As Long
BytesPerSector      As Long

端型 当我更改这些的大小值时，它会显示不同的序列，如下所示： 860021300502111041SIL

亲爱的朋友们，我很抱歉我的要求，也很抱歉我的英语不好。请下载并检查GetSerialDisk以了解如何解决此错误

---

所以，谢谢。

21个字符？似乎是一个奇怪的数字，你的回答是这样的，罗布。这是我的尝试。默认值是20。你能发布你如何调用函数和使用结果的代码吗？亲爱的Rob，这不是我的代码。它是其中GetDiskSerial的Visual basic示例。请下载此链接并尝试代码。谢谢尝试将SerialNumber字符串声明缩短为

string*19