如何用VB打开CMD并输出一段想要的文字

2024-12-22 01:02:50
推荐回答(2个)
回答1:

Private Sub Command1_Click()
Shell "C:\WINDOWS\system32\cmd.exe", vbNormalFocus
Timer1.Enabled = True
Timer1.Interval = 100
End Sub
Private Sub Timer1_Timer()
SendKeys "这里输入你的内容"
Timer1.Enabled = False
End Sub
已验证,运行正常

回答2:

Private Sub Command1_Click()
l = InputBox("在本框内输入你想要的文字", "输入你想要的文字")
Print l
End Sub