vb.net控制台输入 vb控制台输出

VB.NET控制台

就是这样的老兄，显示完就是闪一下，不会等你看的。程序流程本来就是这样嘛。

创新互联建站是一家集网站建设,临沭企业网站建设,临沭品牌网站建设,网站定制,临沭网站建设报价,网络营销,网络优化,临沭网站推广为一体的创新建站企业，帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿，时刻以成就客户成长自我，坚持不断学习、思考、沉淀、净化自己，让我们为更多的企业打造出实用型网站。

一般要看的话，都是在下面加一句：

console.read()

这样等到你按回车，才会结束 。

VB.NET 向指定(网页或软件)的输入框内输入字符,如何实现?

假如Form1有个TextBox1，双击TextBox1填入123

Public Class Form1

Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Integer, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Integer

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

End Sub

Private Sub TextBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.DoubleClick

System.Windows.Forms.SendKeys.Send("123")

End Sub

End Class

看你的VB.NET 版本了

用 My.Computer.Keyboard.SendKeys("123", True) 代替 System.Windows.Forms.SendKeys.Send("123") 也可以

原码：

Public Class Form1

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

End Sub

Private Sub TextBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.DoubleClick

My.Computer.Keyboard.SendKeys("123", True)

End Sub

End Class

在vb.net中怎么编写一个控制台程序，求两个整数的平均值

Sub Main()

Dim i, j As Integer

Dim tmpStr As String

Console.WriteLine("please input a integer")

tmpStr = Console.ReadLine()

If IsNumeric(tmpStr) And InStr(tmpStr, ".") 1 Then

判断输入是否是整数,IsNumeric(tmpStr) 是判断是否是数字,InStr(tmpStr, ".")是判断是否有小数点.

i = CType(tmpStr, Integer)

Else

MsgBox("not a valid integer!")

Exit Sub

End If

Console.WriteLine("please input another integer")

tmpStr = Console.ReadLine()

If IsNumeric(tmpStr) And InStr(tmpStr, ".") 1 Then

j = CType(tmpStr, Integer)

Else

MsgBox("not a valid integer!")

Exit Sub

End If

Console.WriteLine("the avg is : " ((i + j) / 2).ToString "press enter to exit...")

Console.ReadLine()

End Sub

VB.net编写一个控制台应用程序用来从键盘上输入两个数然后输出这两个数的和差积商

应该定义为double或者single，string类好像不能进行运算。我简单说一下控制台的方法，你要一次性输入和差积商，首先声明两个变量用来储存两个数，然后用算法一次性输出结果就ok。

Sub Main()

Dim FN As Single

Dim SN As Single

Dim ResultNum As Single

Console.WriteLine("请输入第一个数") : FN = Console.ReadLine

Console.WriteLine("请输入第二个数") : SN = Console.ReadLine

ResultNum = FN + SN

Console.WriteLine("它们的和: " ResultNum)

ResultNum = FN - SN

Console.WriteLine("它们的差: " ResultNum)

ResultNum = FN * SN

Console.WriteLine("它们的积: " ResultNum)

ResultNum = FN / SN

Console.WriteLine("它们的商: " ResultNum)

Console.ReadLine()

End Sub

请教如何解决vb.net打开控制台程序控制输入输出锁死的问题。

如何处理锁死？同步的程序就有这个缺陷，条件得不到满足就不会返回。所以想不锁死就只能满足

a.StandardOutput.ReadLine的需求。

如果确实满足不了或者无法预料能否满足怎么办？

将这个方法放入一个线程，这样线程锁死，主程序界面也不会锁死，还是会响应用户操作，而且主线程可以设定一个等待时间，如果超时就杀死线程。

vb 怎么写控制台程序

vb.net有控制台程序选择项，

新建--项目--已安装--模板-Visual Basic--windows,

然后在右边的窗口中选择“控制台应用程序”。