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.
扩展你的 Office 技能
了解培训
抢先获得新功能
加入 Office 预览体验计划