VB.NET窗口显示的有关问题
求助:VB.NET窗口显示的问题

如图了。如何用VB.NET实现这一效果?就是下面是一个命令行界面。(这个是在Ubuntu下截的屏)
非常感谢!
------解决方案--------------------
textbox,backgroundcolor设成黑色,forecolor设成白色。
下面不是命令行界面,不能输入,即使是的话也可以用textbox模拟。
------解决方案--------------------
如图了。如何用VB.NET实现这一效果?就是下面是一个命令行界面。(这个是在Ubuntu下截的屏)
非常感谢!
------解决方案--------------------
textbox,backgroundcolor设成黑色,forecolor设成白色。
下面不是命令行界面,不能输入,即使是的话也可以用textbox模拟。
------解决方案--------------------
'窗体上加一个 Button,一个 TextBox(MultiLine=True,ScrollBar=Both)
Public Class Form1
Sub Go()
Dim p As New Process
p.StartInfo.FileName = "ping.exe"
p.StartInfo.Arguments = "www.****.net -t"
p.StartInfo.UseShellExecute = False
p.StartInfo.RedirectStandardOutput = True
p.StartInfo.CreateNoWindow = True
AddHandler p.OutputDataReceived, AddressOf HelloMum
p.Start()
p.BeginOutputReadLine()
End Sub
Sub HelloMum(ByVal sender As Object, ByVal e As DataReceivedEventArgs)
UpdateTextBox(e.Data)
End Sub
Private Delegate Sub UpdateTextBoxDelegate(ByVal Text As String)
Private Sub UpdateTextBox(ByVal Tex As String)
If Me.InvokeRequired Then
Dim del As New UpdateTextBoxDelegate(AddressOf UpdateTextBox)
Dim args As Object() = {Tex}
Me.Invoke(del, args)
Else
TextBox1.Text &= Tex & Environment.NewLine
End If
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Go()
End Sub
End Class