Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Kliknite na kartu " Vývojár " , a vyberte " Vložiť " . Vyberte funkciu pod " Ovládacie prvky formulára " alebo " Ovládacie prvky ActiveX . " To zmení váš kurzor na muške . Kliknite na bunku , kam chcete formulár alebo tlačidla ActiveX zobrazí . " . Zobraziť kód " Kliknite pravým tlačidlom myši na tlačidlo a vyberte
2
Skopírujte a vložte nižšie uvedený kód :
Funkcia SkipLineInFile
Const ForReading = 1 , ForWriting = 2
Dim FSO , f
Set FSO = CreateObject ( " Scripting.FileSystemObject " )
Set f = fso.OpenTextFile ( " c : \\ testfile.txt " , ForWriting , pravda )
f.Write " Hello world ! " & VbCrLf & " VBScript je zábava ! "
Set f = fso.OpenTextFile ( " c : \\ testfile.txt " , ForReading )
f.SkipLine
SkipLineInFile = f.readline
End Function
3
Kliknite na " Súbor " , " Uložiť book1 " a zadajte názov súboru . Kliknite na šípku rozbaľovacieho zoznamu napravo od " Uložiť ako typ " vyberte " Excel Macro - Enabled zošit " a kliknite na " Uložiť " .
Copyright © počítačové znalosti Všetky práva vyhradené