在VB中，可以使用Shell函数来调用CMD命令。Shell函数有两个参数，第一个参数是要执行的命令，第二个参数是可选的，表示打开命令窗口的方式。如果不指定第二个参数，则会以默认方式打开命令窗口。例如，要执行dir命令可以使用以下代码：
Shell("cmd.exe /c dir")
其中，/c参数表示执行完命令后自动关闭命令窗口。如果要保留窗口，可以使用/k参数。例如：
Shell("cmd.exe /k dir")
需要注意的是，CMD命令在执行时可能会弹出一些提示框，需要手动关闭才能继续执行下面的代码。为了避免这种情况，可以使用WScript.Shell对象的Run方法，该方法可以隐藏窗口并等待命令执行完成后再继续执行下面的代码。例如：
Dim oShell As Object
Set oShell = CreateObject("WScript.Shell")
oShell.Run "cmd.exe /c dir", 0, True
其中，第二个参数0表示隐藏窗口，第三个参数True表示等待命令执行完成后再继续执行下面的代码。
