Function msgtest() MsgBox "メッセージボックスのテストです。" & vbLf & "表示できてますか?", vbOKOnly, "テスト" End Function Function writest() document.write "