vb點(diǎn)虐 控制臺(tái)程序運(yùn)行后，怎樣將輸出結(jié)果生成文件

首先執(zhí)行Sub Main()

成都創(chuàng)新互聯(lián)公司專(zhuān)注于企業(yè)全網(wǎng)營(yíng)銷(xiāo)推廣、網(wǎng)站重做改版、新豐網(wǎng)站定制設(shè)計(jì)、自適應(yīng)品牌網(wǎng)站建設(shè)、H5高端網(wǎng)站建設(shè)、成都做商城網(wǎng)站、集團(tuán)公司官網(wǎng)建設(shè)、成都外貿(mào)網(wǎng)站建設(shè)、高端網(wǎng)站制作、響應(yīng)式網(wǎng)頁(yè)設(shè)計(jì)等建站業(yè)務(wù)，價(jià)格優(yōu)惠性?xún)r(jià)比高，為新豐等各大城市提供網(wǎng)站開(kāi)發(fā)制作服務(wù)。

①定義兩個(gè)變量a=45 b=18

②將a和b作為sum過(guò)程的兩個(gè)參數(shù)x=45(按值傳遞)，y=18(按地址傳遞，將在過(guò)程中改變b的初始值)

③xy滿(mǎn)足條件，將 x-y=45-18=27 賦值給x ；將 x+y=27+18=45 賦值給y，此時(shí)改變了b值為45.

④輸出x的值27 y的值45

⑤輸出a的值45 b的值45

如何在vb點(diǎn)虐 控制臺(tái)程序中格式化輸出結(jié)果（如圖）

Sub?Main()

Dim?a?As?Boolean?=?True,?b?As?Boolean?=?False

Console.WriteLine(LCase("a="??a??"?b="??b))

Console.WriteLine(LCase("true?and?false?=?"??(a?And?b)))

Console.WriteLine(LCase("true?and?not?false?=?"??(a?And?Not?b)))

Console.WriteLine(LCase("true?false?or?false?=?"??((ab)?Or?b)))

Console.ReadKey()

End?Sub

vb點(diǎn)虐 怎么從文本文檔中讀取一行數(shù)據(jù)，將文本輸出到控制臺(tái)？

以下示例一次從文件中讀取一行，然后將每行文本打印到控制臺(tái)。

Sub ReadTextLinesFromFile()

Dim file As New System.IO.StreamReader("c:test.txt")

Dim oneLine As String

oneLine = file.ReadLine()

While (oneLine "")

Console.WriteLine(oneLine)

oneLine = file.ReadLine()

End While

file.Close()

End Sub