Imprimir, funções PrintLine
Escreve, em um arquivo sequencial, dado formatado para exibição .
Public Sub Print( _
ByVal FileNumber As Integer, _
ByVal ParamArray Output() As Object _
)
' -or-
Public Sub PrintLine( _
ByVal FileNumber As Integer, _
ByVal ParamArray Output() As Object _
)
Parâmetros
FileNumber
Obrigatório.Qualquer número de arquivo válido.Output
Opcional.Zero ou mais expressões delimitadas por vírgula para escrever em um arquivo.As configurações do argumento Output são:
Configuração |
Descrição |
|---|---|
SPC(n) |
Usado para inserir caracteres de espação na saida, onde n é o número de caracteres de espaço a serem inseridos. |
TAB(n) |
Usado para posicionar o ponto de inserção em um número absoluto de coluna, onde n é o número da coluna.Use TAB sem argumento para posicionar o ponto de inserção no início da próxima zona de impressão. |
expression |
Expressões numéricas ou expressões de cadeia de caracteres a serem impressas. |
Exceções
Tipo de exceção |
Número de erro |
Condição |
|---|---|---|
Modo de arquivo é inválido. |
||
FileNumber não existe. |
Ver a coluna " número de erro " se você estiver atualizando aplicativos Visual Basic 6.0 que usam manipulação de erros não estruturada.(Você pode comparar o número do erro com a Propriedade do Número (Erro de objeto).) Entretanto, quando for possivel, você pode considerar substituir tal controle de erro por Visão Geral sobre a Manipulação Estruturada de Exceções para o Visual Basic.
Comentários
As funções Print e PrintLine são fornecidas para compatibilidade com versões anteriores e podem impactar a performance.Para aplicações novas, o objeto My.Computer.FileSystem fornece melhor performance.Para obter mais informações, consulte Access de Arquivo com o Visual Basic.
Print não inclui uma alimentação de linha no final de uma linha; PrintLine, entretanto, inclue uma alimentação de linha.
Dados escritos com Print são normalmente lidos a partir de um arquivo com LineInput ou Input.
Se você omitir Output para PrintLine, uma linha em branco será impressa no arquivo; para Print nada irá para a saída.Múltiplas expressões separadas com uma vírgula serão alinhadas nos limites de tabulação, mas a mistura de vírgulas e TAB pode causar resultados inconsistentes.
Para dados Boolean, True ou False será impresso.As palavras-chave True e False não são traduzidas, independentemente da localidade.
Dado de data é escrito no arquivo usando-se o formato curto de data padrão reconhecido pelo seu sistema.Quando a data ou o componente de tempo estiver faltando ou for zero, apenas a parte fornecida será escrita no arquivo.
Nada será escrito no arquivo se o dado Output estiver vazio.Entretanto, se a lista de dados Output for DBNull, Null será escrito no arquivo.
Para o dado Error, a saída aparecerá como Error errorcode.A palavra-chave Error não é traduzida, independentemente da localidade.
Todo dado escrito no arquivo usando Print é de conhecimento internacional; isto é, o dado é formatado de maneira apropriada usando o separador decimal adequado.Se o usuário deseja gerar dados de saída para uso em múltiplas localidades, então Write deve ser usado.
Escrever em um arquivo com as funções Print ou PrintLine requer acesso Write da enumeração FileIOPermissionAccess.Para obter mais informações, consulte Enumeração FileIOPermissionAccess.
Exemplo
Esse exemplo usa as funções Print e PrintLine para escrever dados em um arquivo.
FileOpen(1, "c:\trash.txt", OpenMode.Output) ' Open file for output.
Print(1, "This is a test.") ' Print text to file.
PrintLine(1) ' Print blank line to file.
PrintLine(1, "Zone 1", TAB(), "Zone 2") ' Print in two print zones.
PrintLine(1, "Hello", "World") ' Separate strings with a tab.
PrintLine(1, SPC(5), "5 leading spaces ") ' Print five leading spaces.
PrintLine(1, TAB(10), "Hello") ' Print word at column 10.
' Assign Boolean, Date, and Error values.
Dim aBool As Boolean
Dim aDate As DateTime
aBool = False
aDate = DateTime.Parse("February 12, 1969")
' Dates and booleans are translated using locale settings of your system.
PrintLine(1, aBool, " is a Boolean value")
PrintLine(1, aDate, " is a date")
FileClose(1) ' Close file.
Anotações Developer Dispositivo Inteligente
Não há suporte para esta função.
Requisitos
Namespace: Microsoft.VisualBasic
**Módulo:**FileSystem
Assembly: Visual Basic Runtime Library (em Microsoft.VisualBasic.dll)
Consulte também
Tarefas
Como: Gravar texto em arquivos no Visual Basic
Como: Gravar texto em arquivos com um StreamWriter no Visual Basic