(1)'循环至文件尾。
MyLine=MyLine&Input(1,#1)'读入一个字符到变量中。
MyLocation=Loc
(1)'取得当前位置。
'在立即窗口中显示。
Debug.PrintMyLine:
Tab:
MyLocation
Loop
Close#1'关闭文件。
________________________________________
相关基础知识:
Long数据类型
?
字节的整型值,取值范围从-2,147,483,648到2,147,483,647。
在VisualBasic中可用符号(&)的类型声明字符来表示Long。
参数
传递给一个过程的常数、变量或表达式。
Integer数据类型
一种数据类型,将整型变量作为2字节整数存储起来,范围是-32,768到32,767之间的数字。
Integer数据类型也可表示列举值。
在VisualBasic可用百分比符号(%)的类型声明字符来表示一个Integer。
文件号
在Open语句中用来打开文件的号码。
对不能访问其它应用程序的文件,使用1–255范围内的文件号,对可由其它应用程序访问的文件,使用256–511范围内的文件号。
LOF函数
________________________________________
示例
返回一个Long,表示用Open语句打开的文件的大小,该大小以字节为单位。
语法
LOF(filenumber)
必要的filenumber参数是一个Integer,包含一个有效的文件号。
注意对于尚未打开的文件,使用FileLen函数将得到其长度。
________________________________________
LOF函数示例
本示例使用LOF函数来得知已打开文件的大小。
本示例假设TESTFILE文件内含文本数据。
DimFileLength
Open"TESTFILE"ForInputAs#1'打开文件。
FileLength=LOF
(1)'取得文件长度。
Close#1'关闭文件。
________________________________________
相关基础知识:
Long数据类型
?
字节的整型值,取值范围从-2,147,483,648到2,147,483,647。
在VisualBasic中可用符号(&)的类型声明字符来表示Long。
参数
传递给一个过程的常数、变量或表达式。
Integer数据类型
一种数据类型,将整型变量作为2字节整数存储起来,范围是-32,768到32,767之间的数字。
Integer数据类型也可表示列举值。
在VisualBasic可用百分比符号(%)的类型声明字符来表示一个Integer。
文件号
在Open语句中用来打开文件的号码。
对不能访问其它应用程序的文件,使用1–255范围内的文件号,对可由其它应用程序访问的文件,使用256–511范围内的文件号。
Log函数
________________________________________
示例
返回一个Double,指定参数的自然对数值。
语法
Log(number)
必要的number参数是Double或任何有效的大于0的数值表达式。
说明
自然对数是以e为底的对数。
常数e的值大约是2.718282。
如下所示,将x的自然对数值除以n的自然对数值,就可以对任意底n来计算数值x的对数值:
Logn(x)=Log(x)/Log(n)
下面的示例说明如何编写一个函数来求以10为底的对数值:
StaticFunctionLog10(X)
Log10=Log(X)/Log(10#)
EndFunction
________________________________________
Log函数示例
本示例使用Log函数得到某数的自然对数值。
DimMyAngle,MyLog
'定义角度(以“弧度”为单位)。
MyAngle=1.3
'计算反双曲正弦函数值(inversesinh())。
MyLog=Log(MyAngle+Sqr(MyAngle*MyAngle+1))
________________________________________
相关基础知识:
Double数据类型
保存双精度的64位浮点数的数据类型。
对于负数,其范围为-1.79769313486232E308到-4.94065645841247E-324;对于正数,其范围为4.94065645841247E-324到1.79769313486232E308。
在VisualBasic中,数字符号(#)为表示Double的类型声明字符。
参数
传递给一个过程的常数、变量或表达式。
数值表达式
所有结果为一个数值的表达式。
数值表达式可以包含结果为数值的关键字、变量、常数、和运算符的任意组合。
常数
执行程序时保持常数值的命名项目。
常数可以是字符串、数值、另一常数、任何(除乘幂与Is之外的)算术运算符或逻辑运算符的组合。
每个主应用程序皆可定义自己的一组常数。
用户也可以Const语句定义附加常数。
可在代码中的任何地方使用常数代替实际的值。
Mid函数
________________________________________
示例
返回Variant(String),其中包含字符串中指定数量的字符。
语法
Mid(string,start[,length])
Mid函数的语法具有下面的命名参数:
部分说明
string必要参数。
字符串表达式,从中返回字符。
如果string包含Null,将返回Null。
start必要参数。
为Long。
string中被取出部分的字符位置。
如果start超过string的字符数,Mid返回零长度字符串("")。
length可选参数;为Variant(Long)。
要返回的字符数。
如果省略或length超过文本的字符数(包括start处的字符),将返回字符串中从start到尾端的所有字符。
说明
欲知string的字符数,可用Len函数。
注意MidB函数作用于字符串中包含的字节数据,如同在双字节字符集(DBCS)语言中一样。
因此其参数指定的是字节数,而不是字符数。
对于使用MidB的示例代码,请参阅示例主题中的第二个示例。
________________________________________
Mid函数示例
本示例使用Mid语句来得到某个字符串中的几个字符。
DimMyString,FirstWord,LastWord,MidWords
MyString="MidFunctionDemo"建立一个字符串。
FirstWord=Mid(MyString,1,3)'返回"Mid"。
LastWord=Mid(MyString,14,4)'返回"Demo"。
MidWords=Mid(MyString,5)'返回"FuncionDemo"。
________________________________________
相关基础知识:
命名参数
一参数,在对象库中预先定义了其名称。
对每个参数,不必拘泥于语法所规定的特定顺序来提供值,而是只需按任何顺序用命名参数分配值。
例如,假设一方法接受了三个参数:
DoSomeThingnamedarg1,namedarg2,namedarg3
在对命名参数赋值时,可使用以下语句:
注意,命名的参数不必按语法中安排的正规顺序出现。
字符串表达式
任何其值为一连串字符的表达式。
字符串表达式的元素可包含返回字符串的函数、字符串文字、字符串常数、字符串变量、字符串Variant或返回字符串Variant(VarType8)的函数。
Null
一个值,指示变量不含有效数据。
Null是将Null显式赋值给一变量的结果,或者是包含Null的表达式之间的任何运算。
Long数据类型
4字节的整型值,取值范围从-2,147,483,648到2,147,483,647。
在VisualBasic中可用符号(&)的类型声明字符来表示Long。
参数
传递给一个过程的常数、变量或表达式。
Minute函数
________________________________________
示例
返回一个Variant(Integer),其值为0到59之间的整数,表示一小时中的某分钟。
语法
Minute(time)
必要的time参数,可以是任何能够表示时刻的Variant、数值表达式、字符串表达式或它们的组合。
如果time包含Null,则返回Null。
________________________________________
Minute函数示例
本示例使用Minute函数转换指定的时间,得到小时后面的分钟数。
在开发环境中,日期和时间原义会根据系统的地区设置,以短式日期和时间格式显示。
DimMyTime,MyMinute
MyTime=#4:
35:
17PM#'指定一时间。
MyMinute=Minute(MyTime)'MyMinute的值为35。
________________________________________
相关基础知识:
参数
传递给一个过程的常数、变量或表达式。
Variant数据类型
一种特殊的数据类型,可以包含数值、字符串或日期数据,还包含自定义类型和特殊数值Empty和Null。
Variant数据类型有16字节的数值存储大小,可以包含的数据可达Decimal的范围,或22-字节(加上字符串长度)的字符存储大小,而且可存储任何字符文本。
VarType函数定义了如何处理Variant中的数据。
对所有变量,如果没有明确声明它们是其它数据类型,则它们都变成Variant数据类型。
数值表达式
任何其值为数的表达式。
表达式的元素可包含任何关键字、变量、常数和运算符的组合,其结果为数。
字符串表达式
任何其值为一连串字符的表达式。
字符串表达式的元素可包含返回字符串的函数、字符串文字、字符串常数、字符串变量、字符串Variant或返回字符串Variant(VarType8)的函数。
Null
一个值,指示变量不含有效数据。
Null是将Null显式赋值给一变量的结果,或者是包含Null的表达式之间的任何运算。
Month函数
________________________________________
示例
返回一个Variant(Integer),其值为1到12之间的整数,表示一年中的某月。
语法
Month(date)
必要的date参数,可以是任何能够表示日期的Variant、数值表达式、字符串表达式或它们的组合。
如果date包含Null,则返回Null。
________________________________________
Month函数示例
本示例使用Month函数来得知某个日期的月份。
在开发环境中,日期原义会根据系统的地区设置,以短式日期格式显示。
DimMyDate,MyMonth
MyDate=#February12,1969#'指定一日期。
MyMonth=Month(MyDate)'MyMonth的值为2。
________________________________________
相关基础知识:
参数
传递给一个过程的常数、变量或表达式。
Variant数据类型
一种特殊的数据类型,可以包含数值、字符串或日期数据,还包含自定义类型和特殊数值Empty和Null。
Variant数据类型有16字节的数值存储大小,可以包含的数据可达Decimal的范围,或22-字节(加上字符串长度)的字符存储大小,而且可存储任何字符文本。
VarType函数定义了如何处理Variant中的数据。
对所有变量,如果没有明确声明它们是其它数据类型,则它们都变成Variant数据类型。
数值表达式
任何其值为数的表达式。
表达式的元素可包含任何关键字、变量、常数和运算符的组合,其结果为数。
字符串表达式
任何其值为一连串字符的表达式。
字符串表达式的元素可包含返回字符串的函数、字符串文字、字符串常数、字符串变量、字符串Variant或返回字符串Variant(VarType8)的函数。
Null
一个值,指示变量不含有效数据。
Null是将Null显式赋值给一变量的结果,或者是包含Null的表达式之间的任何运算。
MonthName函数
________________________________________
描述
返回一个表示指定月份的字符串。
语法
MonthName(month[,abbreviate])
MonthName函数语法有如下几部分:
部分描述
month必需的。
月份的数值表示。
例如一月是1,二月是2,等等。
abbreviate可选的。
Boolean值,表示月份名是否缩写。
如果忽略,缺省值为False,表明月份名不能被缩写。
________________________________________
MsgBox常数
________________________________________
可在代码中的任何地方使用下列常数代替实际值:
MsgBox参数
常数值描述
vbOKOnly0只有OK按钮(缺省值)
vbOKCancel1OK和Cancel按钮
vbAbortRetryIgnore2Abort、Retry,和Ignore按钮
vbYesNoCancel3Yes、No,和Cancel按钮
vbYesNo4Yes和No按钮
vbRetryCancel5Retry和Cancel按钮
vbCritical16关键消息
vbQuestion32警告询问
vbExclamation48警告消息
vbInformation64通知消息
vbDefaultButton10第一个按钮是缺省的(缺省值)
vbDefaultButton2256第二个按钮是缺省的
vbDefaultButton3512第三个按钮是缺省的
vbDefaultButton4768第四个按钮是缺省的
vbApplicationModal0应用程序形态的消息框(缺省值)
vbSystemModal4096系统强制返回的消息框
vbMsgBoxHelpButton16384添加Help按钮到消息框
VbMsgBoxSetForeground65536指定消息框窗口作为前景窗口
vbMsgBoxRight524288文本是右对齐的
vbMsgBoxRtlReading1048576指定在希伯来语和阿拉伯语系统中,文本应当显示为从右到左读
MsgBox返回值
常数值描述
vbOK1按下OK按钮
vbCancel2按下Cancel按钮
vbAbort3按下Abort按钮
vbRetry4按下Retry按钮
vbIgnore5按下Ignore按钮
vbYes6按下Yes按钮
vbNo7按下No按钮
________________________________________
相关基础知识:
常数
执行程序时保持常数值的命名项目。
常数可以是字符串、数值、另一常数、任何(除乘幂与Is之外的)算术运算符或逻辑运算符的组合。
每个主应用程序皆可定义自己的一组常数。
用户也可以Const语句定义附加常数。
可在代码中的任何地方使用常数代替实