HOME 教育用公開ウェブサービス ROBINS

プログラミング言語

Java:HelloWorld

テキストファイルを変換しよう〜表計算とBASIC〜

鷹山テキストファイルを変換しよう〜表計算とBASIC〜

ファイルとクラウド


Private Sub GenerateIndex()

Set fs = CreateObject("Scripting.FilesystemObject")
Set a = fs.CreateTextFile("Everyone.html")

a.WriteLine ("<html><body>")
For i = 2 To 76

a.WriteLine ("<a href='" & Cells(i, 5) & "'>" & Cells(i, 3) & "</a><br />")

Next
a.WriteLine ("</body></html>")

a.Close
Set a = Nothing
Set fs = Nothing

End Sub


QRコード
https://edu.yz.yamagata-u.ac.jp/Public/52227/languages/languages.asp