Input 函数

重要:  本文是由机器翻译的,请参阅免责声明。请在 此处 中查找本文的英文版本以便参考。

注意: 如果 Microsoft Jet 表达式服务运行在沙盒模式下,可防止潜在不安全的表达式的求值,则禁用函数、 方法、 对象或本主题中介绍的属性。沙盒模式的详细信息,"沙盒模式"中搜索帮助。

返回包含在输入二进制模式下打开的文件中的字符的字符串。

语法

输入 ( 号码, # filenumber)

输入函数语法具有以下参数︰

参数

说明

数字

必填。指定要返回的字符数任何有效数值表达式 。

filenumber

必填。任何有效文件编号。


注解

Input函数读取数据通常写入打印 #放置的文件。此函数仅使用在输入二进制模式下打开的文件。

不同Input #语句中,输入函数返回的所有字符读取,包括逗号、 回车、 换行符、 双引号括起来,以及前导空格。

二进制访问打开的文件,尝试通过使用Input函数,直到EOF ,则返回True文件读取生成错误。阅读的输入,二进制文件时,而不是EOF使用LOFLoc函数,或使用EOF函数时使用的获取

注意: 用于文本文件中包含的字节数据InputB函数。与InputB数字指定字节,而不是要返回的字符数返回的数。

示例

注意: 下面的示例说明使用此函数在 Visual Basic for Applications (VBA) 模块。有关处理 VBA 的详细信息,搜索旁边的下拉列表中选择开发人员参考,然后在搜索框中输入一个或多个术语。

此示例使用Input函数以阅读文件从一次一个字符,并将其打印到即时窗口。此示例假定该TESTFILE文本文件几行的示例数据。

Dim MyChar
Open "TESTFILE" For Input As #1 ' Open file.
Do While Not EOF(1) ' Loop until end of file.
MyChar = Input(1, #1) ' Get one character.
Debug.Print MyChar ' Print to the Immediate window.
Loop
Close #1 ' Close file.

注意: 机器翻译免责声明:本文是由无人工介入的计算机系统翻译的。Microsoft 提供机器翻译是为了帮助非英语国家/地区用户方便阅读有关 Microsoft 产品、服务和技术的内容。由于机器翻译的原因,本文可能包含词汇、语法或文法方面的错误。

扩展你的技能
了解培训
抢先获得新功能
加入 Office 预览体验计划