[表示 : 全て 最新50 1-99 101- 201- 301- 401- 501- 601- 701- 801- 2chのread.cgiへ]
Update time : 04/09 11:51 / Filesize : 214 KB / Number-of Response : 894
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

VB.NET質問スレ(Part31)



1 名前:デフォルトの名無しさん mailto:sage [2009/08/22(土) 17:44:56 ]
前スレ

VB.NET質問スレ(Part30)
pc12.2ch.net/test/read.cgi/tech/1242522019/l50

テンプレは>>2

75 名前:デフォルトの名無しさん mailto:sage [2009/08/25(火) 23:21:01 ]
>>74
なんで?

76 名前:デフォルトの名無しさん mailto:sage [2009/08/25(火) 23:26:38 ]
ボックス化って何なのさ。
厨なオレに分かるように説明してください。

77 名前:デフォルトの名無しさん mailto:sage [2009/08/25(火) 23:27:48 ]
タカ&トシの新しいネタです

78 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 00:05:11 ]
>>76
LabelからTextBoxに値を入れること。
Label同士、TextBox同士の値の代入は速いが相互にやると遅い。
ComboBoxとTextBoxの間では速度低下はない。

79 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 00:13:04 ]
Sub aaa(ByVal hoge as hogeClass)
とByValで渡しているのにhogeの中身が書き換えられるのは何故なんでしょう?
Sub aaa()の中でhogeが書き換えられなくするにはどうしたらいいの?

80 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 00:19:55 ]
> とByValで渡しているのにhogeの中身が書き換えられるのは何故なんでしょう?
hogeClassが参照型だから

> Sub aaa()の中でhogeが書き換えられなくするにはどうしたらいいの?
ディープコピー作るとか構造体にするとかあるけど
まあ普通気にしないでいいよ

81 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 00:33:14 ]
>>79
変数hogeの中に入っている「値」とは、hogeClassのインスタンスの
メモリ上の位置を表す「値」だから、とでも考えるよろし。

書き換えられたくないのなら、インスタンスのクローンを作ってそれを渡す、とか
ReadOnlyプロパティだけを並べたインターフェイスをhogeClassに実装させて
aaaはそのインターフェイスを引数に取るようにする、などの工夫が必要。

参照型と値型の違いとそれぞれの意味は、最初にちゃんと理解しとかないとマズいね。

82 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 00:48:07 ]
>>81
>ReadOnlyプロパティだけを並べたインターフェイスをhogeClassに実装させて

元のメンバーをPrivateにして新しくPublic ReadOnlyのを作るわけですか?

83 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 00:50:40 ]
横レスだけど何で.NETにはC++のconstな値渡しみたいなのは無いのだろうか。



84 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 03:20:32 ]
constな値渡しって何?

85 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 07:05:39 ]
>>84
ttp://www.s-cradle.com/developer/sophiaframework/tutorial/Cpp/const.html


86 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 07:54:52 ]
dクス
半分くらいわかった。

87 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 07:59:42 ]
DataGridViewで行を下げて行くにはどうすればいいでしょうか?
ループを使いたいと思っています

for i = 0 to 10
DataGridView1.Rows(i).Cells(1).Value = 0
next
↑ではエラーが出てお手上げ状態です
お願いします

88 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 10:51:02 ]
行を下げるっていうのは、下の行を表示させるということ?

89 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 14:37:21 ]
どういうエラーが出てどうお手上げなんだよ
やりたい事をもっと正確に書けよ

90 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 14:41:41 ]
全然意味わかんねーけど、多分行が11行もないんじゃないの

91 名前:87 mailto:sage [2009/08/26(水) 20:23:07 ]
すいません詳しく書くと
別のDataGridView(DataGridView2とします)の行数をRowCountでiに行数を入れており
DataGridView2と同じ行数で内容は入っていないDataGridView1が出来ています
iが3だとするとDataGridView1のRows(0)からRows(2)までに0を入れたいと考えています

そこでループで行けるかと思い>>87のコードでやってみたところRowsの()の中は変数は使えないみたいでした
再度よろしくお願いします・・・

92 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 20:28:09 ]
どうしてエラーの内容を隠匿しようとするんだろうね?

93 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 20:29:55 ]
使えるから。



94 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 20:34:11 ]
詳しいエラー内容

イミディエイト ウィンドウ
'System.ArgumentOutOfRangeException' の初回例外が mscorlib.dll で発生しました。

例外ヘルパ
インデックスが範囲を超えています。負でない値で、コレクションのサイズよりも小さくなければなりません。 パラメータ名: index
ArgumentOutOfRangeException

i = DataGridView2.RowCount
が問題でしょうか?

95 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 20:42:58 ]
そんなコード書いてないじゃん。

>>90 の言うとおりだな。

96 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 20:44:07 ]
こいつには教えなきゃならんことが多すぎて教える気もなくなるわ

97 名前:87 mailto:sage [2009/08/26(水) 20:45:06 ]
すいませんでした。失礼します

98 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 22:56:44 ]
String型は値型なのでしょうか参照型なのでしょうか?

99 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 22:59:36 ]
ttp://msdn.microsoft.com/ja-jp/library/system.string.aspx
VB だと Class か Structure かで分かる

100 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 23:06:41 ]
>>99
参照型ですね。
でも他の参照型と違う動きをしますよね。(謎

101 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 23:07:03 ]
>>87
とりあえず動いた。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

  '列の設定
  Me.DataGridView1.ColumnCount = 1
  Me.DataGridView2.ColumnCount = 1

  'グリッド1に3行追加
  Me.DataGridView1.Rows.Add("hoge1")
  Me.DataGridView1.Rows.Add("hoge2")
  Me.DataGridView1.Rows.Add("hoge3")

  'グリッド2にグリッド1の行数を追加
  Dim Count As Integer = Me.DataGridView1.Rows.Count
  Me.DataGridView2.Rows.Add(Count)

  'グリッド2に値を代入
  For i As Integer = 0 To Count - 1
   Me.DataGridView2.Rows(i).Cells(0).Value = "hoge" & (i + 1).ToString
  Next

End Sub

102 名前:デフォルトの名無しさん mailto:sage [2009/08/26(水) 23:45:19 ]
>>100
不変クラスとかimutable classで調べてみると分かる。

103 名前:デフォルトの名無しさん mailto:sage [2009/08/27(木) 00:07:15 ]
>>102
ぐぐったらJavaのばかり出てきました。
上のほうで出てきてるシャローコピーとかディープコピーとかもJavaですね。



104 名前:デフォルトの名無しさん mailto:sage [2009/08/27(木) 00:11:22 ]
どれも概念の話であって言語は関係ないな

105 名前:デフォルトの名無しさん mailto:sage [2009/08/27(木) 00:19:38 ]
そういう概念ってVBだけやってると永久に辿り着けそうに無いな。。

106 名前:デフォルトの名無しさん mailto:sage [2009/08/27(木) 00:23:18 ]
VB的にはStringは基本型のひとつという位置づけ。
でも不変参照型というのが分かってないと
なんでStringBuilderが必要なのか理解できない。

107 名前:デフォルトの名無しさん mailto:sage [2009/08/27(木) 00:40:22 ]
>>106
それは参照型のString型を値型と同等に扱える仕組みと言うことで理解してOK?

108 名前:デフォルトの名無しさん mailto:sage [2009/08/27(木) 00:43:20 ]
よくない

109 名前:デフォルトの名無しさん mailto:sage [2009/08/27(木) 00:45:30 ]
>>108
Orz

110 名前:デフォルトの名無しさん mailto:sage [2009/08/27(木) 00:50:42 ]
VB.Netで不変参照型なのはString型だけなの?

111 名前:デフォルトの名無しさん mailto:sage [2009/08/27(木) 00:58:55 ]
そういう風に設計すればいくらでも
標準ライブラリでぱっと思いつくのはSystem.Drawing.Font

112 名前:デフォルトの名無しさん mailto:sage [2009/08/27(木) 07:37:08 ]
>>111
有難うございます。
System.Drawing.Font 見たけど不変参照型みたいな事は書いてないですね。
不変参照型って自分でも作れるんですかね。。

教えてくんになってしまっているので自分で勉強して出直してきます orz

113 名前:デフォルトの名無しさん mailto:sage [2009/08/27(木) 10:34:53 ]
クラスと構造体を別々に作るのと、クラスの中に構造体を作るのとでは、
どういう違いがあるのでしょうか
ストラクチャ名だけでインスタンスを作るとグローバルな感じで、
入れ子にすると[クラス名].[ストラクチャ名]でインスタンスを作れるから、
どの目的のための構造体なのかがわかりやすい、というだけ?

あと、構造体のインスタンスは
  Dim Hote As [ストラクチャ名]
これで暗黙的にNewされてインスタンスが作られている、
という理解で間違いないですか?



114 名前:113 mailto:sage [2009/08/27(木) 10:36:49 ]
あ、それと下の質問がその通りであれば、
  Dim Hoge As [ストラクチャ名]
  Dim Hoge As [ストラクチャ名] = New [ストラクチャ名]
この2つは同義で、どっちを使ってもおkということですか?

115 名前:デフォルトの名無しさん mailto:sage [2009/08/27(木) 11:01:04 ]
ストラクチャ名……なんだろうこの違和感

ネストされた型の大きなメリットはアクセス制御をPrivateやProtectedにできること
内部の型から外部の型のPrivateメンバにアクセスできること

> 入れ子にすると[クラス名].[ストラクチャ名]でインスタンスを作れるから、
> どの目的のための構造体なのかがわかりやすい
名前空間と型名だけで表現できてなかったらすでに命名がまずい

> この2つは同義で、どっちを使ってもおkということですか?
IL レベルで違いはあるがまあ同じと考えて良い

116 名前:113 mailto:sage [2009/08/27(木) 12:44:11 ]
>>115
ありがとうございます、よくわかりました
違和感のところはすみませんでした

117 名前:デフォルトの名無しさん mailto:sage [2009/08/27(木) 18:19:23 ]
>>101までの流れを読んでて思ったけど、
真面目に回答してた奴は、
質問者が拗ねてしまって、
危険な流れとばかりにスルー。
煽った奴は、相手がスレからつまはじき者にされて
自分の煽りの影響力にご満悦。

>>101のようにスレのルールに忠実な結果報告だけが
残る。2chって無責任な場所ですよね。
10年前から知ってましたが。


118 名前:デフォルトの名無しさん mailto:sage [2009/08/27(木) 18:36:43 ]
今更痔ろう

119 名前:デフォルトの名無しさん mailto:sage [2009/08/27(木) 20:11:54 ]
10年前にこっ酷い目に会って、今漸く帰って来たのですね。わかります。
でないと、こんな青臭いレスなんてできないよな。

120 名前:デフォルトの名無しさん mailto:sage [2009/08/27(木) 20:57:56 ]
わかります(笑)
こういうのに限って「スイーツ(笑)」とかやってたりするんだよねw

121 名前:デフォルトの名無しさん mailto:sage [2009/08/28(金) 02:38:25 ]
だよねw

122 名前:デフォルトの名無しさん mailto:sage [2009/08/28(金) 03:48:15 ]
>>119
「青臭い」って・・・実際、他人に使ってみたことある?
きっと、言われた方は、喜ぶと思うよ。


123 名前:デフォルトの名無しさん mailto:sage [2009/08/28(金) 07:57:52 ]
イカ臭い



124 名前:デフォルトの名無しさん mailto:sage [2009/08/28(金) 08:02:29 ]
きっと、言われた方は、喜ぶと思うよ。

125 名前:デフォルトの名無しさん mailto:sage [2009/08/28(金) 10:51:05 ]
WindowsVista64Bit VS2008で開発してます。
ある画像を表示する為に、APIのStretchDIBitsを使用しています。
ピクチャーボックスのPaintイベントで画像を描画する為、
引数のe.GraphicsからHDCを取得して使っています。
このHDCですが、なぜかLabelなどに一度値を出力しないと、画像が描画されないんですが、
似たような経験された方はいらっしゃらないでしょうか?

126 名前:デフォルトの名無しさん mailto:sage [2009/08/28(金) 19:26:52 ]
>>125
画像のパスを設定するとか
外部の設定によって描画内容(描画ロジック)に変更ある?
変更あるなら変更のタイミングで描画命令を発行
変更ないならロジック晒すべし


127 名前:デフォルトの名無しさん mailto:sage [2009/08/28(金) 19:27:02 ]
>>125
初め表示される時には、画像が無かったってオチかなあ。
XPと違ってVista以降はあまり再描画が発生しないし。
偶々そのLabelの変更がきっかけになっている、とか。

ウィンドウ表示後に画像が用意されるのなら、
ピクチャーボックスを明示的にInvalidateなりしないと。

128 名前:デフォルトの名無しさん mailto:sage [2009/08/29(土) 05:45:41 ]
俺125じゃないけど、基本的なこと聞いていい?

Paintイベントのヘルプみると
>コントロールが再描画されると発生します。
ってあるんだが、これは

コントロールが再線画されようとしたら発生
コントロールの再線画が完了したら発生

のどっち?
日本語を素直にとらえると後者なんだが、
例とかみてると前者じゃないとおかしな動作しそうだし

129 名前:デフォルトの名無しさん [2009/08/29(土) 11:17:18 ]
コントロールで質問です
コマンドボタンのような見た目で、押した時に凹んだままになり、
もう一度押すと元に戻るボタンをなんというのでしょうか?

130 名前:デフォルトの名無しさん mailto:sage [2009/08/29(土) 11:23:17 ]
>>129
トグルボタンかな

131 名前:デフォルトの名無しさん mailto:sage [2009/08/29(土) 11:24:01 ]
旧VBを知らないからコマンドボタンというのがなんなのかは知らんが、
トグルできるButton風のコントロールはCheckBoxで扱う

132 名前:129 [2009/08/29(土) 11:25:31 ]
>>130-131
もうコマンドボタンっていわないんですね、失礼しました
ありがとうございました

133 名前:デフォルトの名無しさん mailto:sage [2009/08/29(土) 12:50:01 ]
>>128
コントロールが<コントロール自身によって>再描画されると



134 名前:デフォルトの名無しさん mailto:sage [2009/08/29(土) 15:17:36 ]
>>133
コントロールの描画は、OnPaintメソッドで行われるらしいので、
このメソッドの中でPaintイベントを発生させてるってこと?

そうなると、描画が完了してからイベント起きるか、完了まえにイベント起きるかは
そのコントロールの実装次第、ってことになるのかな?

135 名前:デフォルトの名無しさん mailto:sage [2009/08/29(土) 16:08:57 ]
だから、省略してある言葉を補った文章のとおりでしょ

『コントロールが<コントロール自身によって>再描画されると』

これを描画前に呼ばれる可能性もありうると読み取るようなら、
日本語のセンスがちょっとヤバいんじゃないかと思うけど。

136 名前:デフォルトの名無しさん mailto:sage [2009/08/30(日) 01:35:35 ]
Paintイベントを発生させるControl.OnPaintをいつ呼ぶかは、実装に拠るからなあ。
Control.OnPaintのサンプルだと頭で呼び出しているけど。

137 名前:デフォルトの名無しさん mailto:sage [2009/08/30(日) 02:09:36 ]
だから、MSDNライブラリっていうのはチミやオレが実装したコードについて、
ではなく、MSの中の人が実装したコードについて「こうなってます」っていう
解説書だから、そういう物言いはナンセンス以外の何物でもない。
当たり前のことだと思うんだけどね。

138 名前:名無しさん@そうだ選挙に行こう mailto:sage [2009/08/30(日) 04:00:29 ]
Paintイベントは、
コントロールが再描画された後、追加の描画をユーザーに提供する目的で発生します。
一部のコントロールではこのイベントが発生しないこともあります。

こんな感じ?

139 名前:名無しさん@そうだ選挙に行こう mailto:sage [2009/08/30(日) 04:26:41 ]
そもそもMSDNで日本語を正確に読み取ろうとしても意味はない。
正確に読み取りたければ英語のを読め。


140 名前:デフォルトの名無しさん mailto:sage [2009/08/30(日) 21:16:21 ]
>>128
Paintイベントはコントロールが再描画されようとしたときに発生するから。
なので、コントロール自身の再描画処理は、MyBase.Paint()で行う。
このMyBase.paint()を呼ばなければ、コントロール自身の再描画は行われない。

141 名前:デフォルトの名無しさん mailto:sage [2009/08/30(日) 21:31:09 ]
全然違う
コントロールの描画処理はOnPaintというメソッドの中に書かれている。
描画が終わった後,最後に基底クラス(Controlクラス)のOnPaintを呼ぶ。(呼ばなくてもいい)
ControlクラスのOnPaintメソッドの中にはPaintイベントを発生させる処理だけが書かれており,
Paintイベントが発生する。
だから,派生クラスを作ってOnPaintをオーバーライドしてその中に描画処理を書けば
基底クラスの描画処理は行われない。

142 名前:140 mailto:sage [2009/08/30(日) 22:17:53 ]
すまん、MyBase.OnPaint()の間違い。
あと、一番最後の「コントロール自身の再描画は行われない。」は「基底クラスの描画処理が行われない。」
の間違い。
いいたかったことは、>>141と同じこと。

143 名前:デフォルトの名無しさん mailto:sage [2009/08/31(月) 04:22:17 ]
>>141
>描画が終わった後,最後に基底クラス(Controlクラス)のOnPaintを呼ぶ
これなんだが、MSDNの例だと最初に呼んでる
最後に呼ぶと線画完了後にイベント起きることになる

俺がMSDNで調べた限りでは、
まず、最初にMyBase.OnPaint(e)を呼び出し、Paintイベントを発行させて、
その引数eをもとにレンダリングするのが正しい作法じゃないかな

したがって、
Paintイベントは再描画される前に発生し、そのイベントの引数により描画内容を変更することができる
が正解だと思う

実際すべてのコントロールがそのように実装されてるかどうかはしらね




144 名前:デフォルトの名無しさん mailto:sage [2009/08/31(月) 09:42:22 ]
実際にはすべてのコントロールが描画後にMyBase.OnPaintを呼んでる
通例,On○○をオーバーライドするときには基底クラスのOn○○を先に呼ぶことが多いんだけど
OnPaintの場合は後で呼ばないとPaintイベントで描画した内容が見えなくなるだろ

145 名前:144 mailto:sage [2009/08/31(月) 10:03:26 ]
捕捉
コントロールがControlクラスから直接派生している場合は,OnPaintには何の描画処理も書かれておらず,
ただPaintイベントを発生させる処理だけが書かれているので,後で呼ぶことができる。
こうしておけば,コントロールのユーザがPaintイベントを使うことによって描画を上書きできる。
でも,Buttonなど既にOnPaintに描画処理が書かれているコントロールから派生する場合は話が違ってくる。
そのようなサンプルで先にOnPaintを呼んでるのは,まず基底クラスに描画させてその上に描画するため。
その場合,その自作コントロールのPaintイベントは描画が行われる前に呼び出されてしまうので使えなくなる。
(そのコントロールのユーザがPaintイベントで描画してもOnPaintでの描画に上書きされてしまうから)

146 名前:デフォルトの名無しさん mailto:sage [2009/08/31(月) 19:58:56 ]
言っちゃ悪いけど、そんなこと普通MSDNの記述を読んでちょっと考えればわかる
当たり前のことじゃないか?

少なくとも俺はそうだったが・・・

147 名前:デフォルトの名無しさん mailto:sage [2009/08/31(月) 22:20:05 ]
>>146
Paintイベントのヘルプだけ見てもここまでわからないだろ
まあ、関連しそうなところ全部読んで理解すればわかるんだろうが

MSDN全部読んで調べろっていうなら、質問スレの質問ほとんどがそれで済む
すくなくともここは初心者お断りじゃないだろう

148 名前:デフォルトの名無しさん mailto:sage [2009/08/31(月) 22:44:30 ]
まあ145まではいかなくても,落ち着いて自分の頭で考えたら少なくとも>>143みたいな早とちりには至らないわな

149 名前:デフォルトの名無しさん mailto:sage [2009/08/31(月) 23:14:45 ]
VB.netのくだすれが無い以上、ここにくだすれ向けの質問も書かざるを得ないとは思う。
くだすれ作れよってことなら立てるだけなら誰でもできるが、果たして質問に答える方の人材はどうだろうかとも。

150 名前:デフォルトの名無しさん mailto:sage [2009/08/31(月) 23:29:31 ]
多分答える人たちは両方のスレで同じ

151 名前:デフォルトの名無しさん mailto:sage [2009/09/01(火) 12:04:31 ]
まあ、あれだ。
標準のクラスがどうやってるかは Reflector で調べるのが確実。

152 名前:デフォルトの名無しさん mailto:sage [2009/09/01(火) 14:31:02 ]
くだらん質問ですみません。

VB6で書いたコードをVB2008で読み込んで自動でコードを
変換させました。

CommonDialog1.CancelError = True

VB2008のCommonDialogクラスにはCancelErrorなんてプロ
パティは無いそうで、変換できないといわれました。

VB2008のコモンダイアログでCancelボタンを押したときの
値ってどこで取得したらよろしいんでしょう?

なにとぞよろしこ

153 名前:デフォルトの名無しさん mailto:sage [2009/09/01(火) 14:35:36 ]
ShowDialogの返値



154 名前:デフォルトの名無しさん mailto:sage [2009/09/01(火) 14:43:33 ]
resultってVB6もあったよね?

155 名前:152 mailto:sage [2009/09/01(火) 14:45:29 ]
DialogResult.Cancelっていう値を返していたのね。
分かりました。へっぽこですんません。ありがd

156 名前:デフォルトの名無しさん mailto:sage [2009/09/01(火) 23:27:33 ]
おまいらが思う、世界の歴史上最も美しいオープンソースのVB.NETを紹介しろよ。

157 名前:デフォルトの名無しさん mailto:sage [2009/09/01(火) 23:32:08 ]
美しいとかいう以前に無いから
.NETのオープンソースはほとんど全てC#

158 名前:デフォルトの名無しさん mailto:sage [2009/09/02(水) 09:17:15 ]
ほとんどなのか全てなのかはっきりしろ

159 名前:デフォルトの名無しさん mailto:sage [2009/09/02(水) 09:43:43 ]
じゃVB.NETはまれによくあるんだろうか

160 名前:デフォルトの名無しさん mailto:sage [2009/09/02(水) 09:48:12 ]
まれなのかよくあるのかはっきりしろ

161 名前:デフォルトの名無しさん mailto:sage [2009/09/02(水) 10:02:09 ]
CodePlexなんかにはVB.NETで書かれたものもほんの少しはあるけど
C#とは比べ物にならないので,そういうの漁るならC#は必須
ほとんど一緒だから慣れたら脳内翻訳できる

162 名前:デフォルトの名無しさん mailto:sage [2009/09/02(水) 10:09:32 ]
質問です。
あるクラスから Form が呼び出されている場合、その Form で自分の呼び出し元クラスを取得する方法はありますでしょうか?

呼び出し元クラスの他のメソッドを実行したいのです。

現在は下記のように書いていますが、もっとスマートな方法はありますでしょうか?
フォーム frmX でクラス HOGE を New してっていうのが違和感があります。
HOGE.A() で f.Tag = Me とすれば frmX で
Call Ctype(Me.Tag, HOGE).B()
としてもいけそうですが、これもスマートではない気がします。

それとも、呼び出し元クラスのメソッドを実行する設計自体が問題あるのでしょうか?

Public Class HOGE
  Public Sub A()
    Dim f as New frmX
    f.Show()
  End Sub

  Public Sub B()
    MessageBox.Show("Hello!")
  End Sub
End Class

Public Class frmX
  Private Sub Button1_Click(Byval sender as System.Object, Byval e as System.Eventargs) Hanles Button1.Click
    Dim H As New Hoge
    Call H.B()
  End Sub
End Class

163 名前:デフォルトの名無しさん mailto:sage [2009/09/02(水) 10:12:28 ]
frmXのコンストラクタの引数として渡す
一般に,呼び出し元に依存するような設計は良くないんだけどVBならどうでもいいよ



164 名前:162 mailto:sage [2009/09/02(水) 10:25:14 ]
>>163
ありがとうございます。
なるほど!です。

frmX で

Private _Caller As HOGE
Public Sub New(Caller As HOGE)
  InitializeComponent()
  _Caller = Caller
End Sub

Private Sub Button1_Click(〜
  Call _Caller.B()
End Sub
とすることでできました。

Form の既定のプロパティに呼び出し元を取得できるものでもあれば、と思っていたのですが
見つけることはできませんでした。

呼び出し元に依存するような設計の良くないと言われるのはどういった点でしょうか?
今後の参考にさせていただきたいので、お教えいただければと思います。

165 名前:デフォルトの名無しさん mailto:sage [2009/09/02(水) 10:29:37 ]
逆に言うとそのHOGEがないと呼び出せないということになる
HOGEの中身によるけど,あんまりその場に依存した具体的なクラスだとfrmXが使い回しできなくなる

166 名前:162 mailto:sage [2009/09/02(水) 10:44:48 ]
開発しているシステムに「HOGE」「FOO」「BAR」みたいに3つの機能があるとします。
で、それぞれの機能をクラスに分けようと思っています。
もっと言うと別Dllにしてしまおうと考えています。

各機能で固有の機能や画面は各クラスで実装するつもりで、メインプログラムから
例えば処理HOGEを行う場合は、クラスHOGEのインスタンスを作成し、そのクラスの
メソッドを実行しようとしています。

frmX を他のクラスから使いまわすということはないです。

複数のクラスから使いまわす予定のものは呼び出し元クラスに依存しないような設計に
すれば問題ないですか?

167 名前:デフォルトの名無しさん mailto:sage [2009/09/02(水) 11:41:21 ]
他でも使う機能なら、フォームのクラスに載せないで、
共通機能として別クラスに作るだけでいいんじゃないの?

168 名前:デフォルトの名無しさん mailto:sage [2009/09/02(水) 12:10:05 ]
>>162 >>164
「呼び出し元」て…

frmX にイベントを追加するのが一般的じゃね?

Class HOGE
  Public Sub ...
    Dim f As New frmX
    AddHandler f.押された, AddressOf B    ' ←─ ここでハンドラ追加
    f.Show()
  End Sub
  :
  Public Sub B(ByVal self As Object, ByVal e As EventArgs)
    MessageBox.Show("Hello!")
  End Sub
End Class

Class frmX
  :
  Public Event 押された(ByVal self As Object, ByVal e As EventArgs)
  :
  Private Sub Button1_Click(...
    RaiseEvent 押された(Me, New EventArgs)
  End Sub
End Class

169 名前:デフォルトの名無しさん mailto:sage [2009/09/02(水) 12:15:11 ]
これ全然一般的じゃないだろw

170 名前:デフォルトの名無しさん mailto:sage [2009/09/02(水) 12:17:27 ]
使い回さないって言ってるんだから普通にHOGEのメソッド呼べばいいと思うよ
>>166を読む限り,frmXの処理は密接にHOGEに結びついてるみたいだから
無理にイベントを使っても強くHOGEを意識する形になると思われるのであまり意味がない
本当に分離するなら,frmXで触るデータを保持するクラスをHOGEとは別に作る

171 名前:デフォルトの名無しさん mailto:sage [2009/09/02(水) 14:07:34 ]
VB2008を使っています。
関数の処理時間を計ろうと以下のクラスを作成しました。

Public Class ProcTime
Private dtDiff As DateTime

Public Sub New()
dtDiff = DateTime.Now
End Sub

Protected Overrides Sub Finalize()
Debug.Print(DateTime.Now.Subtract(dtDiff).Milliseconds.ToString())
End Sub
End Class

'時間を計る関数に
Private Sub Test()
Dim pt As New ProcTime
'〜処理〜
End Sub

とした場合、正しく計れないのですが間違っていますか?

172 名前:デフォルトの名無しさん mailto:sage [2009/09/02(水) 14:11:06 ]
Finalizeはいつ呼ばれるかわからないから,そういう使い方はできない。
そういうパフォーマンス計測にはSystem.Diagnostics.Stopwatchという専用のクラスがあるからそれを使う。

173 名前:171 mailto:sage [2009/09/02(水) 14:22:34 ]
早速の回答ありがとうございます。

時間を計測したい関数の最初と最後に Start、Stop を配置して
計測するんですね、分りました。



174 名前:デフォルトの名無しさん mailto:sage [2009/09/02(水) 16:54:24 ]
c++で作ったDLLの関数が次のような場合
>int Foo(void **param) 実際はparamが複数ある
>ダブルポインタを渡してオブジェクトのポインタ値を取得する。NULL値も許容する。
VB.net2003での宣言を以下のようにしたらNothingを渡してもNULL(0)になりませんでした。
>Declare Ansi Function Foo Lib "hoge.dll" (ByRef param As IntPtr) As Int32
VBからポインタ値の先を直接参照するわけではなく、ハンドル的な使い方をしたいのです。
NULL値も渡せるようにするにはどうしたらいいのでしょうか?

175 名前:174 mailto:sage [2009/09/02(水) 16:56:48 ]
書き漏れがありました。
C++のDLLはネイティブ(アンマネージド)DLLです。






[ 続きを読む ] / [ 携帯版 ]

前100 次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧]( ´∀`)<214KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef