vb的writeline用法,vbs readline

http://www.itjxue.com  2023-01-07 12:09  来源:未知  点击次数: 

在vb模块中怎么定义动态数组?

1、声明数组的语句:

Dim?types(??)??As?integer

2、然后使用ReDim语句来配置数组大小。

ReDim?Types(X+1)

3、假设想改变数组大小又不想丢失原来的数据,仅仅要在ReDim语句中包括Preservekeyword就能够,典型语句为:

ReDa_m?PresetVe?Types(10,23)?

对于多维数组,在使用Preservekeyword时,仅仅能改动最后一维的大小。假设改变其它维,那么将出现执行错误。假设不清楚某维的当前大小,能够使用GetI~ength函数来获取。

扩展资料:

数组的使用:

用For Each来循环遍历一个数组。比如:

Dim?x?As?Integer

F0r?Each?x?In?arrayl

Console.WriteLine(x)

Next?

在使用数组时还要注意,不仅声明语法有变化,并且在执行时处理方式也有了非常大的变化。VB.NET在堆栈中给数组分配地址空间,当向一个方法传递数组类型的参数时,使用的是引用传递而不是值传递。以下是互相传递数组引用的三个方法:

Dim?arrayl(3,3)AS?Integer

Dim?array2?As?Integer(,)

Redim?array2(3,3)

Dim?array3?As?Integer(,)={{2,4},{12,29}}

VB中摘取多个文本文件中的某一部分合并到一个文件中去

VB操作文本文件可以用FileSystemObject 对象, 要用ReadLine\WriteLine的方法.

请参考有关的帮助文件.

Set fs = CreateObject("Scripting.FileSystemObject")

Set a = fs.CreateTextFile("c:\testfile.txt", True)

a.WriteLine("This is a test.")

writeline用法

用法

C#中foreach用于循环列举出集合中所有的元素,foreach语句中的表达式由关键字in隔开的两个项组成。

VB的关于文件保存的方式?

1.打开顺序访问文件

当以顺序型访问打开一个文件时,可执行以下操作:

从文件输入字符

(Input)

向文件输出字符

(Output)

把字符加到文件

(Append)

要顺序型访问打开一个文件,Open

语句使用以下语法:

Open

pathname

For

[Input

|

Output

|

Append]

As

filenumber

[Len

=

buffersize]

从文件中读取字符串

要检索文本文件的内容,应以顺序

Input

方式打开该文件。然后使用

Line

Input#,Input(

),或者

Input#

语句将文件拷贝到程序变量中。

Line

Input

#FileNum,

NextLine

Input

#FileNum,

name,

street,

city,

state,

zip

LinesFromFile

=

Input(n,

FileNum)

要在顺序文件中存储变量的内容,应以顺序

Output

Append

打开它,然后使用

Print

#

语句。例如,文本编辑器可以使用以下代码行来把一个文本框的内容拷贝到文件。

Print

#FileNum,

TheBox.Text

Visual

Basic

也支持

Write

#

语句,它把一列数字和/或字符串表达式写入文件。它自动地用逗号分开每个表达式,并且在字符串表达式端放置引号。

Write

#FileNum

AnyString,

AnyNumber

注意

如果正在用顺序型访问的

Write

#

Input

#

语句,可考虑换用随机型

或二进制型访问,因为它们更适合面向于记录的数据。

2.打开随机访问的文件

要打开随机访问的文件,Open

语句使用以下语法:

Open

pathname

[For

Random]

As

filenumber

Len

=

reclength

因为

Random

是缺省的访问类型,所以

For

Random

关键字是可选项。

可用以下代码打开文件:

Open

"MYFILE.FIL"

For

Random

As

FileNum

Len

=

RecLength

把记录读入变量

使用

Get

语句把记录复制到变量。

Get

FileNum,

Position,

Employee

把变量写入记录

使用

Put

语句把记录添加或者替换到随机型访问打开的文件。

替换记录

要替换记录,请使用

Put

语句,指定想要替换的记录位置,例如:

Put

#FileNum,

Position,

Employee

添加记录

要向随机访问打开的文件的尾端添加新记录,应使用前述代码段中所示的

Put

语句。把

Position

变量的值设置为比文件中的记录数多

1。例如,要在一个包含五个记录的文件中添加一个记录,把

Position

设置为

6。

LastRecord

=

LastRecord

+

1

Put

#FileNum,

LastRecord,

Employee

删除记录

通过清除其字段可以删除一个记录,但是该记录仍在文件中存在。通常文件中不能有空记录,因为它们会浪费空间且会干扰顺序操作。最好把余下的记录拷贝到一个新文件,然后删除老文件。

3.打开二进制型访问的文件

要为二进制型访问打开文件,应使用以下

Open

语句的语法:

Open

pathname

For

Binary

As

filenumber

通过使用二进制型访问可使磁盘空间的使用降到最小。因为这不需要固定长度的字段,类型声明语句可以省略字符串长度参数。

4.用

File

System

Objects

创建文件并添加数据

有三种不同方法来创建一个顺序文本文件(有时被称为“文本流”)。一种方法就是使用

CreateTextFile

方法。要创建一个空文本文件,可以:

Dim

fso

As

New

FileSystemObject,

fil

As

File

Set

fil

=

fso.CreateTextFile("c:\testfile.txt",

True)

另一种方法是使用

FileSystemObject

对象的

OpenTextFile

方法,该对象的

ForWriting

标志设置为:

Dim

fso

As

New

FileSystemObject,

ts

As

New

TextStream

Set

ts

=

fso.OpenTextFile("c:\test.txt",

ForWriting)

或者使用带

ForWriting

标志设置的

OpenAsTextStream

方法:

Dim

fso

As

New

FileSystemObject,

fil

As

File,

ts

As

TextStream

Set

fso

=

CreateObject("Scripting.FileSystemObject")

fso.CreateTextFile

("test1.txt")

Set

fil

=

fso.GetFile("test1.txt")

Set

ts

=

fil.OpenAsTextStream(ForWriting)

添加数据到文件

文本文件一经创建,就可以分三步向其中加入数据:

打开文本文件以备写入数据。

写入数据。

关闭文件。

要打开文件,可以使用下面两种方法中的任一种:

File

对象的

OpenAsTextStream

方法,或

FileSystemObject

对象的

OpenTextFile

方法。

要向打开的文本文件中写入数据,可以使用

TextStream

对象的

Write

WriteLine

方法。它们之间的唯一差别是

WriteLine

在指定的字符串末尾添加换行符。

如果想要向文本文件中添加一个空行,请使用

WriteBlankLines

方法。

要关闭一个已打开的文件,请使用

TextStream

对象的

Close

方法。

例:

Sub

Create_File()

Dim

fso,

txtfile

Set

fso

=

CreateObject("Scripting.FileSystemObject")

Set

txtfile

=

fso.CreateTextFile("c:\testfile.txt",

True)

txtfile.Write

("这是一个测试例子。")

'

写入一行。

'

写入一行带有换行符的文本。

txtfile.WriteLine("Testing

1,

2,

3.")

'

向文件中写入三个换行符。

txtfile.WriteBlankLines(3)

txtfile.Close

End

Sub

使用

File

System

Objects

读取文件

要从一个文本文件中读取数据,请使用

TextStream

对象的

Read、

ReadLine

ReadAll

方法:

任务

方法

从一个文件中读取指定数量的字符

Read

读取一整行(紧跟,但不包括,换行符)

ReadLine

读取一个文本文件的所有内容

ReadAll

如果使用

Read

ReadLine

方法并且想要跳过数据的某些部分,可以使用

Skip

SkipLine

方法。

这些读取方法产生的文本被存储在一个字符串中,而这个字符串可以在一个控件中显示,也可以被字符串操作符分解(诸如

Left、

Right

Mid)、合并等等。

注意

vbNewLine

常数包含一个或多个字符(取决于操作系统)使得光标移至下一行的开头(回车/换行)。请注意,有的字符串末尾可能有这样的非打印字符。

vb.net用法问题

0表示 value

1表示power

2表示clng(math.pow(value,power))

012即表示writeline后续这三个参数的索引。

:n表示将索引2以千位分隔符表示,后面的0表示保留0位小数。

{2:x}将索引2转换为十六进制。

VB中 模块 public function 的规则与用法

Function 语句,声明 Function 过程的名称,参数以及构成其主体的代码。

说明:

如果没有使用 Public、Private 或

Friend 显式指定,则 Function 过程缺省为公用。

Function 过程可以是递归的;也就是说,该过程可以调用自己来完成某个特定的任务。不过,递归可能会导致堆栈上溢。通常 Static 关键字和递归的 Function 过程不在一起使用。

Function 过程与 Sub 过程的相似之处是: Function

过程是一个可以获取参数,执行一系列语句,以及改变其参数值的独立过程,而与子过程不同的是:当要使用该函数的返回值时,可以在表达式的右边使用 Function

过程,这与内部函数,诸如 Sqr、Cos 或 Chr 的使用方式一样。

要从函数返回一个值,只需将该值赋给函数名。在过程的任意位置都可以出现这种赋值。如果没有对 name

赋值,则过程将返回一个缺省值:数值函数返回 0,字符串函数返回一个零长度字符串 (""),Variant 函数则返回 Empty。如果在返回对象引用的 Function

过程中没有将对象引用赋给 name (通过 Set),则函数返回

Nothing。

Function 语句示例

该示例使用 Function 语句来声明 Function 过程的名称、参数、以及构成

Function 过程主体的代码。

'下面的用户自定义函数返回

'它的参数的平方根。

Function?CalculateSquareRoot(NumberArg?As?Double)?As?Double

???If?NumberArg??0?Then???'评估参数。

??????Exit?Function???'退出调用过程。

???Else

??????CalculateSquareRoot?=?Sqr(NumberArg)???'返回平方根。

???End?If

End?Function

(责任编辑:IT教学网)

更多

推荐综合特效文章