Contingut

# Print# Expressió

Genera les cadenes o les expressions numèriques indicades per la pantalla o en un fitxer seqüencial.

Useu la instrucció Put# per a escriure dades en un fitxer binari o aleatori. Useu la instrucció Write# per a escriure dades en un fitxer seqüencial de text amb caràcters delimitadors.

### Sintaxi:

    Print [#filenum,] expressió1[{;|,} [Spc(number As Integer);] [Tab(pos As Integer);] [expressió2[...]]

### Paràmetres:

GA filenum Qualsevol expressió numèrica que contingui el número de fitxer establert per l'expressió Open per al fitxer respectiu.

expressió qualsevol expressió numèrica o de cadena a imprimir. Es poden separar múltiples expressions amb un punt i coma. Si se separen amb una coma, les expressions se sagnaran fins al següent tabulador. Els tabuladors no es poden ajustar.

nombre: nombre d'espais que ha d'inserir la funció Spc.

pos: els espais s'insereixen fins a la posició especificada.

Si apareix un punt i coma o una coma després de l'última expressió que cal imprimir, el LibreOffice Basic emmagatzema el text en una memòria intermèdia interna i continua l'execució del programa sense imprimir. Quan es troba una altra expressió Print sense punt i coma o coma al final, s'imprimeix tot el text que calia imprimir immediatament.

Les expressions numèriques positives s'imprimeixen amb un espai al davant. Les expressions numèriques negatives s'imprimeixen amb un signe menys al davant. Si un interval determinat se supera amb valors de coma flotant, l'expressió numèrica respectiva s'imprimeix en notació exponencial.

Si l'expressió que cal imprimir supera una longitud determinada, la visualització s'ajustarà automàticament a la línia següent.

Podeu inserir la funció Tab, delimitada per caràcters de punt i coma entre les instruccions per a sagnar la sortida a una posició específica, o podeu usar la funció Spc per a inserir un nombre d'espais determinat.

### Exemple:

    Sub ExamplePrint
        Print "ABC"
        Print "ABC","123"
        i = FreeFile()
        Open "C:\Users\ThisUser\Temp.txt" For Output As i
        Print #i, "ABC"
        Close #i
    End Sub

    Sub ExamplePrint
        Print "ABC"
        Print "ABC","123"
        i = FreeFile()
        Open "~/temp.txt" For Output As i
        Print #i, "ABC"
        Close #i
    End Sub

Temes relacionats

Close Statement

Put# Statement

Expressió

Expressió Write#