一日中 VB をいぢり倒しー.
えーっとつまりさぁ,こういうコードを書いてみるわけ.
Sub hoge()
Dim a as New classHoge;
Set a = Nothing
If a Is Nothing Then
Debug.Print "a is nothing."
End If
End Sub
a
に Nothing
を代入した後に Is Nothing
で聞いてるんだけど,
これ,最初の Dim
の New
宣言がポイントで,
これの動作はどうも「変数 a
が使用される時に中身が空なら新クラスを代入しとく」
というもので,ここに「最初に」という条件が付かないのが問題点だ.
つまりいつでも空でさえあれば勝手にクラスを代入するから,
Set a = Nothing
で空にしても,If a Is Nothing Then
の判断文で,
新たに a
に New classHoge
が代入されちゃうのだー.
だぁぁぁぁ.何だよこの動作わ!?
こんな動作を望む奴がどこかにいるってのか?
それとも手抜き仕様でこうなってんのか?
みっちが NEXT 屋に行くってんで,横浜に寄ってもらって便乗して同行.
その後,六角家で夕食.今日は妙に塩味が強すぎて,
これだと越谷の「玉家」の方がうまいなぁ.
みっちは地元の玉家の方がうまいってことで,大喜びだ(笑)
ところで今日の帰りにガライヤ市販版が走ってるのを見た.東名で.
斜線入りの仮ナンバだったけど,いやーまさか公道を走ってるとは思わなかったわ...
16日の成果を踏まえて,SPTCP の再設計に入る.
21:30 就寝,8:00 起床.
ってーか随分と寝たなぁ.よほど疲れてたんだなぁ.
寝すぎで頭が痛い.
で,ジムカーナ練習会.
4:00 過ぎに起きて富士スピードウェイへ.
明け方ってなー空いてて気持ちいいねー眠いけど.
実際に動かしてみるとー...
うーん,リタイア車の発生時の処理がだいぶ問題あるな.
これは修正しないと使えん気がする...
ってことで,疲れた.みんなは秦野のレストランで夕食らしいんだけど,
先に帰って寝る.ぐぅ.っていうか帰る前の車の中で寝そうっていうか寝た(ぉ
社をさっさと出て,翌日のジムカーナ練習会のための最終チェックで NEXT 屋へ.
なんか「なると」のメンツもいっぱい来てるし.
SPTCP を動かそうと思ったんだけど,
データ忘れてて動かなかったようぐぅ.
で,家に帰ったのが 23:00.
明日は 4:00 起きなので早く寝るよー,なんて思ってたけど目が冴えて寝れない状態.
遠足の前日,というよりは,受験の前日,といった趣ですな.
まぁ現実の受験前日はゲーセンでダライアスやってたわけですが.
って話をすると必ずみっちに「おれは徹麻やってた」と言われるが(笑)
で,2:00 くらいにようやく寝そうになったところで,
社サーバのトラブルを知らせる i-mode メール.
泣きそうになりながらログインしてみたら,
社の後輩くんが対応中の模様.あーもー (´・ω・`)
SPTCP はそこそこ動くようになったが,
細かいエラーチェックがだだ漏れで激しく不安だ.
こんなんで 4/16 の練習会テストを乗り越えられるのか?
まぁ何とかパッケージに纏め上げる.どきどき.