- 288 名前：仕様書無しさん mailto:sage [2007/05/18(金) 19:41:19 ]
- >>270
こういうふうに書き換えるのは、上手普通下手で言えばどれですかね？
Dim bFlag As Boolean = False
If (bHoge Or bMoge Or bNuge Or bHage Or ...) Then
bFlag = True
End if
If Not bFlag Then CB.Checked = True
他の人のコード見て勉強する機会があまりないので。
270は、どれか１つのフラグがいらなくなったら１行削ればいいので、
案外上手なのかもしれんと思いました
