Kód: Vybrat vše
Private Sub CommandButton1_Click()
Dim Jana As String
Open "C:\Documents and Settings\Lares\Plocha\uctenka.txt" For Output As #1
Print #1, "test tisku"
Jana = "1radek"
Print #1, "test" + Jana
Close #1
MsgBox ("hotovo")
End Sub
A pan učitel po nás chce aby sme k tomu všemu přidali ještě příkaz který ten soubor kterej se vytvořil aby se automaticky vytiskl , nemohl by mi někdo poradit co s tím vůbec netuším.......díky za odpověd