2006-06-12から1日間の記事一覧

ビットの位置が0か1かを調べる

0ならばFalse, 1ならばTrueを返すモジュール。当面、5ビットまではテストしたが、それ以上は未テスト。引数1を variant にする必要があるかも‥‥ Const MYObjName As String = "modIs_Bits" Public Function is_Bits(argCode As Long, argIchi As Long) A…

文字列が全て半角文字であるか否かを判定するモジュール

メールアドレスの整合性を調べるために作成した。 Const MYObjName As String = "modIs_Narrow" Public Function is_Narrow(ByVal argString) As Boolean On Error GoTo Err_is_Narrow Dim mbTitle As String mbTitle = MYObjName & "/is_Narrow" is_Narrow …

WindowsXP SP-1 のサポートは10月に終了

@ITのメルマガにあった記事。 Windows XP SP1のサポートは10月に終了 Microsoftのセキュリティ対策センター(MSRC)は6月9日、旧版Windowsのサポート終了をあらためて通知し、対処を促した。 同センターは公式ブログでWindows 98(SE含む)、Windows Meの…

布団から立ち上がったとたんガタガタと

ボンボン時計が5時を打ったので、布団から立ち上がったとたん、ガラス戸がガタガタ‥‥ん? 地震?家にいて地震を感じたのは久しぶりだ。早速、テレビを点け、速報が出るのを待った。 震源地は大分県中部。地震の規模はM 6.1 6.2,震源の深さ 160 1…