今日(昨日)はプログラミングはお休み。

という事で外出したりしてました。

外食をしたり、近所にあるサクラヤへいったり、近所にあるサクラヤへ行ったり・・・

PCの価格を見に行ったんだけど、

やっぱりPCは他界。本当に他界。

貯金30000円の僕はとても手が届かない。

もうちょっと安くなると助かるんだけど(´・ω・`)


それはそうと、今日も色々とネットを漁ってました。

カオスな曲を集めたりして。

アナゴ・谷口・・・ 色々ありすぎ。

youtubeも探してたら年末の番組のアレが・・・

http://www.youtube.com/watch?v=QwQ_39MiXMM



こ れ は 凄 い カ オ ス で す ね




じゃあ今日はもう書けることないのでここらへんで勘弁してください

糞ブログでスマンカッタ

今日は休まずにプログラミング。

繰り返し構造を勉強してました。

Do・・・Loopステートメントが中心。

最後に練習したのは3回パスを間違えると入力できなくなるというもの

こんな漢字


Public Sub ex14()


'変数の宣言
Dim password As String
Dim n As Integer


'変数の初期化
n = 0


Do


'回数のチェック
n = n + 1


If n > 3 Then
MsgBox "これ以上は処理を続けられません"
Exit Do
End If

'パスワードの入力
password = InputBox("パスワードを入力")
Loop Until password = "apple"

End Sub

appleがパスワード なぜappleがここででてくるのかは不明

聞かないでください


↓他に本日練習したもの


入力された数字列の桁数を表示

http://www.geocities.jp/client399/ex11.txt

入力しなくなるまで数字列を足していく

http://www.geocities.jp/client399/ex12.txt

パスワードを入力するまで入力画面表示(前判断)

http://www.geocities.jp/client399/ex13pre.txt

パスワードを入力するまで入力画面表示(後判断)

http://www.geocities.jp/client399/ex13post.txt



アドバイスなどがあればコメントまでおねがいします

今日はプログラミングはお休み。

ここで自己紹介でもしようと思う(^ω^)

いいからガキは寝ろとかなしね


HN Client

趣味 PCいじったりとか

好きな物など  はいもういえませんごめんなさい

嫌いなものなど  いえませんゆるしてくださいおねがいします


このブログについて色々

単なる趣味のブログだと思ってもらって結構です 実際そうですから

面白かった動画や管理人の勝手な趣味関係の事を書いたり書かなかったり

おすすめツールも書いたり たまにアングラな世界に入っていくかも

とにかく一日一度は書きます 多分 手抜きでも我慢してください

まあその場のふいんき←(なぜか変換できない)で

アクセス数いまいちの予感は的中しそう