2013-05-25 32 views
-3
Public Class Form1 

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load 

    End Sub 

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
     Shell("CMD.exe") 
     SendKeys.Send("net user")("TextBox1.Text")("TextBox2.Text") 
     SendKeys.Send("{ENTER}") 
    End Sub 
End Class 

它說:vb.net錯誤

錯誤1表達式不是數組或方法,而不能有 參數列表。

的SendKeys.Send(「網用戶」)

+0

我找到了如何解決它的工作現在 –

回答

0

很高興你已經解決了,但請相信我,這是不是從NET應用程序中使用的CMD.exe一起工作的正確途徑。

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
    Dim pi = new ProcessStartInfo() 
    pi.FileName = "CMD.EXE" 
    pi.Arguments = "/K NET USER " + textBox1.Text + " " + TextBox2.Text 
    Process.Start(pi) 
End Sub 

ProcessStartInfo class
Process class