C# と VB.NET の質問掲示板

ASP.NET、C++/CLI、Java 何でもどうぞ

ログ内検索

キーワードを複数指定する場合は半角スペースで区切ってください。
検索条件は、(AND)=[A かつ B] (OR)=[A または B] となっています。
[返信]をクリックすると返信ページへ移動します。

キーワード	/	検索条件	/
検索範囲	/	強調表示	/ ON (自動リンクOFF)
結果表示件数	/	記事No検索	/ ON
大文字と小文字を区別する

全過去ログを検索

ヒット / 6件

<< 0 >>

■22182

　Re[6]: カレンダーツール

□投稿者/ επιστημη ＠ -(2008/07/16(Wed) 14:29:56)

2008/07/16(Wed) 14:48:40 編集(投稿者)

> 先月来月ボタンを押しても、１日の場所が７月(２００８年７月)の火曜から変化しません。

>             /*ラベルに日付の割り当て*/
>             /*一日までの空白の挿入*/
>             for (int i = 0; i < firstDayOfWeek; i++)
>             {
>                 (label_ptr[i]).Text = "";
>                  dayOfWeek++;
>             }

おそらく、firstDayOfWeekは0～6の値を取り、
最大 label_ptr[5]までを""で埋めますよね。
にもかかわらず
 
>             for (int i = 1; i <= MaxDay; i++)
>             {
>                 (label_ptr[i]).Text = i.ToString();
>                 ...

してんだから label_ptr[1]以降を書き換えてます。
さっき""で埋めたとこを書き潰しますね。

第1日を表示すべきラベルは label_ptr[1] では"ない"はずです。

記事No.22155 のレス /過去ログ42より / 関連記事表示
削除チェック/

■32919

　Java 2 CSharp Translator

□投稿者/ 散々 -(2009/02/17(Tue) 18:12:46)

分類:[Java]　

以下のプラグインの使い方がわかりません。
どうすればよいのでしょうか？

Java 2 CSharp Translator
http://sourceforge.net/projects/j2cstranslator/

Eclipse Ganymede Pleiades All in One 3.4.1.20081118を使っています。
上記URLより
com.ilog.rules.Java2CSharpTranslator_1.1.0.13012009_1
をダウンロードして、
eclipse\pluginsに追加するところまではしました。

どなたかご教授お願いします。

親記事 /過去ログ58より / 関連記事表示
削除チェック/

■86196

　Re[7]: bool変数の比較演算について

□投稿者/ ヒークン -(2017/12/24(Sun) 12:20:07)

2017/12/24(Sun) 12:23:05 編集(投稿者)

皆さん、回答ありがとうございました。

私はソフト開発会社に勤めているわけではないので、
一般的な開発ルール等は全く存じ上げないため、
おかしな質問があればそれはご容赦頂きたいのですが、
色々とお話しを伺う中で、一つ思ったのは、
場合によっては、否定分岐で「If a = False Then」とした方が安全な
環境があるのではないか、ということです。
この「環境」とは、OSや言語というよりは、開発者サイドの仕様だったり、
開発ルールの環境を指します

そう思った理由の一つとして、
WebSurferさんの■86171の例示

> if (expression) statement

の式では、expression == 0の場合は偽、それ以外は真と評価されます。
C言語のことは良く分かりませんが、VBでNot演算を行うと、
「Not expression」はexpressionのビット反転ですので、
expressionが0以外の場合の「Not expression」は、
すべてのビットに1が立っている場合でないと0にはなりません。

このことに気づいたのが、とっちゃんさんの■86177にあった

> #define VARIANT_TRUE ((VARIANT_BOOL)-1)

です。
「1」ではなく、あえて負号付きの「-1」ということは、
これが1ビットではなく、複数ビットであることが分かります。
VBAのVARIANT変数のサイズは勉強不足で分かりませんが、
仮に1バイトだとすると、-1はすべてのビットに1が立っている
&FF（0xFF）ということでしょうか。

そうなると、通常はあり得ないことかも知れませんが、物理的な可能性として
「0または-1を返すメソッドから、バグや何かの間違いで、
それ以外の値が戻ってくる場合がある」ことは0％とは言えないかも知れません。
（限りなく0％でしょうが。）

そこで、「If a = False Then」という式評価を推奨する環境がある、
ということであれば、一定の理解はできます。

しかしながら、「If a = True Then」はどうも受け付けません。
「頭痛が痛い」と言っているのと同じような気がします。（分かり難いたとえでスミマセン）

> if (a==true) に違和感があるという印象はとても素敵だと思う。その感覚を大事にして欲しい。

権威のある方にお褒め頂くことは、非常にうれしい限りです。
しかしながら、if (a==true)（VBのIf a = True Then）は
先程申し上げた通り、違和感「しかない」です。

記事No.86166 のレス /過去ログ147より / 関連記事表示
削除チェック/

■86197

　Re[8]: bool変数の比較演算について

□投稿者/ はるまきとかげ -(2017/12/24(Sun) 15:45:18)

■No86196 (ヒークン さん) に返信

> そこで、「If a = False Then」という式評価を推奨する環境がある、
> ということであれば、一定の理解はできます。
> 
> しかしながら、「If a = True Then」はどうも受け付けません。
> 「頭痛が痛い」と言っているのと同じような気がします。（分かり難いたとえでスミマセン）

暗黙の型変換を使用していて
-1, 0の排中律が保証されないならば

If a = False Then

を認めるのと同じ理由で

If a = True Then

を認めるべきだと思いますよ

たとえば-1でも0でもない1はTrueともFalseとも解釈されますからね
https://paiza.io/projects/gU3upzb2fQCXe6xa7x_USA


If a = True Then
If a = False Then

それはそれとして私はこの書き方は変数の位置が
揃っていてTrue、Falseという値が対称になるので
きれいに思いますし好きですけどね

好みの問題かなと

記事No.86166 のレス /過去ログ147より / 関連記事表示
削除チェック/

■86202

　Re[10]: bool変数の比較演算について

□投稿者/ ヒークン -(2017/12/25(Mon) 10:55:29)

皆さん、コメントありがとうございます。
私の話は、

If (expression) Then で

expression = 0 は偽と評価され、
それ以外の値の場合に真と評価されることを前提としています。

この前提では、仮にaが1という値を持つ場合、
当然、If a ThenとIf a = True Thenは異なる評価となります。
そのような状況では、そもそもIf a = True Thenは危険だと思うのですが、
どうでしょうか？

そうは言っても、今では通常、bool型の変数はTrueとFalseの値しか持たず、
bool変数をTrueやFalseで比較しても、コンパイル時に最適化してくれるため、
コードの可読性のため、(bool変数 = True)のような書き方をルール化している所もある、
というところまでは理解できました。

ただ、私は、If a = True Thenのような表記はまどろっこしく感じるため、
何か他に理由があるのではないか、という思いがあるのです。
その仮定の一つが■86196で述べていることです。

しかし、皆さんのお話を聞いているうちに、
もしかしたら、私のような考え方は少数派なのかな、とも思いました。

記事No.86166 のレス /過去ログ147より / 関連記事表示
削除チェック/

■86206

　Re[8]: bool変数の比較演算について

□投稿者/ 魔界の仮面弁士 -(2017/12/25(Mon) 13:46:10)

2017/12/25(Mon) 14:36:56 編集(投稿者)

■No86196 (ヒークンさん) に返信
> 「0または-1を返すメソッドから、バグや何かの間違いで、
> それ以外の値が戻ってくる場合がある」ことは0％とは言えないかも知れません。

ヘッダーファイル WinDef.h においては
　#define FALSE　　0
　#define TRUE 　　1
と定義されていますが、『BOOL を返す大部分の関数はゼロ以外の値を返してブール値の真を示す』ため
TRUE との等価演算を記述するべきではないと、下記に記載されていますね。
https://msdn.microsoft.com/ja-jp/library/windows/desktop/ff381404.aspx

>> // 正しい記述
>> BOOL result = SomeFunctionThatReturnsBoolean();
>> if (result)
>>
>> // 誤った記述
>> if (result == TRUE)
>>

ブール型にまつわる歴史の話をさせてもらうと、
C++ には bool 型がありますが、C にはありません。
そして Visual Basic 2.0 にも、Boolean 型は存在していませんでした。

そして VB2 当時の論理値は、整数として比較されるという言語仕様です。

VB2 時代の組み込みデータ型は、以下の 7 種類だけです。
　Integer
　Long
　Single
　Double
　Currency
　String
　Variant
これに加えて、ユーザー定義型が使えました。
Boolean の他、Byte や Date や Object さえも存在していません。

一方、Variant 型の内部値としては、VarType 関数で見ると 9 種類ありました。
そしてその中にさえ、論理型を表すデータタイプは存在していません。

　0 / V_EMPTY … Empty 値 (ただしまだ Empty キーワードは無い)
　1 / V_NULL … Null 値
　2 / V_INTEGER … True / False もここで扱う
　3 / V_LONG
　4 / V_SINGLE
　5 / V_DOUBLE
　6 / V_CURRENCY
　7 / V_DATE … 日付リテラルや CVDate 関数で生成(CDate 関数はまだ無い)
　8 / V_STRING

ちなみに上記の V_INTEGER や V_EMPTY というのは、今で言う vbInteger や vbEmpty のことです。
当時は組み込みの定数が殆ど用意されておらず、マジックナンバーを直接記述するか、
Constant.txt ファイルにある「Global Const V_INTEGER = 2」などを
自分で取り込む必要がありました。

本題に戻って Boolean についてですが、VB2 当時のドキュメント上においても、
Boolean 型に関する解説は一応存在しています。ただし当時のヘルプファイルでは、
それが Integer 型の項にマッピングされており、True / False については
Integer 型 (-32768～32767 の範囲) で表すものとされています。True と False の
予約語が Integer の -1 および 0 に等しい定数であることも明記されていますね。

こうした経緯から、VB における Boolean 型(VARIANT_BOOL) は、
内部値が 0 または -1 な 2 バイトの値となっています。
　False = &H0000
　True = &HFFFF

.NET ではこのマーシャリングが、MarshalAs(VariantBool) な属性として受け継がれています。
とはいえ、.NET の Boolean 構造体の内部値は、整数「1」で管理されているのですが。

ちなみに C++ の bool (byte 型)は MarshalAs(U1) な属性を使用し、
API で用いる Win32 BOOL は MarshalAs(Bool) な属性でマーシャリングされます。
既定のマーシャリング動作は MarshalAs(Bool) です。

> VBAのVARIANT変数のサイズは勉強不足で分かりませんが、

Variant のサイズですが、VB2 当時のマニュアルには記載を見つけられませんでした。

ただし、Put # ステートメントの Variant の項にその内部表現の片鱗を見ることができました。
この部分のマニュアル上の表記は、16bit だった当時も 64bit VBA でも変更されていません。
https://msdn.microsoft.com/ja-jp/vba/language-reference-vba/articles/put-statement

※ Variant の内部表現については、 No86196 (masa さん) で始まる
　「2次元配列のメモリ配置」のスレッドでも触れられています。

> 場合によっては、否定分岐で「If a = False Then」とした方が安全な
> 環境があるのではないか、ということです。

専用の型としての Boolean が無いというだけであり、一応、VB2 当時においても、
　If a Then
　If Not a Then
といった記述は可能でした。

というか、
　Dim v As Variant
　v = #01/02/03#
　If Not v Then
さえ可能だったのですけれどね。

しかし、Variant や非数値型以外の指定、具体的には
　strValue = "0"
　If strValue Then
などは実行時エラーではなく文法エラーになる仕様でした。
VB6 では OK です。

しかし当時、
　If a Then
の表記が使われたコードはあまり目にした記憶がありません。

インターネットの使えない当時、私が見ることの出来た他者コードなど、
そこまで多くは無いのですが、それでもあの当時、
　If a = True Then
のような表記ばかりを目にしていたのは、比較対象となるデータ型が
Boolean ではなく、Integer な変数だったというのは、理由の一つでしょう。
(Visible プロパティでさえ Integer 型でした)

とはいえ、当時の VB は、データ型に違いをさほど重要視していなかったので、
これについてはデータ型というより、英文法としての読みやすさとして、
「もし a ならば」よりも「もし a が True ならば」の意図を
優先した結果ではなかろうかと想像しています。
a が Boolean 型だったなら、"a ならば" という表記でもサマになるのですけれどね。

このとき、変数に非 -1 がセットされていた場合に備えて、
　If intValue <> False Then
とするのがより安全だったのかもしれませんが、当時の私は
そのような書き方のサンプルをほとんど見た記憶がありません。
使われていたとしても、 API の呼び出し時ぐらいのもので。

これについては、記号表記の多い C 言語系とは異なり、
BASIC の風潮が英文法表現を是とするものであったため、
「真である」ことを「偽ではない」という表現で書き換えることに
回りくどさを感じていたからではないかな…と思っています。

「While 継続条件」ステートメントの逆となるような
「Until 終了条件」ステートメントをわざわざ用意するぐらいなので、
英文法として読みやすさが、少なからず求められていたのかな、と。

今でも「Not a Is Nothing」→「a IsNot Nothing」(VB2005以降) や
「Not TypeOf a Is Nothing」→「TypeOf a IsNot Nothing」(VB2015以降) のような
表現が追加されたのも、英文法的な読みやすさの向上を目的として
比較演算子が使われていたというのは、理由の一つになりえる気がします。

> しかしながら、「If a = True Then」はどうも受け付けません。

Microsoft のサンプルでも両方の表記がありますし、私としては
どちらでも良いかなと思っています(多数派に合わせる)。

どちらか一方を選べと言われたら、今なら付けない方に合わせるかな…。
ちなみにうちの社内ルールでは等価演算子を付与しないことが推奨されています。

今回の話とは若干外れますが、２値比較ではなく３値比較だった場合は、
下記で 300 が渡されるケースがありえますね。

If boolValue = True Then
　intValue = 100
ElseIf boolValue = False Then
　intValue = 200
Else
　'VB.NET (2005 以降) において、「boolValue が Nullable(Of Boolean) 型の Nothing 値」だった場合や
　'VBA / VB2～VB6 において、「boolValue が Variant 型の Null 値」だった場合にはここを通る
　intValue = 300
End If

var b = default(bool?); の場合、C# の if (b == b) は真ですが、
Dim b As Boolean? = Nothing の場合、VB の If b = b Then は偽になる…。

記事No.86166 のレス /過去ログ147より / 関連記事表示
削除チェック/

<< 0 >>

パスワード/

- Child Tree -