vb的writeline用法,vbs readline
在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
打开它,然后使用
#
语句。例如,文本编辑器可以使用以下代码行来把一个文本框的内容拷贝到文件。
#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