トイウコトデ、めげないでブログ続けることにしました。

2015.02.15

Logging

Private Sub UserForm_Initialize()
    Dim WSH, OExec As Object
    Dim s_Cmd As String
    Dim hoge As String
    Set WSH = CreateObject("WScript.Shell")
    s_Cmd = "ipconfig"
    Set OExec = WSH.Exec("%ComSpec% /c " & s_Cmd)
    hoge = OExec.StdOut.ReadAll
    ipecho.Caption = hoge
    Set OExec = Nothing
    Set WSH = Nothing
End Sub

タグ

%ComSpec%, As String, C++, CreateObject, Dim hoge As String, Dim s_Cmd, Dim WSH, hoge, ipconfig, ipecho.Caption, Nothing, Nothing End Sub, OExec As Object, OExec.StdOut.ReadAll, Private Sub UserForm_Initialize, s_Cmd, Set OExec, Set WSH, WScript.Shell, WSH.Exec,

映画、Nothing［ナッシング］を観てオチあり( ﾟдﾟ )

2014.09.01

Logging

映画、Nothing［ナッシング］を観てつれづれと感想を書いてみますね。ちなみにこのNothingという映画を観たのは、もう数年も前の話なのですが今でも記憶に残っているぐらい奇妙な内容の映画でした。オチを言うと最終的には何もない状態になるのですが、それまでの過程が滑稽で面白かったです。始まりは白い空間に2人の男とソファーなどの家具用品｛一軒家かも｝などがある状態からストーリーが始まります、徐々に白い空間から物が消えていき、最終的には自分たちの体も消え、白い空間だけが残るというお話です。観た後もヘンな余韻がのこる映画になっています。この映画は映画「CUBE」に似ている要素があるものの、CUBEよりも後味は良いです。
※物語にスピード感はないです。
まとめ
Nothingという映画は、普通の映画のオチ｛ストーリー｝に飽きた人向け。｛普通のオチに飽きた人向けな作品を貼っときます↓｛スピード感はなし｝。｝

タグ

CUBE, Nothing, オチ, クライ, ストーリー, スピード感, ソファー, ナッシング, ヘン, まとめNothing, 一軒家かも, 余韻, 家具用品, 後味, 感想, 映画, 白い空間, 要素, 記憶, 過程,