ゅぅぅっゃゎ
何か変化らしいアクションを起こさなければ自分は変われない。そんなことは分かっているのですが、何もできない。まるで毎週のように繰り返される月曜日みたいですね。そんなこんなで月曜日の制作報告です。
月曜日判定
繰り返される月曜日に精神と体調を崩しながら今日はVBで月曜判定作りました。
こんなんです。
いつものですね。
Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim msg As String Dim style As MsgBoxStyle Dim title As Object = Nothing Dim msgtext As String = "今日も頑張っていこうな" msg = " " style = MsgBoxStyle.DefaultButton2 title = "判定結果" Dim week As DayOfWeek = DateTime.Now.DayOfWeek If (DayOfWeek.Monday = week) Then msg = "月曜だぞ" & Environment.NewLine & msgtext MsgBox(msg, style, title) Else msg = "月曜じゃないぞ" MsgBox(msg, style, title) End If End Sub End Class
これを書いてて思ったのですけど、僕、VBとVB.netの違いがよくわからなかいことがわかってしまった。ぶっちゃけるとVBAやVBScriptとも違いがわからない。DOSコマンド実行できれば、何でもいけるんじゃないかとか思ってしまう。言語を橋渡しして使えるなら何でもいいじゃんと思ってしまう。これはもうだめかもわからんね。まあ、パフォーマンスとか考えたらそんなこと無駄極まりないんですけどね。
そんなわけで今日も僕は何も変われませんでした。それでも月曜日ははじまるのです。つらたん。