vb6.0操作cmd命令行读取返回值

在VB6.0中，可以使用Shell函数来执行命令并读取返回值。

例如，要执行命令“dir”并读取返回值，可以使用以下代码：

Dim cmd As String
Dim rtn As Integer

cmd = "cmd /c dir"
rtn = Shell(cmd, vbNormalFocus)

MsgBox "返回值：" & rtn

在上述代码中，Shell函数将执行“cmd /c dir”命令，并返回命令的返回值。该返回值将存储在rtn变量中，并在消息框中显示。