VB.NET質問スレ (Part18)

VB.NET質問スレ (Part ..

577:デフォルトの名無しさん
06/12/06 22:28:16
流れ乱しますが、
vb.net の課題と　その課題の作成例?
が置いてあるサイトがあれば教えていただけませんか？

578:酔いちくれ ◆J0rwikii8c
06/12/07 09:07:57
>>577

なんのためにテンプレ作ってもらってるんだよ
はぁ。毎朝二日酔いと下痢。

>>1-5

579:デフォルトの名無しさん
06/12/07 10:36:43
こんなやつに拾ってきた課題だされるやつもかわいそうだな。ｗ
課題設定できない、せめて自分でみつけられないやつに、教えるなんてできるんか？

580:デフォルトの名無しさん
06/12/07 11:23:16
VB.NET初心者です。
皆様のお知恵をお貸しください。

アプリAで行ったデータ更新を
アプリBに通知し、アプリBで表示中のグリッドのデータにアプリAで
行った更新が反映される(データ再読込み)というものです。

以上の事を非同期プロセス間通信で行えばいいといわれ、
PostMessageについて色々と調べたのですが、いまいち使い方がわかりません。
ユーザ定義のメッセージを PostMessageする方法について
ご教授お願いします。

581:デフォルトの名無しさん
06/12/07 11:37:10
WM_USER
WM_COPYDATA

582:デフォルトの名無しさん
06/12/07 11:56:28
そしてCOPY～はポスト出来ないって話

583:デフォルトの名無しさん
06/12/07 11:58:36
つい最近＠何とかで見たネタだな

584:デフォルトの名無しさん
06/12/09 21:32:37
(,,ﾟДﾟ)∩先生方、質問です。
VS2003+SQL SERVER 2000です
LAN上なら普通にDB接続できるのですが、web上ではDBに接続できません。
ASP.NETだとDB接続は問題なくできているのでソースに問題があると思いますがイマイチ判りません。
SqlConnectionをopenする時にシステムエラーが出るので
"Server=hoge.co.jp;Database=DB;Integrated Security=SSPI;"
と書いていますが、hoge.co.jpの部分が全く違うのでしょうか?

585:酔いちくれ ◆J0rwikii8c
06/12/09 21:43:06
あぁ～酔った。

>>584
おまいのSQLさーばーは、認証はどうしてるの？

586:デフォルトの名無しさん
06/12/09 21:54:32
web上でDBに接続てどういう意味？

587:デフォルトの名無しさん
06/12/09 21:55:13
(,,ﾟДﾟ)∩WINDOWS認証であります

588:デフォルトの名無しさん
06/12/09 21:55:27
LAN上ならできてWeb上ではできなくて
ASP.NETだとできる。

あー、つまり、どういうこった？

589:デフォルトの名無しさん
06/12/09 22:00:52
文盲ｽﾏｿ
元々はIEを使ってデータ接続をしていたのです。(ASP.NET)
SERVERは会社にあり、自宅からIEだとDBに接続は問題なく出来ているのです。
今日フト思いVB.NETでアプリケーションとしても作って見たところ会社(LAN上)では
問題なくDBに接続できましたが、自宅にソースを持って帰り今やってみたところ繋がらない始末です

590:デフォルトの名無しさん
06/12/09 22:04:06
そんな恐ろしいことができるようになってんのかよ
なってないからできないんだろうがな。

591:デフォルトの名無しさん
06/12/09 22:22:42
ファイアーウォール、ポート開放、名前解決、ユーザ登録などの問題点が考えられる。
＋
実はWindows認証ではなくSQLServer認証だったり。

592:デフォルトの名無しさん
06/12/09 22:40:10
そもそもインターネットからDBサーバが見えるようになってるとは思えん。

593:酔いちくれ ◆J0rwikii8c
06/12/09 22:40:46
クライアントからSERVERを共有したけりゃ

「セッション」

があればいいよ

頭良さそうだし、ぐぐってみたら。

594:酔いちくれ ◆J0rwikii8c
06/12/09 22:50:25
う、うへへあはははｗｗｗｗ

もう、たまらんｗｗｗ

いんたーねっつから、DBがみえないんだってよｗｗｗ
うははははははｗｗｗｗｗ

595:デフォルトの名無しさん
06/12/09 23:01:20
いろいろ意見ありがとう御座います。
ひょっとして今自分がやろうとしている事ってかなり特殊なのかなと感じつつあります

例えばヤフオクに自社の商品(DBに格納してあるデータ)出品する場合IEを使って出品するけど大量に出品する時はとてもメンドクサイし管理が大変
そこでアプリケーションを作り自宅からでも商品の管理・出品が効率よくできるような感じです。
IEがアプリケーションに変わるだけと言いましょうかそんな感じのものです
実はナンセンス?

>591にある火壁・ポート開放・・・は、問題なくできているはずです。
会社のHPにもアクセスでき、外部(自宅)からもDBのinsertやらできているので大丈夫だと思っています。
認証はWINDOWS認証です。SQL SERVER認証は訳がわからなかったのでやめた記憶があります。

>593
セッションちょっと調べて見ます

596:デフォルトの名無しさん
06/12/10 01:03:41
あのさ、結局「DBに接続するコード」はどこのマシンで動くのよ。
繋がらないのに「外部からはinsertできる」っておかしいじゃんよ。

まさか、WEBアプリならどこからでもOKって当たり前な話じゃないよな？

597:デフォルトの名無しさん
06/12/10 01:29:38
区別がついてないんだろ。

598:デフォルトの名無しさん
06/12/10 01:33:20
インターネットから直接接続できるDBなんて
ぶっ壊してくれといってるようなもんだろ

599:デフォルトの名無しさん
06/12/10 01:44:02
まあしかし前になんだっけ、ウィルスはやったよね。
まあ大抵はあれで懲りたはずだけどな。

600:デフォルトの名無しさん
06/12/10 14:15:57
VBでお手軽に別のプログラムから他のアプリケーションプログラムを起動させたり、
入力ボックスに自動で入力したり、ボタンを押したりさせるような関数とかって
あるんですか。やはり、WIN32APIでの話題になるのでしょうか？

601:デフォルトの名無しさん
06/12/10 14:20:36
起動だけなら System.Diagnostics.Process で容易に可能だが、
操作となると .NET の標準ライブラリだけじゃ不可能だな

602:デフォルトの名無しさん
06/12/10 14:26:33
>>601サンクス

603:デフォルトの名無しさん
06/12/10 18:37:20
┌─┬─┬─┬─┐
│　 │　 │　 │　 │
├─┼─┼─┼─┤
│　 │　 │　 │　 │
├─┼─┼─┼─┤
│　 │　 │　 │　 │
└─┴─┴─┴─┘
ピクチャーボックスで描いた表のマスそれぞれを二次元配列にしていきたいんですけどどうすればよいのでしょうか？
最終的にはクリックしたマスが何列何行目のマスか一発でわかるようにし処理を加えたいと思っています
（例えば左から2番目上から3番目をクリックすると配列(2,3)で処理を行う）

表はなんとか作成できたのですが、ここで詰まっています
'縦の線
For X = 0 To Xmax
　 g.DrawLine(Pens.Black, X * MasuSize, 0, X * CellSize, Xmax * MasuSize)
Next
'横の線
For Y = 0 To Ymax
　 g.DrawLine(Pens.Black, 0, Y * MasuSize, Ymax * MasuSize, Y * MasuSize)
Next

Xmax、Ymaxは行と列の数、MasuSizeはマスの幅がそれぞれInteger形式で入っています。

604:デフォルトの名無しさん
06/12/10 18:48:19
>>603
他人にわかる人語すら満足に書けない人が
コンピュータのコード書けるわけないよ、悪いけど。

ここで詰まってます？
「ここ」って何だよ？w

605:デフォルトの名無しさん
06/12/10 18:57:19
「ここ」って言うのは最初に説明した
ピクチャーボックスで描いた表のマスそれぞれを二次元配列にしていきたい
ってことです。わかりにくくてごめんなさい。

606:デフォルトの名無しさん
06/12/10 18:58:43
最近煽るだけ煽っていくやつがいるな
他人にわかる人語すら満足に書けない人が
コンピュータのコード書けるわけないとか
自論持ち出してるけど証拠はあるのかよｗ

607:デフォルトの名無しさん
06/12/10 19:05:15
>>605
悪いがなんの説明にもなってない。
表のマスをそれぞれ二次元配列にする、とはどういう意味だ？

608:デフォルトの名無しさん
06/12/10 19:09:02
うざ

609:デフォルトの名無しさん
06/12/10 19:28:06
うざくてもなんでもいいが、自分の問題を正確に言葉で表現しない限り、
他人の協力は永遠に得られないよ。
606のような自分の言葉を自分自身に適用できない馬鹿は湧いてくるかもしれないがw

まあ問題を表現できないのは、表現力の問題もあるだろうがそれ以前に
本人が自分の問題がよくわかってないから、問題を分析的に把握できてないからだろう。

把握できてもいない問題のコードなんて永遠に書けるはずがないだろ。

610:デフォルトの名無しさん
06/12/10 20:01:27
>>609の言いたいことは俺も同意する。
だが、>>603の言いたいことは、わかるだろ。
イマジーネーションがなければ、言葉で正確に表現できたとしても、
新しいものは生み出せないだろう

と言ってみる。

611:デフォルトの名無しさん
06/12/10 20:01:54
お目汚し失礼しました。
どうせこれ以上説明したところで上手く説明できないでしょうし
恥の上塗りになるだけでしょうから
他に頼る人もいないし自力で頑張ります。

612:デフォルトの名無しさん
06/12/10 20:03:49
要はなんだ？>>603はオセロ系のゲームを作りたいのかな？

613:デフォルトの名無しさん
06/12/10 20:05:38
>>603
.NETのことあまり知らんが、クリックされた時に発生するイベントがあるだろ？
そのイベントでクリックされた座標Cx,Cyがとれるだろ？？
そしたら、
Tx=Cx/CellSize
Ty=Cy/CellSize
配列(Tx,Ty)=????
みたいな感じでいいじゃないかね？？
この場合、グリッドの左上を原点とした場合だけど、あとは適当に
補正してくれ。

614:デフォルトの名無しさん
06/12/10 20:08:25
>>611
つか、気にするなよ。はじめは、みんなだいたい新しい言葉を上手く
使いこなせいもんだよ。

615:酔いちくれ ◆J0rwikii8c
06/12/10 20:16:41
うははｗ
やべぇ、酒の肴がたくさんだｗ

エンドユーザの意見を吸い上げる事に比べれば、
>>603は全然わかりやすい
614のとおり、気にするなｗ

なにより、AAうまくね？？

いろんな解釈ができそうだ
動的にコントロールを作って、配列にぶちこんでるのか、
単純に座標をつついたときに、配列にビットでもたてるのか。

まぁ、もういいのか。

616:デフォルトの名無しさん
06/12/10 21:00:35
>>613
ありがとうございます
今出かけてるんで明日家に戻ったらやってみます

>>614-615
優しいですね。ありがとうございます
<<612さんの仰るとおりオセロではありませんがそんな感じのゲームにする予定です
まずはプログラムの知識がないと質問するのも難しいものですね
勉強になりました

617:デフォルトの名無しさん
06/12/12 11:26:57
デリゲートって、どんなレベルになると必要になるんですか？
初心者は必要ない？

618:デフォルトの名無しさん
06/12/12 11:40:05
イベント使うだろ？
ま、意識はしてないだろうけど。

619:デフォルトの名無しさん
06/12/12 11:41:10
質問です。
ClickOnceで配布するプログラムを作成しているのですが、
その場合、ユーザーが個別に設定を保存するのに適した方法は分離ストレージ以外に存在しますか？
spreadの列幅などを保存したい時は列幅分だけ項目を作るのは手間なのですが・・・

620:デフォルトの名無しさん
06/12/12 11:53:21
>>619
My.Settingsじゃ駄目なの？

621:デフォルトの名無しさん
06/12/12 12:07:21
質問です。
mp3をデコードするためにいろいろ調べたところ
URLﾘﾝｸ(kone.vis.ne.jp)
をみつけたのでacmStreamを使ってやろうとしているんですが、
Public Declare Function acmFormatSuggest Lib "msacm32.dll" _
(ByVal had As Long, ByRef pwfxSrc As MPEGLAYER3WAVEFORMAT, _
ByRef pwfxDst As MPEGLAYER3WAVEFORMAT, _
ByVal cbwfxDest As Integer, ByVal fdwSuggest As Integer) As Integer

のところで引っかかるようです。
さらに調べたところURLﾘﾝｸ(e-blog.tokonats.net)
に書いてあるとおり構造体に2バイトフッタのようなものがあるようなのですが、
どうすれば動くようになるのでしょうか？

622:621
06/12/12 12:11:35
訂正
引っかかる場所はacmFormatSuggestを呼び出す場所です。

623:619
06/12/12 12:37:01
>620
いえ、プログラム中で新規に項目を追加する方法が見つからなくて。

624:デフォルトの名無しさん
06/12/12 12:40:59
>>622
まず自分の「ひっかかる」って説明が説明になっているかどうかって点に
ひっかかろうよ。

625:デフォルトの名無しさん
06/12/12 12:51:21
>624
説明って言われてもコンパイルエラーも出なければ
実行時にエラーをはくわけでもないからどうともいえないんですよね。

ただきっちりと実行してくれないという感じなんで。

626:デフォルトの名無しさん
06/12/12 13:05:46
>>625
引数とか構造体のサイズまちがってんじゃねーの?
そのフッタがどうのってVBの話だろ? .net関係ないじゃん
いきなりハンドルをLongとかしちゃってるけど

627:619
06/12/12 13:20:14
>>626
ほかのサイトも調べてたんですが
ハンドルの型はVBの場合だとLongかIntegerでいいそうなんです。

構造体のサイズはLen関数でとってるんでおそらくあってると思います。

今考えてみたらかなりスレ違いみたいですね。
申し訳ないです。

628:デフォルトの名無しさん
06/12/12 13:21:06
↑名前間違えた
621です。

629:デフォルトの名無しさん
06/12/12 13:42:45
>>623
グリッドレイアウトなんかは静的だと思うからプログラムで
新規項目作る必要なんてあるのか？というのは置いといて

シリアライズするとかコレクションに入れればなんとかなるんじゃない

630:デフォルトの名無しさん
06/12/12 14:23:37
>>627　スレ違いじゃないよ

631:デフォルトの名無しさん
06/12/12 18:27:39
いやスレ違いでしょ。619はVB6ユーザーみたいな感じだね。

っていうか、>>625みたいな寝ぼけたこと言ってるようじゃ、
相当救い難いお方だとお見受けするね、619クンは。

632:デフォルトの名無しさん
06/12/12 18:37:58
>ハンドルの型はVBの場合だとLongかIntegerでいいそうなんです
>ハンドルの型はVBの場合だとLongかIntegerでいいそうなんです
>ハンドルの型はVBの場合だとLongかIntegerでいいそうなんです

633:621
06/12/12 19:58:42
>>631
使ってるのはVB.NETの2003ですよ。

とりあえずデバッグして気づいたのはReturn値を取ってなかったのが
問題のようでReturn値を見るとエラーの値が帰っていましたが、
どのようなエラーなのかはわかりませんでした。

>632
つURLﾘﾝｸ(www.activevb.de)
ここを参照しての発言ですが
やはりハンドルの構造体は必要なんですか？

634:デフォルトの名無しさん
06/12/12 20:15:08
こんな丸投げ馬鹿に手取り足取り教えてやろう、
なんてお人よしが果たしているかね。

普通質問っていうのは自分で調べた上で不明点を聞くものだろう。

635:621
06/12/12 20:27:23
丸投げにしてるわけではないんですよ。

ただそう思われてるんならもう聞かないことにします。

636:最凶VB厨房
06/12/12 20:53:41
あわてんな。ゆっくりせぇ

637:デフォルトの名無しさん
06/12/12 21:20:22
とりあえずWebに書いてあるコードがVB6かVB.NETか区別できるようにしような

638:デフォルトの名無しさん
06/12/12 21:38:17
VB.NETスレに初心者スレがないのはみんな初心者だから?

639:デフォルトの名無しさん
06/12/12 21:45:04
>>634
なんのためにこのスレいるんだよ。
回答者面して、何も解決する気ないなら、このスレ一切覗くなよ。
そのほうが、おまえの精神衛生上よろしいだろ。

お　ま　え　の　憂　さ　晴　ら　し　は　う　ぜ　え　ん　だ　よ　

べつにここはサポセン仕事じゃないんだから答えなくていいんだぞ

　　　　　　　　と　　っ　　と　　と　　う　　せ　　ろ　　

640:デフォルトの名無しさん
06/12/12 21:51:48
煽り屋は回答を行わない法則

641:デフォルトの名無しさん
06/12/12 22:24:13
まあ「エラーの値が返ってきたけど意味がわかりませんでした」
ってその値書かなかったり、その意味の調べ方を訊ねないのもな……

だから>>634みたいに書いちゃうのもあまり責められない。
それでどうしたいの? って言いたくなる気持ちも分かるよ

642:デフォルトの名無しさん
06/12/12 22:33:05
>>639
お前さん、いい加減自分の言葉を自分自身に適用することを覚えろよ……。

っていうか、お前さん、自分の発言が俺を擁護するものであることに気づいてるか？w
そう、お前さんの言うとおり誰も答える義務はない。
だから「気に入らない奴」には回答しないんだよ。
「気に入らない奴」とは、一言で言えば自助努力をしない奴、する気のない奴だな。

「気に入らない」奴がスレに居つくのは俺の精神衛生上よくないから、
あえて「気に入らない」奴にとって居心地が悪いスレになるように心がけてるって訳。

643:デフォルトの名無しさん
06/12/12 22:35:03
隊長！自作自演警報発令中であります！

644:デフォルトの名無しさん
06/12/13 00:09:23
VB2005ExpでWindowsフォームで、データバインドしたDataGridViewにバインドしない列を最後尾に追加しました。
で、この列の並びがビルドするたびに前のほうに行ってしまうのを防ぐためには「列の自動生成オプション」とやらをオフにすればいいところまでは分かったのですが、どこでするのか分かりません。
AutoGenerateColumnsであってます？DGVのプロパティに無いし…しかもForm1.Designer.vbを覗くと
'DataGridView1
…
Me.DataGridView1.AutoGenerateColumns = False
ってなってるんですけどねぇ…あうぅ…

645:デフォルトの名無しさん
06/12/13 11:47:39
DataGridView　については専用のスレッド
ｽﾚﾘﾝｸ(tech板)l50

がありました。そちらで聞かれるといいかも・・・
自分もあちらで聞いていました。

646:デフォルトの名無しさん
06/12/13 14:27:51
>>642
質問者レベルをコントロールしたいなら、
自分で管理する掲示板でしろ。

647:デフォルトの名無しさん
06/12/14 00:04:21
理解不足を棚に上げ煽り、1行レスで返す方が多いようですが、
そのような方はスレの皆様を混乱させるだけでなく
スレの雰囲気を崩しかねないのでお黙り下さい。

また質問者は回答者に知識を披露する場を与える貴重な存在なので、
質問者を見下した回答、あまりにも儀礼を欠いた回答も厳重に禁止いたします。
忙しい中、少ない時間の合間を縫って質問しに来てるわけですので、
その辺ご承知下さい。なお、当方が質問に対して有意義な答えであると
判断した方には評価いたしますので各自よく調べ、よく考え正確な回答をするように。

648:デフォルトの名無しさん
06/12/14 10:07:06
>>647
君が評価してくれるの？

コテハンにしてくれない？

649:デフォルトの名無しさん
06/12/14 18:26:04
>>647
で・・・どこを縦読みすればいいわけ？

650:デフォルトの名無しさん
06/12/14 20:23:18
　　　　　　　　　　　／　／／／// ////ハヾヽﾄ､ヾﾘﾒヽ
　　　　　　　／　　 //////|l|ｌ|ｌ|ｌ川ｌ|j　ｉメ!ｌ|ｌ| | ｌ|ｌ|ｌ|ｌﾄ､
　　　　　　 /　　　ｌ|l|l | |ｌ|!｜l|ｌ|l川ｌ|!　 |　|ｌ|ｌ| | ｌ|l川ｌ|ｌ|
　　　　　　　　/ ／／ｨｌ|ｌ|| | |ｌ|　|l|ｌ升十ﾄ､　| !|ｌ|ｌ| 川ｌ川ｌ|l|!
　　　　　　　 |　／／ |川｜|ｌ　 |ｌ|川｜|　　川川升ﾄ川l|ﾘ
　　　　　　　 | / ／／|ｌ|ｌ| | |ｌ　ヽーｒ==､　　　　　 ___|ﾉﾉ
　　　　　　　 |// ／ ∠川川　　ヽヾ:::::ﾉ　　　　ｲ::::「
　　　　　　　　|////´ｒ-､ヾl　　　　　｀'ー‐' 　　　､ﾞｰﾍ
　　　　　　　　V/ハヽ　　ｌ|　　　////　　　　　　　　 !
　　　　　　　　 V/彡､＼ﾉ　　　　　　　　　　　　 /
　　　　　　　　　ヾミミ＞-､　　　　　　　　　　　 ⌒　/　 >>647いつにもましてキモイなこいつ
　　　　　　　　　　ﾄ=-､彡ヘ、　　Ｊ　　　　　　　／
　　　　　　　　　　|川|ｌ川ｌ|　ﾉ)､　　　　　　／
　　　　　　　　　 |川ｌ川ｌ|!（((ハ　　　　　　「￣´
　　　　　　　　 |川ｌ|川l|_,ﾉ_,ノ!　　　　　 |、
　　　　　　　 |川l|＜ヾ､　　｀ヽ､　　　〉｀ー-､
　　　　　　　 !川/⌒ヽ､ヽ､　　　｀'ｰ＜⌒ヽ川
　　　　　　　　　川ｌ|　　　＼｀'ー------ ｀ヽﾊ|ｌ|ｌﾄ､
　　　　　　　 /|ｌ|ｌl|　　　　　｀ヽ､ヾ､_｀'ｰ-=ﾆ三ヾ!ｌ|＼

651:デフォルトの名無しさん
06/12/14 21:48:14
正規表現と置換についての質問です
例えばPerlで1行全体の文字列に対してTABをSPACEに変換したい場合
s/\t/ /g;
このように書きますが
.NETの場合どの様に書いたらいいのでしょうか？
String^ str = "hoge　　hoge　　hoge";
str = Regex::Replace(str, "\t", " ");
これでは部分マッチングしかできないですよね？

652:デフォルトの名無しさん
06/12/14 21:51:08
651です
ｽﾏｿVBスレでしたね(^^;
ごめんなさい、でも分かる人いたら教えてもらえませんかVBでもいいので
ﾀﾉﾝﾏｽ

653:デフォルトの名無しさん
06/12/14 21:56:23
なんでリファレンス見ないの?

654:デフォルトの名無しさん
06/12/14 21:59:40
リファレンスの見方が良く分かんないんだよね、ぐぐったけど
旨くヒットしないし・・・・

655:デフォルトの名無しさん
06/12/14 22:04:15
こんな奴が C++/CLI か。世も末だな。

656:デフォルトの名無しさん
06/12/14 22:06:10
str = Regex::Replace(str, "\t", " ");
コレデ全体の置換もOKだったなﾜﾊﾊ

657:デフォルトの名無しさん
06/12/15 03:00:12
【使用環境】vb.net2003

PictureBox1_Paintイベントで
e.FillRectangle(Brushes.black, 0, 0, 500, 500)
と黒色の四角を描画し、

PictureBox1_MouseDownイベントで
Dim g As Graphics = PictureBox1.CreateGraphics
g.DrawEllipse(Pens.white, 0, 0, 100, 200)と、
PictureBoxをマウスで押すことによって黒色の四角の上に円を書くプログラムを作ったのですが
実行したウィンドウを最小化したりすると描いた円が消えてしまいます。

ウィンドウを最小化したり、サイズを変えたりしても
黒色の四角の上に円が描かれ続けているようにするにはどうすればよいのでしょうか？
ご存知の方いましたらよろしくお願いします。

658:デフォルトの名無しさん
06/12/15 06:54:38
ResizeRedraw

659:デフォルトの名無しさん
06/12/15 11:27:01
PaintやMouseDownでGraphicsに直接描かずに
pictrureBox1.ImageにつっこんだBitmapに描く

660:デフォルトの名無しさん
06/12/16 10:21:52
VC8をよく使いますが、自前のANSI Cで書いた関数をDLL化して
.NETで呼び出すことって可能ﾃﾞﾂｶ？

661:デフォルトの名無しさん
06/12/16 10:26:46
可能

662:デフォルトの名無しさん
06/12/17 13:40:35
以前、相互に循環する画面遷移を、
DLLでやってたプロジェクトに参加してたけど、
どうやって、可能にしていたのだろう？

663:デフォルトの名無しさん
06/12/17 14:42:31
いみがわかんない

664:デフォルトの名無しさん
06/12/17 20:18:19
2次元のarraylistって作れるんですか？

665:デフォルトの名無しさん
06/12/17 20:22:32
ジャグ配列的になら

666:デフォルトの名無しさん
06/12/17 20:33:12
初心者な俺には理解できない用語がorz
伝票発行するｿﾌﾄつくらなきゃいけないんですがDBだと難しくなりそうなんでCSVと配列でどうにかならないかなと思って。

部門、商品、相手先、入力ﾃﾞｰﾀそれぞれ横6要素以上あって読み書きを頻繁にするとなるとおとなしくADOかなんか
勉強するしかないのかな・・・

667:デフォルトの名無しさん
06/12/17 21:09:51
>>666
ジャグ配列なんてどうでもいい。

正規化はわかるのか？

668:デフォルトの名無しさん
06/12/17 21:13:47
667が日本語をうまく使えない、ということはよくわかるよ。

669:デフォルトの名無しさん
06/12/17 21:16:58
>>668
665乙。

670:デフォルトの名無しさん
06/12/17 21:17:34
え、俺？

671:デフォルトの名無しさん
06/12/17 21:18:44
え、え、俺？

672:デフォルトの名無しさん
06/12/17 21:20:00
え、え、え、俺？

673:666
06/12/17 21:20:52
えっと俺はどうボケればいいんでしょうか？ヽ(;´Д｀)ﾉ

674:デフォルトの名無しさん
06/12/17 21:24:41
ちょっとマジレスしますよ

>>666
伝票発行ソフトってことだけど元になるデータはどこ?

675:666
06/12/17 21:33:52
元のデータですか？
えとMDBかCSVにいれておこうかと思ってるんですが・・・

676:デフォルトの名無しさん
06/12/17 21:37:44
>>666
素直にアクセスでやるのが吉

677:デフォルトの名無しさん
06/12/17 21:58:13
\1,980で買えるアプローチでいいじゃん

678:674
06/12/17 22:23:05
CSVを｢これから作る｣でおｋ?
だったら
一行分の構造体orクラスを定義して
配列なりファイルアクセス用のクラスなりを使えばいける

ただしデータ構造が単純であることが大前提になるけど
単なる検索やソート以上の処理をするならAccessの方が楽かと

679:674
06/12/17 22:33:29
簡単にインターフェースの概要をば

一行分のデータのクラス(以後一行データ)
各アイテムのアクセサ
Shread Parse(string):一行データ (Newを利用する方法もある)
ToCSVLine():string(ToStringをオーバーライドする方法もある)

ファイル全体のクラス
Item(int) : 一行データ
Load:(IO::FileInfo):void
Save(IO::FileInfo):void

で
Loadのときは一行ずつParseで一行データを生成、
Saveのときは一行ずつToCSVLineで文字列に変換して書き込み

680:デフォルトの名無しさん
06/12/17 22:57:43
まあその説明でわかればたぶん質問しないわな。
こういう自己陶酔型の人ってヒトから自分がどう見えるか考えないから微笑ましいというか、
ちょっと困ったクンだよねw
っていうか、ここ何のスレだかわかってんの？w

681:デフォルトの名無しさん
06/12/17 23:26:08
うんこに群がるフンコロガシのためのスレッド

682:デフォルトの名無しさん
06/12/18 00:18:07
きもいよ

683:酔いちくれ ◆J0rwikii8c
06/12/18 06:24:40
>>679

1000件のレコードがあった場合は、一行分の子クラスの
インスタンスを1000回生成するの？？？

684:666
06/12/18 07:07:48
みなさんありがとうございます。

元ﾃﾞｰﾀの商品マスタと部門マスタはあります。
それぞれ列6要素ぐらいで行100～1000ぐらいです。

初心者なんで理解しきれてないのですが、マスタの一要素ごとに一次元配列を作ってそれをコレクションとかにいれて使うっていうことでしょうか？

あ、ちなみにVB2005EXPRESS使ってます

685:デフォルトの名無しさん
06/12/18 08:14:00
>>666
まず具体的に実現したい処理内容をかかなきゃ誰も答えようがないと思いますが。

こういう人って本当どういう頭してるんだろう。
他人はアンタの考えてることが言葉にしなくてもわかるエスパーか何かだと思ってんの？
なんにしろ、説明能力に問題がある時点でプログラマには向いてないといわざるを得ない。

686:デフォルトの名無しさん
06/12/18 16:37:03
>>539,634,609,680,685　
これ以上、辿るのめんどくさいからやめた。

この人って本当どういう生活してるんだろ。
仕事では、対人関係の問題で使い物にならないんだろうな。
ネットで延々と煽って憂さ晴らし。ご愁傷様です。

687:デフォルトの名無しさん
06/12/18 22:10:41
フォームのサイズを変えたら一緒に
ボタンやラベルを大きくする方法ないですか？？

688:デフォルトの名無しさん
06/12/18 22:11:44
Anchor
Dock

689:デフォルトの名無しさん
06/12/18 22:43:00
>>688
もうちょい詳しくおしえてください・・・

690:デフォルトの名無しさん
06/12/18 23:15:49
Anchor 【あんかー】
Dock【どっく】

691:デフォルトの名無しさん
06/12/18 23:25:50
いじめられた・・・

692:デフォルトの名無しさん
06/12/19 00:09:15
アンカー船舶が使用する錨のこと
ドック船舶の製造、修理などに際して用いられる設備

693:デフォルトの名無しさん
06/12/19 00:11:55
碇、後戻りはできんぞ
さすがドックだ、なんともないぜ

694:デフォルトの名無しさん
06/12/19 00:38:44
これほど「ぐぐれかす」が似合う男もそういないぞ。がんばれ。

695:デフォルトの名無しさん
06/12/19 11:24:20
VBのランタイム関数って.NETになってからも追加されているんですかね？

696:デフォルトの名無しさん
06/12/19 17:54:34
Microsoft.VisualBasic

697:デフォルトの名無しさん
06/12/19 19:42:06
Windows2000(SP4)でVB2005を動かした場合なんですが
フォームにListViewを置いて、そのListViewにToolTipを設定した時
ListViewの空白部分をマウスでポイントすると普通にToolTipが表示されるのですが、
行(ListViewItem)が表示されている部分をポイントすると
ToolTipが一瞬だけ表示されて消えたり、ちらちらと点滅したり
異常な動きをします。

原因、対処法をご存じでしたらお教え下さい。

698:デフォルトの名無しさん
06/12/20 11:57:24
VB6　から　VB2005　に移行して勉強した人が、

以前からの会社の都合でどうしても　VB.NET　2003　とかで開発する

必要がある、というような場合、言語上で新たに覚えないといけないような点

はありますでしょうか？

Version　としてはバックすることになりますが、VB2005　の方が楽になっている

ので　VB.NET　2003　とかに戻ると　オブジェクト指向プログラミング的に

厳密にやらないといけない部分が出てくると思うのですが、その辺で

やっかいな部分から列挙するとどんな感じになるでしょう、、

このあたりを心配していましたが、すみませんが、よろしければこの件で

ご指導くださればありがたく、よろしくお願いします

それとも、VB.NET　2003　で開発していた案件はすべて　

VB2005　に移行していくと考えてよいでしょうか

この辺もよろしければ教えてくださると助かります

699:デフォルトの名無しさん
06/12/20 11:59:19
上げるの忘れました、スマソ

700:デフォルトの名無しさん
06/12/20 14:34:40
言語よりむしろNET Framework 2.0と1.xの違いの方が大きいと思われ。

701:デフォルトの名無しさん
06/12/20 22:14:33
一番大きいのは Using が無い事か？
ジェネリクスの方はどうも VB ではあまり聞こえてこないんだが導入に積極的でないのかね

702:デフォルトの名無しさん
06/12/21 08:19:32
このスレは既にPart17ですが、いったいみなさんはVB.NETで何を開発してるのでしょうか？？
やっぱ、ほとんど、サーバーサイドのWebアプリケーションでしょうか？？
クライアントサイドの.NETアプリをあまり見かけないので質問しました。

703:デフォルトの名無しさん
06/12/21 08:33:23
質問があります。

エディタにxxxxx.ToStringと入力した時にToString()って
自動的にカッコが付く様にはできないのでしょうか？

704:デフォルトの名無しさん
06/12/21 12:27:01
VS、というかVBのエディタの設定項目なんて数える程しかないのにな。
仮に500以上の設定項目が幾重かの階層になっている、とかなら
>>703みたいな質問もさもありなんと思うんだけど。

まあ703みたいな人がPGに基本的に向かない性格なのは疑いようがない

705:デフォルトの名無しさん
06/12/21 12:35:11
>>704
真性のキチガイやろう。

湧いて来るんじゃねぇよ。

706:デフォルトの名無しさん
06/12/21 12:38:33
>>704　氏ねよクズ　死ねよ

707:デフォルトの名無しさん
06/12/21 12:39:46
(･∀･)ｼﾞｻｸｼﾞｴﾝﾃﾞｼﾀ

708:デフォルトの名無しさん
06/12/21 12:40:13
お前ら耐性なさ杉だ

709:デフォルトの名無しさん
06/12/21 12:42:44
「教えて君」「教える君」というのは、
ネット上に存在する２種類の人種の人たちを示す揶揄された敬称のことであるが
その影には「教えない君」という人種が多数いるの事にはあまり注目されていない。

しかし、実はその「教えない君」という人種が一番厄介かつ迷惑な存在だったりするのである。
そもそも荒れる原因というものは「教えない君」の、無秩序かつ、無神経なレスにある部分が
大多数なのだが、彼らの多くは、そういった感覚はどうやら持ち合わせていないようである。

第三者がそうした場面を見た場合に、誰に一番の非があるというのは
「教えない君」にあるというのが客観的事実であるのは明らかなのであるが、
彼らは認めようとしない。

表面上は、「教えない君」はネット上のルールや倫理や秩序などを叫ぶのであるが
どうやら真相は、現実社会において蔑まれる存在である「教えない君」の
鬱憤晴らしのようである。

上記でそういった悲哀のレスを付けた人たちは、勇気を持って自らの弱さと過ちを認め
反省しなければならない。
それがキミたちニートの人間的に成長できる少ないチャンスなのである

710:デフォルトの名無しさん
06/12/21 12:59:11
長文カキコorコピペする「粘着くん」もいるみたいですよ

711:デフォルトの名無しさん
06/12/21 12:59:22
500以上の設定項目が幾重かの階層になっているなら質問OKだってｗ

ﾊﾊﾊﾊﾊ
死ねよクズ

712:デフォルトの名無しさん
06/12/21 13:18:57
５００もの設定の中から探すような
規模の事しか質問してはいけないって　ｵｲｵｲ

713:デフォルトの名無しさん
06/12/21 18:42:59
ComオブジェクトのShockwave Flash Objectをコントロールとして利用したいのですが、

依存する COM 参照 "stdole, Version=7.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" を解決できませんでした。
タイプライブラリ "AxShockwaveFlashObjects" のラッパーアセンブリを作成できませんでした。種類 'Microsoft.Build.Tasks.ComReferenceResolutionException' の例外がスローされました。

などのエラーが発生して、利用することが出来ません。前までは出来ていたのですが、、、

714:酔いちくれ ◆J0rwikii8c
06/12/21 19:25:04
>>713
外してたら、スマソ。

2003で使ってたのが、2005で使えなくなったとか。

715:デフォルトの名無しさん
06/12/21 19:41:32
いえ、2005環境で使うことが出来ていました。今試したところ、Delphi6でも貼り付けることができました。
・・・何が原因なんでしょう。

716:酔いちくれ ◆J0rwikii8c
06/12/21 19:49:26
内部でラッパーのAxShockwaveFlashObjectsにアクセスできてない
みたいだから、AxInterop.ShockwaveFlashObjects.dllが悪いのは
確かと思う。

フレームワークが同居してるなら、そのDLLを探してみるのも
いいかも。

ちょっとDelphiは知識ないから、スマソ。

717:713
06/12/21 21:03:13
原因が分かりました。
参照の追加でCOMタブのOLE Automationを参照させないと実行できないようです。
お騒がせしてすいませんでした。

718:デフォルトの名無しさん
06/12/21 22:28:12
URLﾘﾝｸ(www.microsoft.com)
や　ら　な　い　か

719:デフォルトの名無しさん
06/12/23 11:47:03
データグリッドの最初の列を足したいんだけど、For eachで書けないかな？
下ので一応いけるんですが。

Dim sum As Single
For i = 0 To DGV.RowCount - 1
sum += DGV.Item(0, i).Value
Next
MessageBox.Show(sum)

720:デフォルトの名無しさん
06/12/23 11:50:08
変数名からして DataGridView のようだが。

721:デフォルトの名無しさん
06/12/23 12:06:07
Option Strict Offなソースを見ると何か嫌な気分になる

722:デフォルトの名無しさん
06/12/23 13:09:52
>>720
そうです。

723:デフォルトの名無しさん
06/12/23 13:29:51
＞Dim sum As Single
なんでSingle…

724:デフォルトの名無しさん
06/12/23 13:39:43
>719

つか集計したいのなら、DataColumn.Expressionでsumするのが
早いと思うが…。

つURLﾘﾝｸ(msdn.microsoft.com)

725:デフォルトの名無しさん
06/12/23 22:53:30
>723
少数があるので。

>724
ありがとうございます。参考にさせてもらいます。

726:デフォルトの名無しさん
06/12/24 05:01:00
すみません、ｵﾌﾞｼﾞｪｸﾄ志向プログラミングについて日が浅いもので
よくわからないのですが、、

たとえば、あるクラスから生成されたｵﾌﾞｼﾞｪｸﾄのコレクションが定義されているとして、
そのＡＤＤメソッドには、その元のクラスから派生されたｵﾌﾞｼﾞｪｸﾄを指定してコレクションに
追加していくことはできるでしょうか

たとえば、ＴｒｅｅＶｉｅｗコントロールにおいて、あるノードに子ノードを追加するという場合、
その子ノードは（ノードのコレクションである以上）TreeNodeクラス型ｵﾌﾞｼﾞｪｸﾄでなければ
ADDできないと思っていましたが、実際には、「TreeNodeクラスの派生クラスのｵﾌﾞｼﾞｪｸﾄ」
でもADDできているようでした。

これは通常の　コレクションにおけるADDメソッド　のデフォルトの性質でしょうか？

ヘルプの説明では普通に　TreeNodeクラス型のｵﾌﾞｼﾞｪｸﾄをADDするようになっています
ms-help://MS.VSCC.v80/MS.MSDN.v80/MS.NETDEVFX.v20.ja/CPref17/html/M_System_Windows_Forms_TreeNodeCollection_Add_1_526d62f3.htm

初心者ですみませんが、よろしくお願いします

727:デフォルトの名無しさん
06/12/24 09:56:13
ArrayList というコレクションが標準ライブラリにある。
これの Add メソッドは引数に Object 型を要求する。

さて、Object 型しか入れられないのならこのコレクションの存在意義ってなんだ？

728:デフォルトの名無しさん
06/12/24 11:01:47
>>727
どうもです、ありがとうございます

要するに　ADDメソッド　の基本機能が、そもそもどんなｵﾌﾞｼﾞｪｸﾄでもADDできる
ようになっている、ということなのですね

ArrayList.Add メソッドを見ると、はじめから　ADD(”・・・”）　で　String型　の値を
渡してもそのままADDされるということは、ADDの引数は始めからオーバーロード
で定義されているということもあるのでしょうか、ただ

ms-help://MS.VSCC.v80/MS.MSDN.v80/MS.NETDEVFX.v20.ja/cpref2/html/M_System_Collections_ArrayList_Add_1_b4c5a2da.htm

には、オーバーロードの複数引数定義は書かれていませんでした

それとも、Object型として引き受けるということ自体が、String型の値でも元々引き受ける
ようにできているということなのでしょうか、つまりオブジェクト指向での必要条件として
元々　ADDメソッド　はこういう構造になっていると・・・）、このどちらなのでしょう？

729:デフォルトの名無しさん
06/12/24 11:06:30
派生クラスのインスタンスは基底クラスのインスタンスとして振る舞う事が出来る。
それだけ。

ついでに言うと全てのクラス・構造体は Object クラスから派生する。
String クラスのインスタンスは基底クラスである Object クラスのインスタンスとして振る舞う事が出来る。

730:デフォルトの名無しさん
06/12/24 11:14:03
例として
　TreeNodeCollection.Add メソッド
の説明ですと、
　ms-help://MS.VSCC.v80/MS.MSDN.v80/MS.NETDEVFX.v20.ja/CPref17/html/O_T_System_Windows_Forms_TreeNodeCollection_Add.htm
のように、
　String型の値のADD、TreeNode型のｵﾌﾞｼﾞｪｸﾄのADD
も共にオーバーロードの定義が明示されていましたので、型の拡張は明示されて
初めて利用可能になるものと考えたのでした

731:デフォルトの名無しさん
06/12/24 11:16:40
>>729
あ、すみません、かぶりました

＞派生クラスのインスタンスは基底クラスのインスタンスとして振る舞う事が出来る。

つまりオブジェクト指向の標準として、そういうことななのだと、
わかりました。

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

732:デフォルトの名無しさん
06/12/24 11:20:27
>>730の　「TreeNodeCollection.Add メソッド」　のような場合は
他の引数のオーバーロードも定義したので、基本的な標準の
　String型の値のADD、TreeNode型のｵﾌﾞｼﾞｪｸﾄのADD
もついでに記載した、ということなのでしょうね。

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

733:デフォルトの名無しさん
06/12/25 18:44:38
いやTreeNode型のオーバーロードが標準だろ
あとはそれに皮をかぶせただけのオマケ

734:デフォルトの名無しさん
06/12/25 20:27:07
Windows Media Playerを制御することってできますか？
ファイルを指定して再生、停止、開始/終了時間の範囲指定など。

735:デフォルトの名無しさん
06/12/25 21:51:19
できます

736:デフォルトの名無しさん
06/12/26 02:39:28
こんばんは

例外を以下のように処理しようとしているのですが、
メッセージボックスが表示されずに、通常のエラーメッセージが表示されます
原因は何でしょうか？

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

　Dim A As String = "aaa"
　Dim B As Integer

　Try
　　　B = CType(A, Integer)
　Catch ex As Exception
　　　MessageBox.Show("Error")
　End Try
End Sub

737:デフォルトの名無しさん
06/12/26 06:00:31
ネタ？
ネタだよな？

738:デフォルトの名無しさん
06/12/26 06:48:40
質問です。

１を２のように記述したら警告になってしまうのですけど、
この警告を出ないようにするにはどうすればいいですか？
おしえてちょ。

１　Me.DialogResult = Windows.Forms.DialogResult.OK
２　Me.DialogResult = DialogResult.OK

739:デフォルトの名無しさん
06/12/26 08:16:06
理由がわかるようになるまで学習を進める、が正解だと思うよ。

740:734
06/12/26 08:27:26
>>735
どのクラスライブラリを使えばいいんでしょうか？
よかったら教えてちょ

741:デフォルトの名無しさん
06/12/26 10:32:23
>>736

　　∧　∧
　(*‘ω‘ *) 　ちんぽっぽ
　　(　　　)
　　　v v
　　　　　　　　ぼいんっ
　　　川
　　( (　　) )

>>740
wmp.dllを参照に追加

742:デフォルトの名無しさん
06/12/26 14:05:23
皆様お疲れ様です、またよろしくお願いします。
（タイトル）　　デザイン環境による作成時にコントロールを初期化する方法について
（開発環境）　VS2005Pro
（実現したい内容）
　コンポーネント・クラスの作成の仕方として、そのコンポーネントを　アプリケーションの
　フォーム・デザイン時に単に貼り付けた時点でのみ動作する初期化どのように実装するか
（試行）
　 <System.Diagnostics.DebuggerNonUserCode()> _
　 Public Sub New()
MyBase.New()
'この呼び出しは、コンポーネントデザイナで必要です。
InitializeComponent()
　 End Sub
　　に追加しますと、実行時にも実行されてしまう
（その他に）
　　ComponentDesigner.InitializeNewComponent メソッド
　　　　ms-help://MS.VSCC.v80/MS.MSDN.v80/MS.VisualStudio.v80.ja/dv_fxdeveloping/html/914eaa03-092f-4556-9160-b8a2a40641d9.htm
　　　　ms-help://MS.VSCC.v80/MS.MSDN.v80/MS.NETDEVFX.v20.ja/cpref3/html/M_System_ComponentModel_Design_ComponentDesigner_InitializeNewComponent_1_d8aa9975.htm
　を用いる説明があり、Public Overrides Sub InitializeNewComponent(ByVal defaultValues As IDictionary)～End Sub
　を　*..Designer.vb　に追加してみるものの継承元のクラスには同ﾒｿｯﾄﾞはなくエラーとなり、
　Overrides をはずしてエラーを回避し実装したが　（ComponentDesignerクラスは特に利用して
　いないためか）その中にに書いたコードは実行されず
（・・・）　フォーム・デザイン時に単に貼り付けた時点でのみ動作する初期化はどのようにして実装するべきか、よろしくご指導ください、お願い致します

　

743:デフォルトの名無しさん
06/12/26 14:14:29
ネイティブジャパニーズとはとても思えない日本語だな
if DesignMode

744:734
06/12/26 14:23:53
>>741
できません。。。
ぐぐると　URLﾘﾝｸ(www.users.gr.jp)
ツールボックスにWindows Media Player コンポーネントが
出てくるらしいのですが、出ません。

当方、
・WinXPSP2Pro
・Windows Media Player10
・VB2005Express
なんですが・・・orz

ちなみに上記からダウンロードしたソースをC#2005Expressで開くと実行できましたが、
やはりツールボックスにはWindows Media Player コンポーネントがありません・・・

もしかしてExpressEditionではダメなんですかね？

745:デフォルトの名無しさん
06/12/26 14:30:32
>>744
URLﾘﾝｸ(homepage1.nifty.com)

746:デフォルトの名無しさん
06/12/26 14:51:59
>>743
日本語下手ですんません、どう書くと整理できるか編集中にてにをはが狂いました。
実は　Windowsアプリケーションに貼り付けるコントロールだったのですが、

＞if DesignMode

これを書いてみたところデザイン時も、実行時も常に　False　のようで、どちらでも
実行されませんでした（継承元のクラスは　TreeView）。

ヘルプによると、DesignMode　は　
　名前空間: System.Web.UI
　アセンブリ: System.Web (system.web.dll 内)
とあったので　Web部品用のものなのでしょうか？

747:734
06/12/26 14:52:47
>>745
ありがとうございました。
できました（´∀｀）

748:デフォルトの名無しさん
06/12/26 14:54:46
>>746ですが、実際には　System.Web.UI　を　Imports　していなくても
使えていたので、「Web部品用」でなくても持ってるプロパティですよね
うーん、どうしてだろ。。。

749:デフォルトの名無しさん
06/12/26 15:21:12
>>748
System.ComponentModel.Component.Designmodeだよ。
で、C#の記事だけどこれかな？
URLﾘﾝｸ(blogs.wankuma.com)

750:デフォルトの名無しさん
06/12/26 17:02:24
>>749
どうもです、そうでした、System.ComponentModel.Component　にも
DesignMode　はありました。

Parent　の　DesignMode　はその記事の通りやはり　Protected　だった
ようでエラーとなりました。

いまいろいろ調べてみましたがまだ解決していませんが、
さらに調べてみます。

751:デフォルトの名無しさん
06/12/26 20:25:20
URLﾘﾝｸ(www.be-interactive.org)
これをVB2005で行いたいのですが、どのようにすれば良いのか分かりません。

Const WM_COPYDATA As Integer = &H4A
Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hWnd As Integer, ByVal MSG As Integer, ByVal wParam As Integer, ByVal lParam As COPYDATASTRUCT) As Integer

Sub main()
Dim sendMes As New COPYDATASTRUCT
sendMes.lpData = _
New System.Text.StringBuilder("TestAPP" + Chr(0).ToString + "Music" + Chr(0).ToString + "1" + Chr(0).ToString + "{0} - {1}" + Chr(0).ToString + "TEST" + Chr(0).ToString + "TEST")
sendMes.cbData = sendMes.lpData.Length + 2
SendMessage(132030, WM_COPYDATA, Nothing, sendMes)
End Sub

Public Structure COPYDATASTRUCT
Const dwData As Integer = 1351
Public cbData As Integer
Public lpData As System.Text.StringBuilder
End Structure

このようにしたところ、SendMessageのところでTypeLoadExceptionを吐いてしまいます。

よろしくお願いします。

752:デフォルトの名無しさん
06/12/26 20:48:53
・文字コードはそれで大丈夫?
　ANSIだと
　　sendMes.cbData = sendMes.lpData.Length + 1
　だと思うけど。
　SendMessageWにしてCharSet = CharSet.Unicodeにし、
　その場合
　　sendMes.cbData = （sendMes.lpData.Length + 1 )*2

・シグネチャ
　　ByVal lParam As COPYDATASTRUCT → ByRef lParam As COPYDATASTRUCT

753:デフォルトの名無しさん
06/12/26 20:55:40
回答ありがとうございます。・・・しかし無理でした。COPYDATASTRUCTのlpDataが悪さしているようですが、、、

Const WM_COPYDATA As Integer = &H4A
Declare Ansi Function FindWindow Lib "user32.dll" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Integer
Declare Unicode Function SendMessage Lib "user32.dll" Alias "SendMessageW" (ByVal hWnd As Integer, ByVal MSG As Integer, ByVal wParam As Integer, ByRef lParam As COPYDATASTRUCT) As Integer

Sub main()
Dim sendMes As New COPYDATASTRUCT
sendMes.lpData = _
New System.Text.StringBuilder("TestAPP" + ChrW(0).ToString + "Music" + ChrW(0).ToString + "1" + ChrW(0).ToString + "{0} - {1}" + ChrW(0).ToString + "TEST" + ChrW(0).ToString + "TEST")
sendMes.cbData = (sendMes.lpData.Length + 1) * 2
SendMessage(FindWindow("MsnMsgrUIManager", Nothing), WM_COPYDATA, Nothing, sendMes)
End Sub

Public Structure COPYDATASTRUCT
Const dwData As Integer = 1351
Public cbData As Integer
Public lpData As System.Text.StringBuilder
End Structure

754:デフォルトの名無しさん
06/12/26 21:04:56
もうぶっちゃけちゃうと、

COPYDATASTRUCT.lpData をIntPtrにして文字列をMarshal.AllocHGlobal, Marshal.StringToHGlobalAutoで割り当てる
(あとでFreeHGlobal)
んで
sendMes.cbData = (sendMes.lpData.Length + 1) * 2

COPYDATASTRUCTそのものもMarshal.StructureToPtr, Marshal.StructureToPtrでメモリに割り当てて
(あとでFreeHGlobal)

そいで
SendMessageの第４引数をByVal IntPtrにする。

次ページ