VB.NET質問スレ (Part12)at TECH
VB.NET質問スレ (Part12) - 暇つぶし2ch116:デフォルトの名無しさん
05/07/30 10:34:54
さあまたいつもの流れの時間がやってきました

117:デフォルトの名無しさん
05/07/30 16:26:25
元の質問はヤフーのログ読みの質問じゃないよな。
汎用的な他のアプリ情報奪取方法。

118:デフォルトの名無しさん
05/07/30 16:27:41
>>117
で、どうやったら汎用的な他のアプリ情報を取れるんですか?

119:デフォルトの名無しさん
05/07/30 17:12:13
エスパーだったら可能です。


120:デフォルトの名無しさん
05/07/30 17:23:40
>>119
まじめに答えてくださいよ
そんなくだらない事言って何が面白いんですか?

121:デフォルトの名無しさん
05/07/30 17:29:29
パケットキャプチャでよければ作れるけど?
あと、キーボードフックとかも作れるけど

122:最凶VB厨房
05/07/30 17:49:25
そんな手間かからんのであれば作って欲しいぞなもし。

123:デフォルトの名無しさん
05/07/30 17:59:24
そんなもんわざわざ作らんでもすぐ見つかるじゃん。

124:デフォルトの名無しさん
05/07/30 18:37:07
>>105あたりから>>110で回答済みなのに。
>>120みたいなパターンの煽りって正直しつこい。

125:デフォルトの名無しさん
05/07/30 18:41:08
>>124
わからねーなら口出すな

126:デフォルトの名無しさん
05/07/30 18:45:33
>>125
じゃあ具体的にどのような仕様のアプリを作りたくて、
何を試したり調べたりしたのか出してくれよ。
あんな漠然とした質問じゃ誰も答えられませんよ。

隣のアプリが何をしてるかなんて、知らないのが当然なんですから。


127:デフォルトの名無しさん
05/07/30 18:49:20
>>126
>>125

128:デフォルトの名無しさん
05/07/30 18:57:15
>>125
ばーかばーか

129:デフォルトの名無しさん
05/07/30 19:11:04
>>116

130:デフォルトの名無しさん
05/07/30 19:37:42
もう、面白くもないな。


131:デフォルトの名無しさん
05/07/31 02:02:15
急速にスレの質が低下してまいりました

132:デフォルトの名無しさん
05/07/31 02:04:38
>>112
DLLインポートってどうやるんですか?

133:デフォルトの名無しさん
05/07/31 04:52:33
( ´ー`)y―┛~~夏ですなぁ・・・・

134:デフォルトの名無しさん
05/07/31 08:05:18
まったくのVB.NET初心者なのですが、
VBでパラメータを指定して、SQLのSPを呼び出すという簡単なプログラムを作りたいのです。
で、MSDNの10行でズバリシリーズにやり方が書いてあるのですが、質問させてください。

'DataSet の生成
Dim ds1 As DataSet = New DataSet("CustomerOrders")

という一文があるのですが、"CustomerOrders"というのは何なのでしょうか?
もともとのDBにはこのような名前のテーブルはありません。

ユーザーが任意につけるものなのでしょうか?それならば、これは何の名前で
たとえばどのようにつかうのですか?

レベルが低くてすみません。


135:デフォルトの名無しさん
05/07/31 08:38:52
>>134
@ITに簡単なADO入門の記事があるからそれを見ろ。


136:デフォルトの名無しさん
05/07/31 09:25:05
>>134
CustomerOrdersというデータセットを作るということだよ。

137:デフォルトの名無しさん
05/08/01 10:00:15
test

138:デフォルトの名無しさん
05/08/01 10:04:24
test

139:デフォルトの名無しさん
05/08/01 16:29:16
VB.NET ASP のTextBoxの改行消えてします。


この様な現象が発生して困っています。

画面にTextBox(MultiLine)とButtonを配置する。


実行してTextBoxに
[改行]
[改行]
あいうえお

と入力してButtonを押すと。
[改行]
あいうえお

となって、改行が消えてしまいます。Buttonには、何も処理を入れていません。


解決方法がないでしょうか?

.Net 2003
FrameWork1.3



140:デフォルトの名無しさん
05/08/01 20:29:59
やっぱり1.3はつっこむところか

141:デフォルトの名無しさん
05/08/01 20:30:32
複数人で開発するプロジェクトの環境構築で質問です。
Visual Source Safe は使ってはいけないと言われています。

VB6では画面単位でプロジェクトを作成し、子画面のフォームを
別フォルダの別プロジェクトから追加して、画面単位でexeを
作成していました。フォルダ構成としては
Common
メニュー
画面1
画面2
というようにして、それぞれのフォルダが別々のプロジェクトです。

VB.NETでも同様なことはできるでしょうか?
新たにソリューションなる単位ができて、ちょっと厄介だなと
感じています。

VB6でいうところの *.bas も簡単に別ソリューションからインクルード
できなくなっているようにも感じたのですが。



142:デフォルトの名無しさん
05/08/01 21:08:29
出来る。
プロジェクトへの追加のデフォルトはコピーなので、開くボタンの右の小さい奴からリンクの追加を選択。

あと、回答になってるかわからんが、DLLの作成をして参照したほうがスマート。
クラスでもフォーム(・・これもクラス)もDLLでコンパイルして、使う側で参照すればいい。



143:デフォルトの名無しさん
05/08/01 21:18:05
そしてできあがる相互参照。……できあがってない。

144:デフォルトの名無しさん
05/08/01 21:19:41
>>142
本日はこの点ではまっていたため、少し安心しました。
ありがとうございました。
また明日試してみたいと思います。

時間があればDLLも検討してみたいですが、あまり
使ったことがないので後々責任問題になるとちょっと怖い。。



145:デフォルトの名無しさん
05/08/01 21:23:22
>>140
1.3探しちゃいました

146:デフォルトの名無しさん
05/08/01 22:07:38
>>144
DLLいっても、今までのActiveXDLLとかと違って、普通のライブラリだ。
この部分の仕様は凄くシンプルになって、それこそ抵抗なく入れるから使ってみたほうがいいよ。
構える必要全くなし。

147:デフォルトの名無しさん
05/08/03 19:41:21
Win2000 SP4で開発しています。

メモ帳を起動しようとして

Shell("notepad.exe", AppWinStyle.NormalFocus, True)

としたのですが、プロセスは起動するんですが、メモ帳が表示されなくて困ってます。
引数に適当なファイルを渡しても同様です。
何か他に設定が必要なのでしょうか。



148:デフォルトの名無しさん
05/08/03 19:50:31
>>147
画面の領域外に表示されてるんでない?
マイナス座標とか

149:デフォルトの名無しさん
05/08/03 19:50:48
System.Diagnostics名前空間のProcessクラス使えー。

150:146
05/08/03 22:53:37
>147

そんなことあるんですか
画面の領域内に表示するにはどうすればよいのでしょう

>149

プロセスが終了するまで待たねばならないので、何とかShell関数でやりたいのです。

151:デフォルトの名無しさん
05/08/03 23:01:18
>>150
ProcessクラスにはWaitForExitメソッドなんてのもある。

152:デフォルトの名無しさん
05/08/04 00:23:35
単精度浮動小数点数型 (Single) の変数は、IEEE 32 ビット (4 バイト) の浮動小数点数の変数です。
負の値は -3.402823E38 ~ -1.401298E-45、正の値は 1.401298E-45 ~ 3.402823E38 の範囲の値をとります。
単精度浮動小数点数型の型宣言文字はエクスクラメーションマーク (!) です。

上記のうち
1.401298E-45 ~ 3.402823E38 は何を示しているのでしょうか。

Eとは自然対数の底であり、2.171828...
ということらしいですが、これだけでは十分理解できませんでした。
どなかたご教授下さい。

153:デフォルトの名無しさん
05/08/04 00:32:31
この場合のEは自然対数とは関係ない(自然対数の底は通常、小文字eで表す)。
これは指数表記。
例えば 1.3E2 なら、1.3 * (10^2) = 1.3 * (10 * 10)を表す。
負の指数は、正の指数の逆数。 1.32E-2 = 1.32 * (1 / (10^2)) = 1.32 * 0.01

154:デフォルトの名無しさん
05/08/04 00:33:43
ちなみに
Dim a As Single = 1.3E-4
なんて記述は有効だから試してみると良い。

155:デフォルトの名無しさん
05/08/04 00:48:17
>>153-154
感謝感激。
これから試して見ます。

156:最凶VB厨房
05/08/04 01:23:54
自然対数の底
2.7182818284590452354

157:デフォルトの名無しさん
05/08/04 12:43:17
まあ他に優先的に覚えなきゃいけないことが増えたからしょうがないんだけど
こういう昔はどんな入門書にも書いてあったことが、
今の時代には入門書には全然解説されてなく、かといって中上級者向けの本や
MSDNでは知ってて当然の前提として書かれているわけで、今の若い人はそういう意味じゃ不幸だな。

158:デフォルトの名無しさん
05/08/04 14:51:52
URLリンク(pc.watch.impress.co.jp)

マイクロソフトOBでWindows 1.xの時代からWindowsの開発に関わっていた方(2000年に退職)から
コメントをいただいた。引用させていただくと、

“私の住むシアトル近辺のマイクロソフトOBの間では、2004年の前半に「Longhornがキャンセルに
なったらしい」という噂がさかんに交わされ、その後次々と「OFSはLonghornとは別」、
「Managed APIは採用しない」とのアナウンスがありました。結局の所、もともと計画していた
Longhorn は出せなくなったけれども、いまさらキャンセルになったとは言えないので、出せるもの
だけかき集めてLonghornと呼ぶことにした、という見方がこちらでは一般的です”

159:デフォルトの名無しさん
05/08/05 12:31:54
ディスクの空き容量調べる場合はどうすればいいですか?

160:デフォルトの名無しさん
05/08/05 12:39:35
マネージドで書くならWMIを使う
URLリンク(homepage3.nifty.com)

CreateObjectでFileSystemObjectを作ってGetDrive/FreeSpaceを使う
Win32APIのGetDiskFreeSpaceExを使う
シェル関数のSHGetDiskFreeSpaceを使う

161:159
05/08/05 21:27:50
>160
なるほど、ありがとうございました。


162:デフォルトの名無しさん
05/08/05 21:40:15 BE:347117388-
クリレポ.NETについて

通常は帳票を印字するときに

No. | 県名(ヘッダ)
1, 東京都
2, 神奈川県
3, 千葉県
4, 埼玉県
5, 静岡県
6, 長野県

なぐあいに↓方向に描画するんだけど
これを横にして

ヘッダ 詳細
No.  1,    2,       3,    4,     5,    6,
県名 東京都 神奈川県 千葉県 埼玉県 静岡県 長野県

のように表示させたい
横方向に描画する方法まではわかったんだけど
ヘッダの部分(No,県名)を詳細の左側に持ってくる方法がわからない

解決方法をご存じだったらご教示いただきたい




163:デフォルトの名無しさん
05/08/07 03:09:16
VB.NETから「VS.NETで作られたマネージドC++のdll」を利用したいのですが
アンマネージドC++と同様の方法で利用できますでしょうか?

昔VB6.0のときにC++(アンマネージド)のdllを利用するときは
このような↓感じだったと思うのですが。
Declare Function Add Lib "test32.dll" (ByVal nLeft As Integer, ByVal nRight As Integer) As Integer
このような書き方で構わないでしょうか。実際にやってみると稼動しているようですが
もっと望ましい書き方があるのかなー?と疑問に思いまして。

VB.NETからC#のメソッドを利用するときはインスタンスをnewして
簡単に利用できたのですが…。

164:デフォルトの名無しさん
05/08/07 03:11:59
>>163
本当にManagedのC++なら、参照設定で追加するだけで使える。C#で作ったクラスを利用するのと同じ要領で。

165:デフォルトの名無しさん
05/08/07 03:23:29
>>163さんと似たような問題、というか状況なので
少し質問させてください。

現在、
VB.NETからManagedC++
(とはいってもunManagedC++をVisualStudio.NETでManaged用に
手直しした程度)のdllをDeclareで呼び出し、その中でさらにunManagedC++のdllを
呼び出すプログラムを作成しています。

しかし、なぜかVB.NETで例外が頻発し、
ラベルやテキストボックスのサイズを指定するところで
System.Arithmetic.Exceptionが頻発してしまいます。
ラベルの色指定もできず困っています。
ただ、unManagedC++のdllの利用をやめるとそれが解消します。
unManagedC++のdllの利用って、何か注意が必要でしょうか?

166:デフォルトの名無しさん
05/08/07 03:26:15
> Declare Function Add Lib "test32.dll" (ByVal nLeft As Integer, ByVal nRight As Integer) As Integer
> このような書き方で構わないでしょうか。実際にやってみると稼動しているようですが

自分もこの呼び出し方を利用していました。
それで稼動していたし。
C#みたいに参照設定でしようできるんですね。
どっちのほうがいいんですか?
何か違いがあるんでしょうか?

167:デフォルトの名無しさん
05/08/07 04:44:03
>>69さんの意見も参考にしてねv

168:デフォルトの名無しさん
05/08/07 05:18:49
システムが用意しているアイコンをForm上のPictureboxに
表示したいと思っています。

下記のようにすればコーディングできるとわかりましたが
これをどのイベントが発生したときに行えばいいのか悩んでいます。
FormがLoadされたタイミングでやればずっと表示され続けるのかと
思ったのですが、デバッグモードで1行ずつ表示させると一瞬表示されるけど
その後見えなくなってしまいます…PaintとかActivatedとかもあるかと思いますが
「一般的なメッセージボックスみたいにアイコンを表示しっぱなしにしたい」とき
皆さんはどうされますか?

'システムのアイコンを表示する
'PictureBox1のGraphicsオブジェクトの作成
Dim g As Graphics = PictureBox1.CreateGraphics()
'既定のアプリケーションアイコン(WIN32: IDI_APPLICATION)
g.DrawIcon(SystemIcons.Application, 0, 0)


169:デフォルトの名無しさん
05/08/07 05:28:51
>>164さんありがとうございます。
以前C#みたいにできたらいいのに、と思っていたので実現できそうと知り安心しました。
「本当にManagedのC++なら」という部分の「本当に」が気になりますが
(他社の方が作ってくれたのですが、
一応managedとはいいつつも
既存のC++のソースをVS.NETで開きMFC化しただけ、とも聞いてます…
「本当に」ManagedC++といえるのか、ちょっと心配ですが)
ちょっとためしてみます。

170:デフォルトの名無しさん
05/08/07 11:41:36
>>168
自分で出来ることは自分でする、出来る範囲で調べてみる、って意欲がないのなら
悪いこと言わない、プログラミングなんて止めとけ。

>>3
>どぼん!のVB道のトップページとTipsページ
>URLリンク(dobon.net)
>URLリンク(dobon.net)

171:デフォルトの名無しさん
05/08/08 21:57:18
C#のbase キーワードはVB.NETでは何ですか?


172:デフォルトの名無しさん
05/08/08 22:00:22
MyBase
もうちょっと具体的に説明した方が良いよ。基底クラスのメンバにアクセスするためのキーワード、とか。

173:デフォルトの名無しさん
05/08/08 23:30:38
残念だがそれが出来るやつは聞かんでも分かっとる。


174:デフォルトの名無しさん
05/08/09 22:54:30

アクセスからVB.NETへの移植をやっていますが、
.NETのコンボボックスで質問です。

コンボボックスのドロップダウンリストでいずれかの項目を
選択したときに、それとは別のテキストを表示させたい
のですが、そういうことは可能でしょうか?

例えば
0001 ABCDEF
0002 DEFCFE
0003 XYZXYZ
というリストがあったときに3番目を選んで、表示は
0003 だけにしたいのです。

ダメなら別の実装方法を考えないといけないです。
可能だとすれば、どの辺のイベントをどのように
処理したら良いものでしょうか?



175:デフォルトの名無しさん
05/08/09 23:02:08
そのリストとやらはどういうオブジェクトなんだ?
ArrayList? Stringの配列?
それとも単純にItemsプロパティに一つ一つ"0001   ABCDEF" "0002   DEFCFE"……ってAddしていったのか?

176:デフォルトの名無しさん
05/08/09 23:17:40
>>174
DropDownStyleをDropDownにしといてSelectedIndexChangedイベントで
Text設定するだけちゃうの?

>>175は池沼か?

177:デフォルトの名無しさん
05/08/09 23:27:55
>>176
試してみた?

178:デフォルトの名無しさん
05/08/10 00:35:03
ああそうか、単純にイベントでText設定してもダメだったような記憶がある。
ドロ臭い方法だけど、SelectedIndexChangedでタイマ起動して
タイマのイベントでText書き換えれば確実に出来る。

ドロ臭いのが嫌ならComboBox継承してOnSelectedIndexChangedをオーバーライド
してやれば可能じゃないか?

179:デフォルトの名無しさん
05/08/10 00:39:11
>>178
泥臭い。
DisplayMemberを利用すべき。

180:デフォルトの名無しさん
05/08/10 00:44:33
え?

181:デフォルトの名無しさん
05/08/11 09:13:29
長時間掛かる処理にキャンセルボタンを付けたいのですが
キャンセルボタンだけがあるフォームをポップアップして
メイン画面のほうはさわれないようにしたいんですが
どうしたらよいでしょうか?

182:181
05/08/11 10:06:43
できました。

183:デフォルトの名無しさん
05/08/11 13:09:44
まあ、あれだ、ホントにキャンセルボタン押せるか確認してくれ


184:181
05/08/11 13:54:56
押せたよ。マルチスレッドって便利すぎ

185:デフォルトの名無しさん
05/08/11 15:51:33
テキストボックスに余白を設定したいのですが、どうすればよいでしょうか?


VB6なら、SendMessageを使って出来たのですが、.NETの方は同じやりかただと出来なかったので。

以下が書いてみたコードです。

 Private Const EM_SETMARGINS As Integer = &HD3s
 Private Const EC_RIGHTMARGIN As Integer = &H2s
 Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As IntPtr, ByVal wMsg As Integer, ByVal wParam As Integer, ByRef lParam As Integer) As Integer
 Private Function MAKELONG(ByVal i As Integer, ByVal j As Integer) As Integer
   Return (i And &HFFFF) Or (j * &H10000)
 End Function

 Call SendMessage(textbox1.hand, EM_SETMARGINS, EC_LEFTMARGIN, MAKELONG(lngNewValue, 0)

186:デフォルトの名無しさん
05/08/11 16:19:49
>>185
lParamを何故かByRefで渡しちゃってるよ。

187:185
05/08/11 16:36:40
>>186
Σ(゚д゚ )
うぉ。ホントだ

ByVal に直したらいけました。
なんて初歩的なミスを、、、_| ̄|○

お騒がせして申し訳ありませんでしたm(_ _)m

188:デフォルトの名無しさん
05/08/11 23:09:50
VB.NETでクッキーを作ることって可能ですか?
ヤフーチャットにブラウザからLOGONする時、
ユーザ名とパスワードを自動で入れたいのですが

現在自宅にネット接続環境が無いため
ネットカフェor職場での利用となるので履歴が残せず、
項目を毎回入れなければなりません
同じようにメールチェックなどが非常に困難です・・・。
クッキーは1分で消えるように設定したいと思ってます

VB.NET初級者の私でも作れるでしょうか?
どうかアドバイスお願いいたします・・・

189:デフォルトの名無しさん
05/08/11 23:13:27
IEのクッキーを作りたいのか、独自アプリでクッキーに対応したいのかどっちだ。

190:デフォルトの名無しさん
05/08/11 23:29:37
>>189
レスありがとうございます
IEのクッキーを作りたいです

まずはexeを実行して
comboboxからユーザー名を選択して実行すると
パスワードと共にクッキーとして保存されて、
LOGONページを開くとユーザ名とパスワードが入力済みとか。

アカウント数とユーザ名が長いので
複数件の登録をしたいんですが・・・。
初級者には不可能でしょうか??

191:デフォルトの名無しさん
05/08/11 23:52:49
>534: 名無しさん@お腹いっぱい。 [sage] 04/10/23 14:37:24 ID:fg9Ewxsa
>'Yahooにログイン.vbs
>
>'-------------------
>
>Const login = "なまえ"
>Const passwd = "ぱすわーど"
>Set ie = CreateObject("InternetExplorer.Application")
>ie.visible = True
>ie.navigate "URLリンク(www.yahoo.co.jp)"
>Do
>    WScript.Sleep 100
>Loop While ie.Busy
>With ie.document.forms(0)
>    .item("login").value = login
>    .item("passwd").value = passwd
>    .Submit
>End With

192:デフォルトの名無しさん
05/08/12 00:17:54
>>191さん
188です!
拡張子をvbsにして実行したところ、成功いたしました!
本当にありがとうございました!

193:デフォルトの名無しさん
05/08/12 17:22:03
VB6ではtextBoxをコントロール配列に出来たと思うのですが、VB.Netでは出来なくなったのでしょうか?
何か変わりの方法が用意されてますか?
----VB6-----
for i = 0 to 10000
textbox(i)=i
next i
みたいなのです。

194:デフォルトの名無しさん
05/08/12 17:30:25
自分で作るしかない。どぼんにそれっぽい実装コードがある。
というかそんな不安定な機構いらない。

195:181
05/08/12 17:33:44
え?不安定な機構?

196:デフォルトの名無しさん
05/08/12 18:35:52
>>193
URLリンク(dobon.net)

197:デフォルトの名無しさん
05/08/12 19:39:34
>>193
自分で別途コントロールの参照変数を配列にして参照するやり方が1つ。

または、名前を連番にしてコントロールを名称で呼び出すやり方。

または、Tagプロパティを上手く使ってやるやり方。

.net推奨は最後のTagか?

198:デフォルトの名無しさん
05/08/12 22:36:13
コントロール配列にはVB特有の曖昧さがもたらす暗黒面もあったものの、
便利な面があったのも事実だと思うけどね。

あと、一応.NETでもコントロール配列の代替手段は容易されているよ。
VB6でコントロール配列つかった簡単なプロジェクト作って
アップグレードウィザードでアップグレードしてみ?

っていうか、質問する前になんでこんな当たり前のこと試してみないんだろう。

199:最凶VB厨房
05/08/12 22:39:37
アップグレードウィザードはどこにあるんだ?

200:デフォルトの名無しさん
05/08/12 22:53:25
>>199
知ってるくせに(笑)
厨房氏はスレが荒れそうになると現れるな
プレデターか君はw

201:最凶VB厨房
05/08/12 23:43:24
>>200
しらねーから聞いてんだ!
何もしらねー何もわかんねー!!はぁぷみー

202:デフォルトの名無しさん
05/08/13 00:57:53
質問させてください。
複数のラベルが存在しているユーザーコントロールを作成しました。

その中にとあるラベルの前景色、背景色を指定するプロパティがあり、
初期値をユーザーコントロールの前景色、背景色としたいのです。

貼り付けた時点では確かにその色がプロパティへセットされるのですが、
ユーザーコントロール自体の色を変更した際、そのプロパティの値は
変わらない状態です。

なにかいい方法はありませんでしょうか?

通常のForeColor、BackColorプロパティのように、
初期値なしみたいな設定できればいいのですが・・・。


203:デフォルトの名無しさん
05/08/13 01:00:10
ユーザコントロールのBackColorChanged&ForeColorChangedで変更すればいいだろ

204:デフォルトの名無しさん
05/08/13 01:17:10
>203
それも試してみたんですが、
今度は「とあるラベルの色を指定するプロパティ」に独自の値を
設定していた場合、「コントロール自体」の色を変更すると、指定していた色が
クリアされてしまいました・・・。

あと、プロパティブラウザで常に太字になるのは避けたいんですが・・・。


205:デフォルトの名無しさん
05/08/13 01:22:48
イベントを作成する場合に(例えば、Clickの場合)
「OnClick」と「Click」がありますが、違いがよくわかりません。
どのように使い分けたらいいのか教えてエロい人!


206:デフォルトの名無しさん
05/08/13 01:33:25
>>204
「とあるラベルの色を指定するプロパティ」で、値を別フィールドにとっておいて
イベントで独自色を使用してるかどうか判断すればいいだろ。
プロパティブラウザ? 気にするな。
気になるのならParentChangedでParentのBackColorとForeColorに合わせるようにするとかどうだ。

>>205
Onの方はProtectedなメソッドなので継承したクラスでオーバーライドするしかない。
そのかわり基底クラスのイベントを多少コントロールできる。
派生コントロールを作らないのならOnをいじる機会はない。
派生コントロールを作るのならデリゲートオブジェクトを作らないのでOnをオーバーライドする方が多少効率的。

207:デフォルトの名無しさん
05/08/13 03:30:00
教えてください。
関数の中には、引数を指定しない場合、デフォルトの値が適用されるものがありますが、
これを自分で作成した関数で再現する場合、どのようにすれば良いのでしょうか

例えば↓で、bolFlag が指定されていないときは、True を指定したい
Public Function MyModule(Byval strData As String, Byval bolFlag as Boolean) As String
  ...
End Function


208:デフォルトの名無しさん
05/08/13 03:33:55
ヘルプで調べると良いよ Visual Basic 言語リファレンス

209:デフォルトの名無しさん
05/08/13 04:22:36
Optional ByVal bolFlag As Boolean = True ですね。
ありがとうございました。

210:204
05/08/13 13:37:52
>206
重ねてのアドバイスありがとうございます。
OnForeColorChangedと、その追加したプロパティのセッターで
コントロール自体の色と一致しているかを保存しておき、
一致している場合のみ連動させるようにしました。
今のところ意図した動きになっているようです。


211:デフォルトの名無しさん
05/08/13 17:27:56
追加で自己レス
ShouldSerialize[プロパティ名]を利用することで、
プロパティブラウザでコントロールの色と同じであれば
太字にならない(=ソースに色指定が出力されない)
ようになりました。

212:デフォルトの名無しさん
05/08/13 21:29:40
質問です。
グローバルIPアドレスを取得したいのですが、どうすればよいでしょうか?

URLリンク(dobon.net)

このページの方法では、LANやルーターから割り振られたアドレスしか取得できないので。

213:デフォルトの名無しさん
05/08/13 22:14:57

   〃∩ ∧_∧
   ⊂⌒(  ・ω・)  はいはいわろすわろす
     `ヽ_っ⌒/⌒c
        ⌒ ⌒





じゃかわいそうなのでマジレス。
内側だけで直接グローバルIPを見ることはできない。

たぶんDiCEみたいなDDNS更新ツール
(それかネットワークゲーマー用のユーティリティ?)を作りたいんだと思うけど、
やるなら外のページを定期的に見に行って、環境変数のREMORT_ADDRを
取得して比較するくらいしか方法ないと思う。

せめてルータが決めうちできれば、コマンドでの取得できそうだけどね。

214:デフォルトの名無しさん
05/08/13 22:17:54
ギャース、REMOTE_ADDRだった。
逝ってきます・・・。

215:デフォルトの名無しさん
05/08/14 10:27:19
DataGridで、カラムを複数行にする方法はありませんか?
テーブル:項目1,項目2,項目3,項目4,項目5
みたいなのを
項目1|項目2|項目3
     |項目4|項目5
みたいな感じに表示させたいです。
よろしくお願いします。

216:デフォルトの名無しさん
05/08/14 13:18:42
SELECT 項目1,項目2,項目3 FROM HOGE
UNION
SELECT NULL,項目4,項目5 FROM HOGE

217:215
05/08/14 21:31:19
>>216
ありがとうございます。
やってみたのですが、データの中身は2段になったのですが、項目名称が2段にならなかったです。
項目名称は1行しか無理でしょうか。

218:デフォルトの名無しさん
05/08/15 10:31:59
CheckBoxにReadOnlyプロパティを追加したユーザコントロールを
作ろうとしています。

イメージとしては、チェックボックスがEnabled=Falseの状態、
文字列は通常のままにしたいのですが、
何かいい方法はありませんでしょうか?

できればCheckBoxを継承して作成したいのですが。

219:デフォルトの名無しさん
05/08/15 10:39:17
CheckStateプロパティと、OnCheckStateChangedメソッドのオーバーライドでいいんじゃね?

220:デフォルトの名無しさん
05/08/15 13:21:55
>>217
SELECT 項目1,項目2,項目3 FROM HOGE
UNION
SELECT NULL,'項目名4','項目名5'
UNION
SELECT NULL,項目4,項目5 FROM HOGE

てか、たぶんあなたのやりたいことは無理です。

221:デフォルトの名無しさん
05/08/15 17:23:25
vb.net(プログラム自体も・・・)始めたばかりのピヨピヨです。
いろいろ調べたんですがどうしても解らないことがあります。
質問してもいいですか?

222:デフォルトの名無しさん
05/08/15 17:25:13

VB6のころはテキストボックスのGotFocusでテキストを
全選択するのが良く行われてましたけど、VB.NETでは
これはできるのでしょうか?

単純にGotFocusでSelectAllメソッドを使ったのでは
できないようなのですが。

もともと、これは好きじゃないのですが、業務アプリの
慣習というのがあるんですよね。できない、かなり難しい
というのであれば、上の人を説得できるので。



223:デフォルトの名無しさん
05/08/15 17:42:13
ん? 普通にできるけど?
ちなみに.NETではGotFocus/LostFocusよりもEnter/Leaveが推奨されている。

224:デフォルトの名無しさん
05/08/15 17:45:07
>222
私もあまり好きじゃないのですが、同じく業務アプリ屋なので・・・。
VB.netの場合、EnterとLeaveで出来ます。
もしクリックした場合も全選択させたいなら、MouseDownも。
(うちはマウスクリックの場合は全選択させません)

ちなみに、Enterでもタブ移動させたいって言われてませんか?w


225:デフォルトの名無しさん
05/08/15 19:39:32
妙なこと言う人たちだなあ。。
それって好き嫌いの問題か?

フォーカス移動時の全選択って合理性あるでしょ。
テキストエディタのように既存の文字列を編集する、ってアプリならともかく、
ほぼ毎回入力されるデータが変わる、っていうようなアプリなら。

だいいち、客に出すラーメンの味にラーメン屋自身の好みを押し付けるって不遜じゃないか。

226:デフォルトの名無しさん
05/08/15 19:54:41
なんでそんなことでケチつけるかなぁ?
個人的に好きじゃないことの何が悪い?

意固地になって実装しないわけじゃないし。
注文されればその通りに作ってるさ。


227:デフォルトの名無しさん
05/08/15 19:58:31
>225
コボラー乙

228:最凶VB厨房
05/08/15 20:58:20
こだわりのラーメンは是非食いたいネ
あー腹減った。

229:デフォルトの名無しさん
05/08/15 23:05:29
TcpClient で存在しないアドレスにconnectすると、
えらい時間が掛かってExceptionが返ってくるのだけど、
connectのタイムアウトを設定ってできないの?

230:デフォルトの名無しさん
05/08/15 23:40:07
できない。
別スレッド作るかSystem.Timers.Timerを使うかして、そっちで強制的にCloseするぐらいか。
でもTcpClientでは接続中かどうかを判断もできないんだよね。.NET 2.0で思い出したように追加されたけど。
派生クラスを作ればProtectedメンバのClientプロパティ経由で状態を知ることはできるんだが。
派生クラスでタイムアウト付きConnectでも定義するか。
素直にSocket使った方が早いかもね?

231:デフォルトの名無しさん
05/08/16 00:01:14
>>230
粗雑な問いに、丁寧にお答えいただき、大変恐縮でございます。
ご意見、参考にさせて頂きます。ありがとうございました。

232:デフォルトの名無しさん
05/08/16 09:03:51
>>224
Enterイベントだとタブでの移動では全選択されるようなのですが、
マウスでクリックした場合は全選択されないですよね?
Clickイベントで実装するとテキストボックス内で他の場所を
クリックしたときにも全選択されてしまうし。



233:デフォルトの名無しさん
05/08/16 10:36:43
>232
いや、だからMouseDown

>テキストボックス内で他の場所
これってどういう意味ですか?

234:デフォルトの名無しさん
05/08/16 11:20:26
>>232
>Enterイベントだとタブでの移動では全選択されるようなのですが、
>マウスでクリックした場合は全選択されないですよね?
いや、実際は一旦全選択されているはずだけれどもね。
恐らく一旦全選択された後、解除されてしまうんだよね。
単にクリックしたはずが、クリックしたついでに微妙にドラッグになってしまっているために。

>>233
だいたい話の文脈でわかるでしょ?
そうでないならこの話題にのっかる資格はないと思うけど。
フォーカスが来たとき以外も全選択されてしまうということでしょう。

235:デフォルトの名無しさん
05/08/16 11:57:37
>234

>恐らく一旦全選択された後、解除されてしまうんだよね。
これはあってる。

>単にクリックしたはずが、クリックしたついでに微妙にドラッグになってしまっているために。
これはちがう。単なるクリックでも全選択は解除される。
イベントハンドラの発生順の問題。
もし微妙にドラッグしちゃった時でも全選択させたいならMouseUp。

フォーカスが元々ある状態の場合は全選択したくないということであれば、
フラグでEnter経由かどうか判断するのがいいかと思う。

あと、いちいち絡むなよ。


236:デフォルトの名無しさん
05/08/16 12:07:32
あー、ごめ。単にEnter経由で判断だけだと、
タブ移動後にクリックした時にも全選択になっちゃうわ。
なんかうまい方法ないかなぁ。


237:デフォルトの名無しさん
05/08/16 12:12:18
Private mouseEnter As Boolean = False
Private Sub TextBox_Enter(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Enter
Me.SelectAll()
If Me.MouseButtons <> MouseButtons.None Then
mouseEnter = True
End If
End Sub
Private Sub TextBox_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseUp
MyBase.SelectAll()
mouseEnter = False
End Sub


238:235-237
05/08/16 12:13:56
マウスクリックでのEnterかどうかを判断するようにしてみた。


239:デフォルトの名無しさん
05/08/16 12:14:22
>あと、いちいち絡むなよ。
馬鹿じゃないの。
「何も分かってないならだまってろ」
それを君に遠まわしに言ってるのに。。

240:デフォルトの名無しさん
05/08/16 16:31:55
なんだもっと煽り合いになるかと思ったのに過疎っちまいやがったつまらん

241:最凶VB厨房
05/08/16 17:02:40
次はもうちょっとうまいこと釣ってくれよ。

242:デフォルトの名無しさん
05/08/17 22:21:50
>>all
色々ありがとうございます。

MouseDownで実装してみましたが、これもClickと
同様、テキストボックスのテキストの一部だけを選択
することができなくなるという問題がありました。

>>237 オリジナルのテキストボックスを作るのかな?
面倒だから、そこまでは勘弁して欲しいな・・・。
VB.NETの継承とかコントロールの作り方はまだよく
分からないので。



243:デフォルトの名無しさん
05/08/17 22:34:07
>>242
ユーザーコントロール作るの意外と簡単だよ。
前にも書いたけど、例えばここで解説されてる
URLリンク(www12.plala.or.jp)

まあ実際には、ここの方法を応用してクラスライブラリ化した方が使いやすいと思う。

ユーザーコントロール作らないとしても、Tagにフラグ(mouseEnter)を食わせれば
ソースを必要以上に汚さずに>>237のやり方が使えると思う。

244:デフォルトの名無しさん
05/08/17 23:00:54
会社で作った.netのソリューションファイルを家に持ってきて開こうとしたら開けません。
家のは2002で会社のは2003なんですけど、全く互換性無いんですか?

245:デフォルトの名無しさん
05/08/17 23:03:31
2002のを2003のにするのはできるけど逆は無理。
一度2002のから2003のに変換したら逆変換は不可能。

246:237
05/08/18 00:20:27
>242
243に同意。テキストボックスが複数あるなら(というかあるだろうし)
絶対にユーザーコントロール作ったほうがいいと思います。
おんなじロジックを全てのテキストボックスに組み込むなんて
ありえないっすよ。

あと、237のですが、mouseEnterがイベントハンドラの名前と
かぶってます。ちゃんと見直してからうpしろよ俺。
とりあえず、他の名前にしてください。


247:デフォルトの名無しさん
05/08/18 17:13:45
VB.NETというよりAxWebBrowserの質問になるんですけど、
AxWebBrowserで表示されているPageからzipファイル等がResponse.Redirectされた場合、
ダウンロードが開始されるんですけど、そのダウンロードされているファイルのURLは取れますか?


248:デフォルトの名無しさん
05/08/18 18:12:00
普通にBeforeNavigate2とかで取れるだろ

249:247
05/08/18 21:15:24
実際に画面表示しないと取れないんですよ・・・。
zipとかのファイルであった場合、ダウンロードされるだけで画面表示されないので、
URLが変更されないみたい・・・。

250:デフォルトの名無しさん
05/08/18 21:27:33
変更?
AxSHDocVw.DWebBrowserEvents2_BeforeNavigate2EventにuRLプロパティが存在するが?

251:247
05/08/18 22:25:54
確かに存在するのですが、ダウンロードされるファイルのURLがuRLプロパティには入っていないんです。
nRLプロパティには現在表示しているURLが入っています・・・。

252:247
05/08/18 22:26:51
ひょっとして、Response.Redirectがだめなんですかね・・・?

253:デフォルトの名無しさん
05/08/19 00:05:39
リダイレクトが発生したときのリダイレクト先のURLはNavigateComplete2が一番早く取得できるみたいだね。
リダイレクトでダウンロードが発生するところを知らないから試せないが。
で、これがzipとかの場合AxSHDocVw.DWebBrowserEvents2_NavigateComplete2EventのuRLプロパティが正しく指さないってこと?
リダイレクトでhtml、直接zipはどっちも正しく指すんだけど。
//ん~、FileDownloadが発生しない……

254:デフォルトの名無しさん
05/08/19 06:54:28
VB.NETかVB6でできるだけ多くの環境で動くネットワークプログラムを作りたいんすけど
その場合VB6を選択すべきですか?
.NET FrameworkってXPでもデフォルトでインストールされてないし。

255:247
05/08/19 09:21:50
AxWebBrowser.Navigate2でzipファイルを指定するとNavigateComplete2.uRLで確かにzipファイルのURLが取得出来るんですが、
webForm1.aspxをNavigate2した後に、aspxのButton_ClickでzipファイルをResponse.Redirectしても
NavigateComplete2.uRLにはwebForm1.aspxのURLが入ってる状態です。
FileDownloadは発生しないですね・・・。


256:デフォルトの名無しさん
05/08/19 09:24:12
>>254
別にインストーラー作ればいいだけだし。
今更新規にVB6で作るって何考えてるのって思うし。

257:デフォルトの名無しさん
05/08/19 09:37:01
>>256
んだな。今更ocx入れるのマンドクセ。

258:デフォルトの名無しさん
05/08/19 13:50:47
別のPCのLAN上にIISがインストールされていれば
ローカルにIISがインストールされていなくても
ASPとかつくれますかね?

259:デフォルトの名無しさん
05/08/19 14:27:04
何作るかしらんが、作るだけなら作れるでしょ。
ASPってのが何指してるのか不明だけど。

260:デフォルトの名無しさん
05/08/21 06:12:21
>>69は天才だと思います。

261:デフォルトの名無しさん
05/08/21 07:17:27
>>254
本当に「できるだけ多くの環境で動く」事が優先されるなら、VB6もVB.NETも不可だろう。

VB6で作成した場合、Windows Vistaまでしか動作保障されない。
VB.NETで作成した場合、Windows95や98は切り捨てることになるな。

262:デフォルトの名無しさん
05/08/21 07:46:31
一応98は.NET動くぜ。

263:デフォルトの名無しさん
05/08/21 21:58:21

名前空間に漢字使ってますが問題ないですかね?
問題あったら教えてください。



264:デフォルトの名無しさん
05/08/21 22:06:07
少なくとも日本国内で開発する分には問題ないだろう。
実行には全く問題ない。

265:デフォルトの名無しさん
05/08/21 22:06:07
>>263
漢字を使うという頭が問題あり

266:デフォルトの名無しさん
05/08/21 22:09:45
現在Visibleプロパティがtrueになっているformを知りたいときって
どのようにしたらいいでしょうか?
If フォームA.Visible = True Then
 ~処理~
ElseIf フォームB.Visible = True Then
 ~処理~
 :
 :
みたいにif文やswitch文を書き連ねていくと、ソースが汚らしく思えるのですが。。。

267:デフォルトの名無しさん
05/08/21 22:11:57
ActiveForm/ActiveMdiChildとかそんなんじゃ駄目か?
ていうか何をどうやったらそんな判断が必要になるんだか。

268:デフォルトの名無しさん
05/08/21 22:26:40
ありがとうございます。
Form.ActiveFormで現在アクティブなフォームを表すFormが取得できるんですね。
if文やらswitch文よりすっきり書けそうですね。

269:デフォルトの名無しさん
05/08/21 23:19:32
>>264-265
サンクス。
楽に仕事がこなせるならそれで良いのです。

270:デフォルトの名無しさん
05/08/22 12:57:22
フォーム(Public Class WebForm1)にラベルがあります。
Public WithEvents Label1 As System.Web.UI.WebControls.Label

別モジュール(Module1)に関数(sub kan1)を作りました。その中で
Dim refForm1 As New プロジェクト名.WebForm1
というインスタンスを作りました。
で、refForm1.Label1.Text = "1"
とやると「オブジェクト参照がオブジェクトインスタンスに設定されていません」
と出ます。refForm1.Label1 ← ここでNothingになります。
なぜですか?

271:デフォルトの名無しさん
05/08/22 13:36:13
Newしてないからだろ

272:デフォルトの名無しさん
05/08/22 13:38:44
これじゃダメでしょうか?他のNewを思いつきません。
>Dim refForm1 As New プロジェクト名.WebForm1

273:デフォルトの名無しさん
05/08/22 13:50:51
いや、あのよ、何がNothingなのか考えろ?

274:デフォルトの名無しさん
05/08/22 14:16:49
横からでWebFormは知らんが、WebFormのインスタンスを生成しても、中のLabelのインスタンスが生成されてないんですよ。

Winformだと、コンストラクタからInitializeComponentが呼び出されてNewしてるんだけど、Webはしらん。しらべてみ。

275:デフォルトの名無しさん
05/08/22 18:41:54
テキストボックスでIMEが変換中かどうか取得する目的で
WndProcをオーバーライドしているのですが
スペースのみ入力してタブキーで次のテキストボックスに移ったときは
ENDCOMPOSITIONが来てくれません。

If m.Msg = &H10F Then 'WM_IME_COMPOSITION
bIMEmode = True
End If
If m.Msg = &H10E Then 'WM_IME_ENDCOMPOSITION
bIMEmode = False
End If

対策としてとりあえずKILLFOCUSでIMEモードのフラグを
OFFにしてみましたが、あまり美しくありません。
If m.Msg = &H8 Then 'WM_KILLFOCUS
bIMEmode = False
End If

スペースのみの場合はWM_IME_COMPOSITIONが飛んでこないように
するにはどうすればよいでしょうか?

276:デフォルトの名無しさん
05/08/23 00:20:20
え、飛んできてるんだけど>WM_IME_ENDCOMPOSITION
あとWM_IME_COMPOSITIONじゃなくてWM_IME_STARTCOMPOSITIONじゃないかなぁ

277:デフォルトの名無しさん
05/08/23 08:20:20
>>276
WM_IME_STARTCOMPOSITIONにしたら期待通りの動作をしてくれました。
ものすごく感謝です。

278:デフォルトの名無しさん
05/08/24 10:31:47
AccessのMDBからOelDbDataReaderを使用してデータを取得したいのですが、
OelDbDataReaderのループの中でもう1つOelDbDataReaderを実行すると
「この接続に関連付けられているDataReaderがすでに開いています。」とエラーになってしまいます。

OleDbConnectionを複数作成してコネクションを複数張れば出来ると思うのですが、
色々と不都合(トランザクションが作れないとか)がありそうなのでやりたくありません。

OelDbDataReaderをネストしない場合は正常にデータを取得できています。
下はエラーになるサンプルです。
何か根本的に間違えているのでしょうか?
よろしくお願いします。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  Dim DbConn As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\test.mdb")
  DbConn.Open()
  Dim dbCmd1 As OleDbCommand = DbConn.CreateCommand
  dbCmd1.CommandText = "select * from TEST_TAB "
  Dim dbReader1 As OleDbDataReader = dbCmd1.ExecuteReader()
  While dbReader1.Read()
    Trace.WriteLine(dbReader1("TEST_NO").ToString)

    Dim dbCmd2 As OleDbCommand = DbConn.CreateCommand
    dbCmd2.CommandText = "select * from TEST_TAB "
    Dim dbReader2 As OleDbDataReader = dbCmd2.ExecuteReader()  '← *** ここでエラー発生 ***
    While dbReader2.Read()
      Trace.WriteLine(dbReader2("TEST_NO").ToString)
    End While
    dbReader2.Close()
  End While
  dbReader1.Close()
  DbConn.Close()
End Sub

279:デフォルトの名無しさん
05/08/24 10:40:33
MSDNにしっかり

> OleDbDataReader の使用中は、関連付けられた OleDbConnection は、
> OleDbDataReader によって使用されるためビジー状態になります。
> この間、 OleDbConnection に対して、閉じる以外の操作は実行できません。
> OleDbDataReader の Close メソッドを呼び出すまでこの状態が続きます。
> たとえば、 Close を呼び出すまでは、出力パラメータは取得できません。

と書かれている。

280:>278
05/08/24 11:08:49
>>279
レスありがとうございます。
確かに解説の所に書いてありました・・・

皆様はDBからデータの取得中(OleDbDataReaderの使用中)に
他のデータを取得する場合どのように実現されているのでしょうか?

それともDataSetみたいに全データを取得してから次のデータを取得、
みたいな方法でやっているのでしょうか?
よろしくお願いします。

281:デフォルトの名無しさん
05/08/24 11:35:16
・順次、配列等に読み込む
・DataAdapter & DataSet を使う
・複数のコネクションを張る
・ストアドプロシージャを使う

282:デフォルトの名無しさん
05/08/24 11:47:56
>>281
ここの使用って改悪だよな。
バッチ的なテーブル処理に対して厳しいところがある。
ロックかけながらカーソル処理していくような処理で必ず詰まる。

283:デフォルトの名無しさん
05/08/24 11:51:23
ADO.NET 2.0では一つのConnectionから複数のDataReaderを同時に開くことができるようになるとどこかで聞いた。

284:デフォルトの名無しさん
05/08/24 14:30:05
接続ドライブのプロパティに表示されるようなドライブ固有の名前(例:Maxtor 6Y160P0)を取得する関数というのはあるのでしょうか?

285:デフォルトの名無しさん
05/08/24 14:35:07
WMI使えば?

286:284
05/08/24 14:43:56
>>285
ありがとうございます。ググってみます。

287:284
05/08/24 15:02:11
解決しました。ありがとうございました。

288:278
05/08/24 15:31:57
>>281-283
レスありがとうございます。
今のところ直接目的にかなう解決方法がないのですね。
それが分かっただけでも良かったです。

ADO.NET 2.0では可能になるみたいですね。
URLリンク(www.microsoft.com)
の「SqlClient における SQL Server 2005 固有の機能」に書かれていました。

「SQL Server 2005 固有の機能」と言っているだけに
SQL Server 2005だけのような気がしますが・・・

ありがとうございました。


289:284
05/08/24 18:54:36
すいません。再度質問させてください。
>>284にあるドライブ固有の名前の取得方法はわかったのですが
これとドライブレター名(例:C)とを関連付ける方法がわかりません。

Select * From Win32_DiskDrive
でドライブ固有の名前を

Select * From Win32_LogicalDisk
でドライブレター名を取得することはできたのですが・・・

290:デフォルトの名無しさん
05/08/24 19:47:54
まあ基本的に物理ドライブと論理ドライブはあんまり相関のないものだからねー。
Win32_LogicalDiskToPartition/Win32_DiskDriveToPartitionクラス辺りを使って頑張ればいけそうかな。

ん~、Win32APIでやろうとしたらどうだろ。
DeviceIoControlを駆使することになるのかな。
URLリンク(66.102.7.104)
とてもお薦めできなさそうだ。

291:284
05/08/24 19:50:01
>>290
ありがとうございました。これからぐぐります。

292:デフォルトの名無しさん
05/08/25 00:38:17
VBとVB.netの違いって何?

293:デフォルトの名無しさん
05/08/25 04:40:59
.net

294:デフォルトの名無しさん
05/08/25 11:19:54
DBMS_SQL.NUMBER_TABLEをパラメータに持つ
ストアドファンクションに
VBから配列を渡したいのですが
myOracleCommand.Parameters.Add()だと
InvalidCastExceptionが出ます。
どうやればよいのでしょうか?
私が書いたのはこんな感じです

myOracleConnection.Open()
myOracleCommand = New OracleCommand("sf_test", myOracleConnection)
myOracleCommand.CommandType = CommandType.StoredProcedure
Dim id(500) As Int32
~中略~
'コマンドパラメータ設定
myOracleCommand.Parameters.Add(id)←ここでInvalidCastException

295:デフォルトの名無しさん
05/08/25 11:50:25
ODP.NETだよね?
どちらかといえばデータベース板のOracleスレ向きな気もするけど。

PL/SQL表をバインドする場合、
OracleParameter.CollectionTypeを
OracleCollectionType.PLSQLAssociativeArrayにしないと駄目。

詳しくはOTNのODP.NET開発者ガイドを参照してください。


296:デフォルトの名無しさん
05/08/25 13:02:05
かなり初歩的な質問だと思うのですが・・・
ある処理中に処理中であることを示すウインドウを表示させたいのですが
どうにもうまくいきません。どのような方法が考えられるでしょうか?

297:デフォルトの名無しさん
05/08/25 13:05:19
抽象的すぎる質問だな。
どうやってみてどううまくいかないんだ?

298:295
05/08/25 13:19:55
今調べてみたらODP.Net入れてなくて
DBアクセスしてたんだけどこれは
ODBCなのかな?



299:デフォルトの名無しさん
05/08/25 13:22:21
>>296
まずWindowsFormsなのかASP.NETなのか書いてくれ。

300:294
05/08/25 13:28:56
>>295
調べたらOLE DB .NETでした・・・(しかも自分は294だしorz)
これでもやり方は変わらないのかしら?


301:デフォルトの名無しさん
05/08/25 13:38:15
>298
ちょいまて、295は俺だ。

てか、どのDataProvider使ってるかくらいは把握しといたほうが・・・。
ODP.NETじゃなく、.NET Framework Data Provider for Oracleだったとしたら
MSDNにPL/SQL表は使えないと書いてある。
使いたければMSDAORAと共に.NET Framework Data Provider for OLE DB使えってさ。


302:デフォルトの名無しさん
05/08/25 13:40:58
>>300
いや、Oracleが出してるやつじゃないと無理だと思う。

303:294
05/08/25 16:58:17
>>295、302
返事遅れましたが、とりあえず何とかなりそうです。
感謝感謝。

304:デフォルトの名無しさん
05/08/25 17:05:18
vb.netでoracleのあるテーブルからデータを取得し、
そのデータを新規で作成したmdbに登録したいのですが。
そのようなことは可能でしょうか?
よろしくお願いいたします。

305:デフォルトの名無しさん
05/08/25 17:20:04
そのようなことは可能です。
よろしくお願いいたします。


306:デフォルトの名無しさん
05/08/25 17:30:36
超初心者です。

PUBLIC:COMPONENT

で始まるのってなんですか?



307:デフォルトの名無しさん
05/08/25 17:42:45
vb.netでプロセス間通信の質問です。
現在WIN XP上でvb.net(単品)の環境。
プロセス間通信を行いたいのですが、ファイルマッピング、パイプ、メールスロットなどなどことごとく失敗します。
今は名前付きパイプに絞っているのですが、パイプをクリエイトしてもハンドルが返ってこないのです。
下記のように単純化したプログラムでもNGです。

宣言部に
Public Structure SECURITY_ATTRIBUTES
Public nLength As Integer
Public lpSecurityDescriptor As Integer
Public bInheritHandle As Integer
End Structure

Declare Auto Function CreateNamedPipe Lib "kernel32.dll" Alias "CreateNamedPipeA" ( _
ByVal lpName As String, _
ByVal dwOpenMode As Integer, _
ByVal dwPipeMode As Integer, _
ByVal nMaxInstances As Integer, _
ByVal nOutBufferSize As Integer, _
ByVal nInBufferSize As Integer, _
ByVal nDefaultTimeOut As Integer, _
ByRef lpSecurityAttributes As SECURITY_ATTRIBUTES _
) As Integer

ボタンクリックで
hpipe = CreateNamedPipe("\\.\pipe\test", &H3, &H80000000, 255, 1024, 1024, 5000, Nothing)

これでhpipeに「-1」しか返ってきません。正常に行うにはどうすればいいのでしょうか?
よろしくお願いします。



308:デフォルトの名無しさん
05/08/25 18:37:02
>>307
Declare構文のAutoが解釈間違ってるよ。
Autoを指定する場合、プラットフォームに従ってStringをAnsiかUnicodeにマーシャリングする。
つまりNT系ならUnicodeで関数に渡される。
ところが実際に呼ぶ関数をAliasでCreateNamedPipeAとAnsi版を呼んじゃっている。
Ansi版は与えられたバイト列を当然Ansiとして解釈するから、&h00がすぐに見つかってしまって使用不能の文字列になってしまう。
解決法は
・Autoの代わりにAnsiを使う
・AliasをCreateNamedPipeにする(プラットフォームによって呼ばれる関数が実行時に切り替わる)
・Aliasを指定しない(プラットフォームによって呼ばれる関数が実行時に切り替わる)

それから、最後のパラメータSECURITY_ATTRIBUTEも。
ByRefは参照渡しなのは分かるよね。
Nothingは、構造体(Structure)の場合全てのフィールドが0のインスタンスを表す。
だからNothingと言いつつ実際にはnullではなく、結果として関数に新しく作られた構造体インスタンスのアドレスが渡ってしまってるわけ。
こういう場合、パラメータを
ByVal securityAttribute As System.IntPtr
と宣言して、IntPtr.Zeroを渡すのが良い。これはC/C++においてNULLポインタを渡すことと同義の行為。

あと、ハンドルの類はInteger(System.Int32)よりもSystem.IntPtrで宣言した方が良いよー。

309:デフォルトの名無しさん
05/08/26 00:21:18
>>308
レスサンクス
いやぁ、いろいろ見直すべきところが多くてお恥ずかしい。
破れかぶれでいろいろ変えてみて、元に戻し忘れてたところとかもあるし。
明日、早速試してみます。
ありがとうございます。


310:デフォルトの名無しさん
05/08/26 03:18:22
ソートツールを作りたいので可逆ソートがしたいです。
自分としてはBlockSortingがしたいです。
アルゴリズムは分かるのですが、実装方法がいまいちわかりません。

311:デフォルトの名無しさん
05/08/26 03:39:47
アルゴリズムが分かるならあとはそのまま実装するだけじゃないか

312:310
05/08/26 03:49:31
実装がC++ではできますがVB.NETではなぜか出来ません。

313:デフォルトの名無しさん
05/08/26 06:35:30
VisualStudio.NET2003 を手に入れて、
VB.NET でちょっとした GUI ソフトを作りますた
それを別の PC で起動しようとしたら、何やらが見つからないといって動きません

要するに .NET Framework をインスコしないと動かないということだと思っておりまつ
おいらの PC ではないので、できればインスコしないで動けばありがたいのでつが、
何か方法はありまつか?
そもそも、VB.NET の GUI ソフトで .NET Framework を入れなくても動くものは作れまつか?

314:デフォルトの名無しさん
05/08/26 07:32:07
無理 入れろ

315:デフォルトの名無しさん
05/08/26 11:19:29
最近VBを使うようになって、クリック連打するソフトを作りたいと思ったのですが
マウスクリックをする命令が見つかりません。
どうやったらできますか?

316:デフォルトの名無しさん
05/08/26 11:30:07
画面上の好きなところをクリックしたいというのならWin32API。
SendInput関数かmouse_event関数。

317:デフォルトの名無しさん
05/08/26 12:06:38 BE:113897873-##
>>315
MouseDownとか

318:デフォルトの名無しさん
05/08/26 14:45:19
ありがとうございます。
思ったより大変そうだけどがんばってみます。

319:デフォルトの名無しさん
05/08/27 17:11:57
かなり、初歩的な質問だと思うのですが、
変数を宣言した時にクラス名の後ろの()
を記入しても消えてしまうのですが、なせなんでしょうか?
たとえば、、、
dim A as new frmLogon()

dim A as new frmLogon
になってしまうのですが。
何が原因なのでしょうか?


320:デフォルトの名無しさん
05/08/27 17:45:29
配列宣言したいのか?

321:デフォルトの名無しさん
05/08/27 17:51:53
>>320
いや別に配列宣言とは関係ないだろ。
引数無しのコンストラクタメソッド呼出を明示してるだけで。
C#とかだと必須だからなー。
//メソッドの括弧と配列の括弧が同じなのはややこしい……。

>>319
まあVBからのクセなのであまり気にしない。

322:デフォルトの名無しさん
05/08/27 18:18:40
>>321
ありがとうございます。
括弧はあってもなくても動きは変わらないと考えてよろしいのでしょうか?


323:デフォルトの名無しさん
05/08/27 21:30:11
Formデザイナに関する質問なんですが、TabPageコントロールを使っていると、
最初のタブページ以外のタブページ内のコントロールをデザインしていると
マウスポインタが各タブページのクライアント領域から外に出られなくなったり、
Formデザイナのコンテクストメニューが「コードの表示」以外の項目が
全部無効になったりする症状が出て困っています。

これって何か解決法ご存知ないでしょうか?
# どうもこの症状は環境依存というか、どの環境でも再現するわけではないみたいですね。

324:デフォルトの名無しさん
05/08/28 01:39:08 BE:54237825-##
RAM少ないんじゃない?

325:さとみん。
05/08/28 14:16:48
VB6.0のツールバーのプロパティーにはHotTracking(?)があったのですが、VB.NETではなくなってし
まいま
したよね?ボタンの外観を変更できるプロパティーです。

ツリーノードのプロパティーには、HotTrackingが設けられています。
ツールバー上のアイコンにマウスポインタが配置された時、ボタンの外観を変更する方法はありませ
んか?

分かりにくい説明で申し訳ありませんが、お願いいたします。

326:デフォルトの名無しさん
05/08/28 20:55:09
test

327:デフォルトの名無しさん
05/08/28 21:05:04
>>325
いまいち質問が明示的じゃない気がする。
On Mouseでボタンの画像を変えたいってこと?
それはそういうコードを書くしかないよ。
ToolBar自体の機能としてはビルトインされてないから。

328:デフォルトの名無しさん
05/08/28 21:14:21
>>327
流せ。転載だから。
他でそれなりに詳しい解答貰ってるからして本人でもなかろうし。

329:デフォルトの名無しさん
05/08/29 10:12:57
vb.netの質問というよりvs.netの質問なのですが、
現在VS.NET2003のVB.NETを使っています。
.NET Frameworkのバージョンが1.0だったのですが、1.1の機能を使いたかったので
1.1のもろもろをダウンロードしてインストールしました。
しかし、VB.NETのヘルプにあるMicrosoft Development Environmentのバージョン情報にある
.NET Frameworkのバージョンが1.0のままで当然1.1の機能も使えません。
1.0があるせいかとも思い1.0をアンインストールしてみましたが、バージョンは変わらず
プログラムすることすらできなくなりました。
ただインストールするだけじゃだめなんでしょうか?
それとも何か根本的な勘違いをしているのでしょうか?

330:デフォルトの名無しさん
05/08/29 10:18:19
うん。
2003じゃ.NET 1.1の開発しかできない。2003を入れたときに自動的に.NET 1.1がインストールされる。
逆に2002では.NET 1.0の開発しかできない。2002を入れたときに自動的に.NET 1.0がインストールされる。

あなたの環境は矛盾している=何らかの勘違いが存在している。

331:デフォルトの名無しさん
05/08/29 10:23:29
>>330
今パッケージをよく調べたら2002と書いてましたorz
何を勘違いしていたのかずっと2003だとばかり思ってました。
ということは.NET 1.1は使えないのですね。
ありがとうございます。

332:デフォルトの名無しさん
05/08/30 00:45:34
すみません、VBで作ったGUI上からコマンドシェルの結果って取得できますか?
単純に
"ping 10.10.10.10"
ってStringを与えて、結果を取得する方法があればご教授ください。

333:デフォルトの名無しさん
05/08/30 00:55:11
System.Diagnostics.Processクラス

334:デフォルトの名無しさん
05/08/30 11:36:00

「管理ツール」の「データソース(ODBC)」のシステムデータソースに登録したデータソースに、ADO.NETを使って、システムデータソースの名前でアクセスしたいのですが、どうしたらいいのでしょうか?
ユーザーによってデータベースも異なります。
よって、データソースに名前でアクセスできるような方法をご存じないでしょうか?
よろしくご教授願います。


335:デフォルトの名無しさん
05/08/30 16:28:53
VB6のコード画面で [CTRL] + [↑] で一つ上のプロシージャに移動できた
はずなんですが、VB.NETで同様のことができるキー操作はないでしょうか?

336:デフォルトの名無しさん
05/08/30 18:21:28
すいません。学生でVisual Studio.net the Spokeのサイト
URLリンク(jp.thespoke.net)が落ちてるのですが
なぜでしょうか?

337:デフォルトの名無しさん
05/08/31 12:54:22
質問です。
OS:win xp
バージョン:VB.net
です。よろしくお願いします。

ピクチャーボックスを一つ用意して、もう一つをコントロール配列でその上にかぶせます。
そしてコントロール配列のほうのピクチャーをシャッターとし、タイマーで管理して開閉させます。
手動で用意したほうのピクチャーにはイメージリストから当たりとはずれの2種類をランダムで
選んできます。そしてキーダウンを有効にさせて、シャッターがあいていて、かつ、ピクチャーが当たり
の場合、tensuuを1足しこむ処理をしたいのですが、連打するとtensuuが何度も足しこまれてしまいます。
その・・・理由はわかっているのですが、どうすれば回避できるかがわかりません。
一回目に打鍵した直後にDo eventsで空ループを入れてみてもだめでした。
かといってスリープにすると他の処理まで止まってしまうと考えられるので試していません。

もう一つ考えたのは、打鍵した直後にフラグを立ててキーダウンを無効にし、そしてDo eventsで空ループを
適当にまわし、ループ終わった後にフラグを戻してキーダウンを有効に戻す。という方法ですが、
ちょっと今エラーが出てしまっています・・・。デバック中です。

でもなんかこう、ピンときません。よい解決方法をご教授いただけないでしょうか。
お願いします。

338:デフォルトの名無しさん
05/08/31 13:04:05
キーダウン>フラグ立てる>加点もろもろの処理>画像を変更するときにフラグおろす
で何か問題でも?
なんでDoEventsだのが出てくる?

339:デフォルトの名無しさん
05/08/31 14:49:26
質問です。
DirectPlayを使用したソフトを通信ソフト作ったのですが、DirectX 9.0c Runtimeだけをインストールしているユーザーだと、使用することが出来ません。
調べてみると、9.0a以降のバージョンでは、必要なファイルがインストールされない仕様に変更になっているようで、、、
ユーザー側で、別途「Managed DirectX」をインストールするか、SDKの方をインストールしてもらわないと使えないみたいな感じです。

セットアッププロジェクトでインストーラーを作成すれば、不足しているファイルもユーザー側の方にもインストールされるでしょうか?

340:デフォルトの名無しさん
05/08/31 23:33:17
基本的な質問ですまんです。
プロパティって、オーバーロードできないんでしょうか?

Dim _number as Integer

Property Number() As Interger
 (Get略)
 Set(ByVal Value As Integer)
  _number = Value
 End Set
 Set(ByVal Value As String)
  _number = Integer.Parse(Value)
 End Set
End Property

みたいなことをやりたいわけなんですが。
オーバーロードしたけりゃ、SetNumber()みたいなメソッドを作らないとダメ?

341:デフォルトの名無しさん
05/08/31 23:35:14
Overridable

342:デフォルトの名無しさん
05/08/31 23:43:50
ってオーバーロードか。
Integer型のNumberプロパティにStringを代入できちゃ拙いだろう。
引数付きプロパティの引数違いのオーバーロードならできるけど。

343:デフォルトの名無しさん
05/08/31 23:51:59
thanx.
まあたしかに、class.Number = "774" なんてできたらマズそうですな。
素直にclass.SetNumber("774") みたいなメソッドにしときます。
(実際は単純な型変換だけじゃなくて、すこしロジックが入ります)

344:デフォルトの名無しさん
05/09/01 19:09:06
ASP.NETのResponse.FilesからHttpPostedFileを
For Each文を使って取り出したいんですが
キャストが有効でないといわれてしまいます

解決方法ってありますか?

345:デフォルトの名無しさん
05/09/01 19:09:44
VBコード内に記述するSQLについては。。。。

やっぱ、ここではなくてSQLスレだよね?

346:デフォルトの名無しさん
05/09/02 00:15:30
XP端末でVB.NETのアプリを起動したところ、例外が発生し悩んでいます。
ShowDialogで下記のようにフォームを表示しています。
フォームA→フォームB→フォームC
フォームC表示時にEnterキーを押下すると
System.InvalidOperationExceptionが発生します。
例外の内容としては、フォームC表示時にも関わらず、
フォームA内のフォームB起動ボタンがクリックされたイベントが発生し、
フォームBは表示済みなのに再度表示しようとしたために例外が発生した、というものでした。
しかし、ShowDialogで他の画面を表示しているのに
フォームAでイベントを拾うっていうのは本来ありえないはず、ですよね?

それが起きちゃうってことは、コーディングが間違ってるんですよね・・・
コーディング以外の要因でありがちな問題ってあるでしょうか。
あまりにもわからないので
「まさかFramework自体がバグッテルのでは?」なんてあるわけないことを疑うようにまでなってます・・・

347:デフォルトの名無しさん
05/09/02 00:44:54
>>346
もうすこし他人が読んで意味わかるような文章書かないと
誰も助言のしようがないよ。

とりあえず意味が読み取れる範囲で応答すると、
フォームBのボタンクリックのイベントハンドラでモーダルなフォームCを表示しているのなら、
フォームCでキャッチされてない例外が発生すれば、例外はフォームBのボタンクリックの
イベントハンドラまで遡ってくるんじゃないの?

348:最凶VB厨房
05/09/02 01:04:52
>>344
For Each文を使わない。
1個1個取り出せ。
>>345
対象DBサーバ。データベース名、テーブル名、カラム名、型、制約
OS、.net frameworkのバージョンなどの中で必要最小限のものを
全部書くならこのスレで質問しても問題はない。
返答があるかはわからんが。
>>346
コードさらせ。例外メッセージ全部さらせ。

349:最凶VB厨房
05/09/02 02:25:21
>>344
Request?AllKeysがあるぞ。

350:質問房 ◆v.TAYcWkbs
05/09/02 11:54:21
質問させてくだされ。

strSQL = "select " & _
" 伝票年月 as 入出庫年月," & _
" 得意先名称," & _
" 得意先コード," & _
" 部品番号," & _
" 部品色," & _
" 部品名" & _
" from " & _
" dbo.E_入出庫" & _
" where " & _
" 事業所 =" & data_factoryCD & " and " & _
" 伝票年月 =" & data_yymm & " and " & _
" 得意先コード = '" & costormerCode & "' and " & _
" 部品番号 = '" & data_partsnumber & "'" _
'" 部品色 = '" & data_partsColor & "'"
If data_partsColor <> "" Then
strSQL &= " and 部品色 = '" & data_partsColor & "'"
End If (ここでブレーク)

今、TESTサーバーでテーブル作成して、そのテーブルからデータを読んでいます。
検索先テーブルにはselectの対象になる部品が存在しています。
EndIfにブレークポイントを設定。デバッグ開始~ウオッチにて確認~SQLに
条件式をコピー。

(次に続く)

351:質問房 ◆v.TAYcWkbs
05/09/02 11:56:31
SELECT 伝票年月 AS 入出庫年月, 得意先名称, 得意先コード, 部品番号, 部品色,
部品名
FROM E_入出庫
WHERE (事業所 = 8) AND (伝票年月 = 200504) AND (得意先コード = 'xxxxxx') AND
(部品番号 = 'xxxxxxxxx')

と、SQL(エンタープライズマネージャー)では指定した部品内容が表示される。
しかし、VBの実行結果では表示されない。
この検索項目内容に部品の色があります。
SQL文で示す様に検索時、部品の色は絶対条件にしてません。色在り部品と無し部品在るからです。
色無部品を検索するとテーブル内にあるにもかかわらず検索されない。
色付の部品で実行するとVBの処理結果はOK。
これは何が原因と思われるでしょうか???

実行環境
OS:W2K-sp4
VS.NET2003//VB.NET 69516-006-0172567-18781
Framework 1.1(1.0も一緒に入っています)

352:デフォルトの名無しさん
05/09/02 16:02:25
関連のある複数のテーブルのいっぺんに消す方法ないでしょうか?
やりたいイメージはこんな感じです。

delete from (select * from a, b where a.id = b.id and a.last_date < '20050902')

もちろんこんなSQLは実行できませんが・・・



353:デフォルトの名無しさん
05/09/02 16:16:02 BE:32542823-##
>>348
トンクスコ
ググって見てもFor Eachでまわしてるサンプル見かけないので
出来ないようですね・・・
バグなのかなぁ・・・

354:デフォルトの名無しさん
05/09/02 16:17:49
>>352
CREATE TABLEの時にきちんとON DELETE CASCADEを設定してれば幸せになれるかも

355:デフォルトの名無しさん
05/09/02 16:24:04
>>353
サンクスコ

>>354
うほ!
ちょっと調べてみます。

356:デフォルトの名無しさん
05/09/02 23:36:50
>355
354さんの助言は、ALTER TABLEの時にも有効。
# M$ SQL Serverだよね?

357:最凶VB厨房
05/09/02 23:54:21
>344

  Private Sub Submit1_ServerClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Submit1.ServerClick
    Dim hpf As HttpPostedFile
    Dim s As String
    For Each s In Page.Request.Files.AllKeys
      hpf = Page.Request.Files.Item(s)
      Console.WriteLine(s)
    Next
  End Sub
Submitボタン配置サーバコントロール化
File Field配置サーバーコントロール化


358:最凶VB厨房
05/09/03 00:14:56
>>350-351
よくわからんぞ。ウォッチで何を確認したんだ?
部品色がないときは空文字列なんだよな?nullじゃねぇよな?
data_なんとかは型はなんだ?String型か?
カラムの型はなんだ?さっぱりわからんぞ。
VBの実行結果では表示されない。ってどういうこった?
何に表示させてんだ?さーーーーーーっぱりわからんぞ。
とりあえずSQL文削って試せ。
>>352
ストアドトリガっちゅう手もあんぞ。ゴルァ!!!!!!!!!!!

359:最凶VB厨房
05/09/03 00:18:05
>>350-351
ってかプライマリキーはってんのか?
@はどうした?わけわからんぞ。

360:デフォルトの名無しさん
05/09/03 23:44:10
複数行のインデントはどうやるのでしょうか?
<編集>の行インデントがグレーアウトになって選べないのですが?

361:最凶VB厨房
05/09/03 23:56:52
ツール→オプション→Basic→タブ
インデント→スマート以外

362:最凶VB厨房
05/09/03 23:59:39
×ツール→オプション→Basic→タブ
○ツール→オプション→テキストエディタ→Basic→タブ

363:デフォルトの名無しさん
05/09/04 00:17:15
>>362
できました。。
ありがとうございます。

364:デフォルトの名無しさん
05/09/05 02:12:51
質問です。
内容は、既に起動しているエクセルに対して,vb.netで作成したアプリケーションから
セルに数値を記入するにはどうすればいいか、です。
やりたいことは、エクセルマクロ(VBA)からvb.netで作成したアプリケーションを呼び出し、
その処理結果を呼び出し元のエクセルのセルに書き込みたいのです。

今現在は、参照の追加でExcelObjectLibraryを追加し、
Dim xlApp As New Excel.Application
・・・
な感じで指定しています。
問題は、エクセルファイルを指定するときに
Dim xlBook As Excel.Workbook = xlBooks.Open(ファイル名)
とやると、元々そのファイルが起動しているため、2重に起動してしまいます。
新たにopenせずに、既に起動しているファイルを指定してやるにはどう
すればよいでしょうか?
(元々そのエクセルのVBAから呼び出しているため、そのエクセルが起動していることは
保証されている)


ちなみに起動していないエクセルのセルへのアクセスは成功しています。



365:デフォルトの名無しさん
05/09/05 02:18:41
こんなの?
URLリンク(www.google.co.jp)

366:デフォルトの名無しさん
05/09/06 14:33:26
タブコントロールを使ってプログラムを作っています。
選択されているタブによって処理内容を変えるようなプログラムです。
そのために、現在選択されているタブを取得するようなプロパティやメソッドがあれば知りたいのですが、どなたか、ご存じないですか?
よろしくご教授願います。


367:デフォルトの名無しさん
05/09/06 14:34:39
ちょっとはTabControlのプロパティ&メソッドに目を通してみたのか?

368:デフォルトの名無しさん
05/09/06 16:29:41
RTFM

369:デフォルトの名無しさん
05/09/06 17:47:56
>>366
ええええええええ?????????

370:デフォルトの名無しさん
05/09/06 18:25:42
ΩΩ Ω

371:デフォルトの名無しさん
05/09/06 18:41:43
釣りだよな?
ご存知もなにも、普通にやってれば気づくと思うんだが・・・。


372:デフォルトの名無しさん
05/09/07 14:03:42
タブコントロールを使ってプログラムを作っています。
選択されているタブによって処理内容を変えるようなプログラムです。
そのために、現在選択されているタブを取得するようなプロパティやメソッドがあれば知りたいのですが、どなたか、ご存じないですか?
よろしくご教授願います。

373:デフォルトの名無しさん
05/09/07 16:24:25
URLリンク(www.grapecity.com)
コレみたいに、複数列表示できるツリービューを.netで実現したいんですけど・・・
どーすればいいんでしょうか。

374:デフォルトの名無しさん
05/09/07 16:54:00
取りあえず見つけてみた
URLリンク(www.codeproject.com)

375:デフォルトの名無しさん
05/09/07 19:47:21
初歩的な質問ですみません
dir()で「ディレクトリ以外」って指定はどうするんでしょ?
vbnormal+vbreadonlyとかやったら「readonlyなディレクトリ」も引っかかるんですけど…

376:デフォルトの名無しさん
05/09/07 20:05:21
System.IO名前空間、DirectoryクラスのGetFilesメソッド使ったら?

377:デフォルトの名無しさん
05/09/07 21:39:17
>>372

>>367->>371


378:デフォルトの名無しさん
05/09/07 21:59:11
>>376
むう、やはりそれしかありませんか…
どもでした

379:デフォルトの名無しさん
05/09/07 23:50:08
デザイン時にマウスクリックでコントロールを移動できるように、
実行時でも、コントロールをマウスクリックで移動
ということは出来るのでしょうか。

実行時、iniファイル等から各画像の x,y を読み込み描画、
マウスで編集して、配置を保存、というようなことを目的としています。

380:デフォルトの名無しさん
05/09/08 00:13:03
>>379
URLリンク(dobon.net)

381:デフォルトの名無しさん
05/09/08 19:43:52
超初心者です。質問です。XP HomeでVB.NET2003を使っています。

COMからMicrosoft Web Browserを追加し、
 AxWebBrowser1.Navigate("URLリンク(www.yahoo.co.jp)")
のようにしてForm起動時にWeb表示させています。
VB.NETの「開始」(F5)だとうまくいくのですが、
Releaseとしてビルドし、
\obj\Releaseにあるexeを起動させようとするとうまくいきません。

例外 'System.IO.FileNotFoundException' が WindowsApplication4.exe で発生しました。

とのエラーメッセージが出て、これをデバックしようとすると

'System.IO.FileNotFoundException' のハンドルされていない例外が WindowsApplication4.exe で発生しました。
追加情報 : ファイルまたはアセンブリ名 AxInterop.SHDocVw、またはその依存関係の 1 つが見つかりませんでした。

とのメッセージが出ます。

なにをどうすれば解決するのでしょうか。。。
よろしくお願いします<m(__)m>

382:デフォルトの名無しさん
05/09/08 20:05:47
\objじゃなくて\bin。
\objは中間ファイル用のディレクトリ。

383:長谷川友よ
05/09/10 11:04:04
ド・ラ・ルーブルの方法の3×3のプログラムが書けないんですが教えてもらえます?
vb.net2003です

384:デフォルトの名無しさん
05/09/10 11:06:47
宿題は自分でやらにゃいかんよ。

385:デフォルトの名無しさん
05/09/10 15:58:53
初心者ですみません。
c++ でAVIファイルを開きたいのですが、さっぱりわかりません。
DirectShowあるいはVideo for Windowsを使うのでしょうか?

386:デフォルトの名無しさん
05/09/10 16:23:56
>>385
VBとC++の区別もできない馬鹿に何を言うことがあろうか

387:名無しさん@そうだ選挙に行こう
05/09/11 02:54:26
Windowsのソフトでフォルダーを選択するダイアログが出てくるやつありますよね。
あれはなんていう名前のコントールなんですか?
それともVB.NETだと使えないの?


388:名無しさん@そうだ選挙に行こう
05/09/11 02:55:37
#include <stdio.h>
#include <stdlib.h>
main(){
int a[15][15],i,j,k,n;
printf("奇数の魔方陣\nn = ");
scanf("%d",&n);printf("\n");
if(n<0 || n>15 || n%2==0) {
printf("1~15の奇数やでぇ~.\n");
exit(1);
}
i=0;
j=n/2;
a[i][j]=1; //手順1第1行中央列に1
for(k=2;k<=n*n;k++){
if(k%n==1) { i++; } //手順3真下に書く
else if(i==0) { i=n-1; j++; } //手順41つ右の列の最下段
else if(j==n-1){ i--; j=0; } //手順51つ上の行の最左端
else { i--; j++; } //手順2次の数字を右斜め上
a[i][j]=k;
}
for(i=0;i<n;i++){
for(j=0;j<n;j++){
printf("%4d",a[i][j]);
}
printf("\n");
}
printf("\n要素の和=%d\n",n*(n*n+1)/2);
}




389:名無しさん@そうだ選挙に行こう
05/09/11 02:56:08
URLリンク(home.hamamatsu-u.ac.jp)

390:名無しさん@そうだ選挙に行こう
05/09/11 03:00:37
>>387
.NET 1.1から追加された、System.Windows.Forms.FolderBrowserクラス。
.NET 1.0/VS.NET2002(VB.NET2002)ならちと手間がかかるが
URLリンク(support.microsoft.com)

391:名無しさん@そうだ選挙に行こう
05/09/11 11:17:14
>>390
ありがとうございました。
メッセージが英語なのと初期フォルダーが一部しか選べないのがちょっと残念。

392:名無しさん@そうだ選挙に行こう
05/09/11 11:37:10
TreeViewの再表示で質問なのですが
.Nodes.Clear()で全てのノードをクリアし、再度ノードを追加して再表示させている画面があります。
その時にクリアのアニメーション効果をなくす事はできないでしょうか?

Windowsの画面のプロパティでアニメーションの効果をOFFにすればいいのですが、
インストールする全パソコンの設定を変更するわけにもいかず困っています。

表示する内容がDBのモニタ情報なので、再表示する前と後で情報が大きく変わってしまうこともあり、
部分的な再表示は難しいと考えています。

何か良い方法は無いでしょうか?
よろしくお願いいたします。

393:名無しさん@そうだ選挙に行こう
05/09/11 19:05:12
質問です。
作ったDLLをEXEファイルと別の場所に置きたいんですけど、
コンパイルするときにその場所が決まってません。

実行したときにユーザーにパスを指定させる形にしたいんですけど、
そのDLLをEXEに関連づけるにはどうすればいいですか?

パスを通そうと思ってProccess.Start("set path=c:\aaaa")とかやってみたら、
実行ファイルじゃないのでだめだと言われました。

いい方法があったら教えてください。


394:最凶VB厨房
05/09/11 19:51:15
>>393
どぼんのサイトのどこかに
プラグインがどうたら解説したページがある。
メルマガの方だったかな。
探してくれ。
それかGACにインストールとかもあるか。
やったこたぁねぇからやってみて報告よろ。

395:デフォルトの名無しさん
05/09/12 13:08:41
>393

Path通すなら、
CMD /C "set path=c:\aaaa"
を実行しては?

詳しくはCMDのヘルプを

396:デフォルトの名無しさん
05/09/12 23:58:56
>>392
BeginUpdate/EndUpdateメソッドはどう?

>>393
メインになるプロジェクトのapp.configの
<configuration>
  <runtime>
    <assemblyBinding>
      <dependentAssembly>
以下の
        <assemblyIdentity>
        <codebase>
の二つの要素を書くことで実行時にバージョンリダイレクトできるんだが、
sn.exeを使って厳密名をつけてやれば、
codebase要素のhref属性で絶対パス指定や自身のディレクトリよりも上のディレクトリを相対パス指定したりできるようになる。

この一連の記事を読んでみると色々勉強になる。
URLリンク(www.atmarkit.co.jp)

397:最凶VB厨房
05/09/13 01:38:19
ほー( ..)φメモメモ

398:デフォルトの名無しさん
05/09/13 13:27:12
質問です。
ASP.NETWebアプリケーションを作成しているのですが。

[モジュールにて以下のようにクラス変数をPublic変数を宣言しました。]

Module AAA

Public g_HHH As clsHoge1

End Module


[ページクラスにて、いろいろ設定します。]

g_HHH.iParam1 = 1
g_HHH.strParam2 = "ABC"
:


この状態にて、
Webサーバマシンに、異なるクライアントマシン2台から作成したページにアクセスします。
[マシンA] ページアクセス

[マシンB] ページアクセス

[マシンA] 同じページにポストバックすると、マシンBで設定した値がg_HHHに入ってしまっています。

[マシンA]のアクセスと、[マシンB]のアクセスで、Module内のPublic変数をそれぞれ別々に持つことってできないんですか?


399:デフォルトの名無しさん
05/09/13 13:45:10
DateTimePickerコントロールで、カレンダーを表示させるメソッドは無いでしょうか?

400:デフォルトの名無しさん
05/09/13 16:44:04
>>395
おお!CMDですね。助かりました!

401:デフォルトの名無しさん
05/09/13 16:47:13
そして9x系で例外

402:デフォルトの名無しさん
05/09/13 16:49:11
そもそも.NETではPATHとは無関係にアセンブリを探索するんだが。

403:デフォルトの名無しさん
05/09/13 17:44:39
デバック時にフォームの起動位置を画面右上にしたいのですが、
どうすればよろしいのでしょうか?

404:デフォルトの名無しさん
05/09/13 17:52:08
#IF DEBUG
Me.StartPosition = FormStartPosition.Manual
Me.Location = New Point(任意の位置)
#ENDIF

405:デフォルトの名無しさん
05/09/14 12:01:05
DefaultValueでEnumを指定したいのですが
<DefaultValue(GetType(enmAAA), "2")>
とかにするしかないのでしょうか?
"2"がちょっといやなのですが・・・

406:デフォルトの名無しさん
05/09/14 12:34:12
何故2?
普通にメンバ名書けば良いんだが。
GetType(Keys), "F10"
とか。

407:405
05/09/14 13:12:41
>406
出来ました。

もう一点。
リセットができません。
Reset<Property>の実装は呼ばれないみたいです。


408:デフォルトの名無しさん
05/09/14 13:41:05
それは
URLリンク(www.microsoft.com)
と言う話か。

> メモ   DefaultValueAttribute を適用するか、
> または ResetPropertyName メソッドと ShouldSerializePropertyName メソッドを指定します。
> この 2 種類の操作を同時に実行しないでください。

と書いてあるが。

409:405
05/09/14 16:21:36
>408
Enumだと
ResetPropertyName メソッドと ShouldSerializePropertyName メソッド
が呼ばれないみたいなんですよ・・・

410:デフォルトの名無しさん
05/09/14 16:28:43
呼ばれてるよ。
DefaultValue属性消せば。

411:デフォルトの名無しさん
05/09/14 16:45:50
>410
ダメです。呼ばれません。
コードがダメなのでしょうか?

Public Shadows Property HighlightText() As GrapeCity.Win.Input.HighlightText
Get
Return MyBase.HighlightText
End Get
Set(ByVal Value As GrapeCity.Win.Input.HighlightText)
MyBase.HighlightText = Value
End Set
End Property

Public Function ShouldSerializeHighlightText() As Boolean
Return Not MyBase.HighlightText.Equals(_DefaultHighlightText)
End Function


412:デフォルトの名無しさん
05/09/14 17:25:10
ん~、どうやら基底クラスのプロパティをShadowsで隠蔽した場合、
ShouldSerialize/Resetは基底クラスのが優先されちゃうようだねぇ。

逃げ方としては、ShadowsしたプロパティをBrowsable(False)で修飾して見せなくした上で、
似た名前のプロパティを作ってそっちでShouldSerialize/Resetを実装する、くらいかなぁ……。

413:405
05/09/14 18:17:04
>412
なるほど・・・

やっぱ別プロパティにしないとダメですね。
ありがとうございました。

414:デフォルトの名無しさん
05/09/15 01:18:37
VB6のファイルアクセス(ランダムアクセスとバイナリアクセス)に相当する機能って
クラスライブラリにはないでしょうかね?

具体例でいうと、例えばSingle型の配列を逐次ファイルに追記したり、
そうして作成したファイルをSingle型の配列に一挙に変換したり、
任意の位置のSingle型のデータにアクセスしたり、といった処理が
実現できるクラスはないだろうかということです。

いや、互換性ライブラリにVB6と互換性のある関数があるのは知っていますが
できればクラスライブラリの方を使いたいので。

415:デフォルトの名無しさん
05/09/15 01:28:58
System.IO名前空間下のクラスを舐めるように見ていったら?

416:932
05/09/15 06:04:44
>>396
レスを貰っていることに気がつきませんでした。ごめんなさい。

BeginUpdate/EndUpdateで目的のことが出来ました!
ありがとうございます。


417:デフォルトの名無しさん
05/09/15 09:41:38
>>414
ハァ?テンプレ読めないのか?
メクラなのか?池沼なのか?
どちらにしても君にはプログラム無理だから^^
施設に帰りなさい。ね?

418:414
05/09/15 12:23:41
>>415
舐めるように見ましたが、該当するクラスは見当たらないようですが。
ご自分が見てないんじゃないの?ひょっとして。

>>417
なんだコイツは。

419:デフォルトの名無しさん
05/09/15 12:35:14
探し方が下手かクラス名を見ただけか探してないかのどれかだ。

420:414
05/09/15 12:40:49
>>419
口調が偉そうな奴ってどうして例外なく無能なんだろう。
へえ~、そうなんだ。

じゃあ試しに次のコードを例示してみてもらえますか?
いや、できないなら無理することないですけどね。

■ Single型の配列を引数にとって既存のバイナリファイルに追記するメソッド

■ バイナリファイルのファイル名を引数にとって、それをSingle型の一次配列に
変換したものを返すメソッド。


421:デフォルトの名無しさん
05/09/15 13:10:36
ライブラリを探せもしない低能は煽りも下手らしい

422:デフォルトの名無しさん
05/09/15 14:47:22
>>414
聞いてる立場なら煽るんじゃなくて無視しろよ
答える気、無くすな・・・

423:デフォルトの名無しさん
05/09/15 18:21:46
>420

煽ってサンプル作らそうってんだなw

424:デフォルトの名無しさん
05/09/15 19:10:44
デバッグ時に保存しちゃうけどこれってやめれんですか?
職場のが保存しないもんで
つい閉じちゃって戻りたくてももどれないときあるですけど
どこで設定できるかわかならいです

425:デフォルトの名無しさん
05/09/15 20:45:33
>>420
お前のようなクズを性帝様が放っておくわけないよ?

426:デフォルトの名無しさん
05/09/15 23:21:43
ListViewのSubItemsにセットした文字列の260文字目以降が表示されません。
どなたか、回避方法を知っている方教えてください。
下記にサンプルをつけておきます。
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
ListView1.View = View.Details
ListView1.Columns.Add("test1", 200, HorizontalAlignment.Left)
ListView1.Columns.Add("test2", 4000, HorizontalAlignment.Left)
Dim item As New ListViewItem("aaa")
Dim buf As String
For ii As Integer = 0 To 257
buf &= "あ"
Next
buf &= "END"
item.SubItems.Add(buf)
ListView1.Items.Add(item)
End Sub


427:デフォルトの名無しさん
05/09/15 23:32:21
>>426
仕様。まあ260字並べられても誰も読まないしな。
参考:URLリンク(msdn.microsoft.com)

428:426
05/09/16 00:10:28
そうですか・・・仕様ですか。
ログとか(日付、区分、内容みたいな奴)を表示するのに手軽なコントロールだったんですけどね
どうしよう・・・
>> 427
とりあえず、納得しました。ありがとうございます。

429:デフォルトの名無しさん
05/09/16 00:37:54
ListView本来の使い方をすればいいだけじゃないの?
っていうか、カラムにそんな長文表示するってそもそもBad Designにも程があるような。

ListViewはアイテムを選択させる用途に徹して、選択したアイテムの詳細は
別途テキストボックスなりラベルなりで表示するようにするんじゃない普通は。

430:デフォルトの名無しさん
05/09/16 11:39:44
>>424
[ツール]→[オプション]→[環境]→[プロジェクトおよびソリューション]→ビルド/実行オプション


431:デフォルトの名無しさん
05/09/16 12:06:55
十進型より桁数の大きい数値を使って計算をしたいのですが
何かいい方法はありますか?

432:デフォルトの名無しさん
05/09/16 12:27:41
自分でそう言う構造体を書く

まあ.NET Frameworkのライブラリには存在しないので、どこかから流用したりするしかないな。
C#のサンプルだが
URLリンク(www.codeproject.com)
あるいはこことか
URLリンク(www.tokyo-pax.co.jp)
いっそC++のを移植するか。

433:デフォルトの名無しさん
05/09/16 13:08:18
Direct3Dで3Dのモデルをフォームに表示したいと思っています。
当方、VisualStudio.NET(2003じゃない)を持っており、DirectX9をインストールしました。
VisualStudio.NETで、(できればVBで)
DirectXインストールから、マウスドラッグで簡単な3Dモデルが動かせるようなプログラムを
書くまでを解説してるようなサイトってないでしょうか?

434:デフォルトの名無しさん
05/09/16 13:12:39
本屋に行けば売ってるじゃん

435:デフォルトの名無しさん
05/09/16 14:21:27
>>432
参考になりました。
ありがとうございます。

436:デフォルトの名無しさん
05/09/16 16:52:53
すいませんが、以下の質問があるのですが、教えてください。
・動的にSQLの変更が可能か?
・出力プリンタは、クライアントのプリンタを使用して出力が可能か?
・プレビュー出力は可能か?また、その方法は?
・VB.NETよりクリスタルレポートファイルを呼び出すコード記述例
複数の質問すいません。

437:デフォルトの名無しさん
05/09/16 17:12:50
まあまずどういう構成を考えているのかからだな
ASP.NETなのかそうでないのかすらわからんし

438:デフォルトの名無しさん
05/09/16 17:48:41
・可能
・逆にサーバのプリンタに出すほうが・・・。
下の2つはお試し版ダウンロードして試せば?クリスタルレポートはお試しあるのか知らんが。

ActiveReportならば、3番目も出来る(Webでも)、サンプルは製品についてくるからそれ見れば?

439:436
05/09/16 19:17:00
ありがとうございます。試してみます

440:デフォルトの名無しさん
05/09/16 19:19:19
㎡をtext1に入力するとtext2に坪数がでるプログラムをつくりたいのですが、流れを教えてくれませんか?
坪数=㎡*0.303です

441:デフォルトの名無しさん
05/09/16 19:29:05
Double.Parseして乗算してToString

442:デフォルトの名無しさん
05/09/16 22:36:36
テキストボックスで、AutoScrollPositionのようにスクロールの位置を取得したいのですが、どうすればよいでしょうか?

443:デフォルトの名無しさん
05/09/16 23:43:52
>>442
EM_GETFIRSTVISIBLELINEを使えば行番号で取得できるな。

444:最凶VB厨房
05/09/18 10:20:42
URLリンク(download.microsoft.com)
C#3.0

445:デフォルトの名無しさん
05/09/18 11:31:03
スレ的にはこっちでしょ。

Overview of Visual Basic 9.0
URLリンク(msdn.microsoft.com)

446:最凶VB厨房
05/09/19 00:43:50
すまぬの。

447:デフォルトの名無しさん
05/09/19 03:14:34
「グーグルをつぶす」--S・バルマー、幹部の転職に激怒

 「話の途中で、 Ballmer氏は『まさかGoogleではないだろうね』と口にした」とLucovoskyは述べ、
それに対し同氏はGoogleに転職することを伝えたという。
 「Ballmer氏はそのとき、椅子を手に取り部屋の反対側に向けて投げつけた。
椅子はそこにあったテーブルに当たった」(Lucovosky)。
Ballmerはその後、 GoogleのCEO、Eric Schmidtを激しく非難し始めたという。
「あいつを業界から葬ってやる。その程度のことは前にもやったことがある。
何度でもやってやる。Googleを抹殺してやる」

URLリンク(www.japan.cnet.com)

448:デフォルトの名無しさん
05/09/19 03:19:45
戦場は中国なのにMSに何が出来るんだろうね

449:424
05/09/19 09:54:48
>>430
たすかりますた
ありがとう遅レスすいません

450:デフォルトの名無しさん
05/09/19 21:16:39
会社でVB.NETのを使って開発予定なんですが、
自宅で練習したい場合はどうすればよいですか??

451:デフォルトの名無しさん
05/09/19 21:29:33
VS2005β

452:デフォルトの名無しさん
05/09/19 21:37:18
これっていつまで使うことができますでしょうか??

453:デフォルトの名無しさん
05/09/20 11:20:44
>>444-445
情報ありがとうございます。
今から翻訳しながら勉強してきます。

454:デフォルトの名無しさん
05/09/20 18:38:18
かなり初歩的な質問です。
今、vb.netの勉強をしているのですが、
msgbox("test")
messagebox("test")
これはどう使い分けるのでしょうか?
私には同じ動きをしているように見えるのですが?

455:デフォルトの名無しさん
05/09/20 20:04:15
>>454
その通りです。

456:デフォルトの名無しさん
05/09/20 20:36:43
>>454
MsgBoxはVB6.0までのMsgBox関数との互換性のために残されたレガシ関数。
与えられた値を内部で整理してSystem.Windows.Forms.MessageBox.Showを呼び出している。
System.Windows.Forms.MessageBox.Showは親ウィンドウを明示的に指定するオーバーロードがあるのが利点だな。利点を使うことはまず無いが。

457:デフォルトの名無しさん
05/09/20 20:57:59
>>456
ありがとうございます。
今後はMessageBoxを使っていきます。

458:デフォルトの名無しさん
05/09/20 23:53:39
WinFormにて、メッセージボックスから、呼び出し元に戻ってきた時の
イベントはどうすればとれるのでしょうか?
Enterは発生しませんよね??

459:デフォルトの名無しさん
05/09/20 23:57:10
MessageBoxなら閉じられるまでメソッドの流れはそこで止まるんだからイベントとか別に必要なくね?
なんでそう言う機能が欲しいと思った?

460:デフォルトの名無しさん
05/09/21 00:02:50
アクティブな項目の背景色を制御したいんです。
テキストボックスにフォーカスがある状態でメッセージボックスを出すと
ロストイベントは発生するのですが、
メッセージボックスが消えてもフォーカスイベントが発生しないため、
色が戻らず悲しいことになってます・・

461:デフォルトの名無しさん
05/09/21 00:24:41
メッセージボックスは別ウィンドウなわけで、
それが表示されたからってアクティブな項目が変わるわけでも無し、
背景色を変える必要はないと思うが……。

462:デフォルトの名無しさん
05/09/21 01:14:23
よくわからんけど、どうしてもイベント発生したければ、
MessageBox.Show()のラッパーメソッドを作って、
最後に自力でイベント投げればいいんじゃ?

463:デフォルトの名無しさん
05/09/21 11:11:04
System.ExecutionEngineExceptionの例外エラーは、なにが原因ででるんでしょうか?
.NET始めて、1週間。こんなエラーに困ってます。


464:デフォルトの名無しさん
05/09/21 11:22:44
どんな状況で出るのか、どんなコードで出るのか分からないのに答えようもないって。

465:デフォルトの名無しさん
05/09/21 12:02:18
下記のような.NETコードがあったとします。ComDll.dllに構造体を渡そうとしているのですが、
どうやら、下記のGetStatusの部分でSystem.ExecutionEngineExceptionがでるようです。

Public Declare Function GetControl Lib "ComDll" (ByVal hDev As Integer, ByVal CtlCode As Integer, ByRef SData As Integer, _
ByVal SDataNum As Integer, ByRef pStatus As GETSTATUS, ByVal RDataNum As Integer) As Integer

Public Function GetStatus(ByVal hDev As Integer, ByRef pStatus As GETSTATUS) As Integer
GetStatus = GetControl(hDev, CTRL_GET_STATUS, VariantType.Null, 0, pStatus, Len(pStatus))
End Function



次ページ
最新レス表示
レスジャンプ
類似スレ一覧
スレッドの検索
話題のニュース
おまかせリスト
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch