VB.NET質問ｽﾚ (Part21)

1 名前：デフォルトの名無しさん [2007/04/23(月) 12:42:36 ] 前スレ VB.NET質問ｽﾚ (Part20) pc11.2ch.net/test/read.cgi/tech/1173061176/ テンプレは2〜10くらいまでの間にある予定 496 名前：デフォルトの名無しさん [2007/06/05(火) 23:13:15 ] すみませんが教えてください。お願いします。 イミディエイト・ウインドウで、"？"　の後ろに、ｵﾌﾞｼﾞｪｸﾄ変数をタイプして エンターすると、ｵﾌﾞｼﾞｪｸﾄのパラメータがダーッと出てくるんですが、 最後まで出ないで < 詳細... (486 のアイテムの最初の 100 を表示しています。) > となって終了します。これを全部出すにはどう操作すればいいでしょう？ よろしくです。 497 名前：デフォルトの名無しさん mailto:sage [2007/06/06(水) 00:02:13 ] 直前に処理したメソッドの内容を無効にして、一つ前状態に戻すアンドゥーの様な 機能を持つボタンを作りたいのですが、どうすればいいでしょうか？ 498 名前：デフォルトの名無しさん mailto:sage [2007/06/06(水) 00:14:21 ] 直前の操作を覚えていれば、逆操作できるだろ 499 名前：デフォルトの名無しさん mailto:sage [2007/06/06(水) 00:15:27 ] 動作をスタックにしていれとく 戻したらこんどはRedoのスタックにいれる 500 名前：最凶VB厨房 mailto:sage [2007/06/06(水) 00:32:03 ] >>497 あらかじめ処理する時に、 変更対象のデータの変更前と変更後を記録しておく。 その記録から、変更後の状態から変更前の状態に戻す。 処理手順の記録も方法の一つ。最初の状態からどんな処理をしたのか 手順を記録しておく。 その記録から最初から最後の処理直前まで処理をして 元に戻す。 前者はExcelちっくな表。後者はお絵かき。を想定。 501 名前：デフォルトの名無しさん mailto:sage [2007/06/06(水) 05:03:57 ] >>498-500 レスありがとうございます。よくわからないけどいろいろ試してみます 502 名前：デフォルトの名無しさん [2007/06/06(水) 06:59:42 ] >>497 覆水盆に帰らず 503 名前：デフォルトの名無しさん [2007/06/06(水) 10:45:05 ] プリンタの一覧を取得したく、以下のプログラムを組みました。 For Each p As String In Printing.PrinterSettings.InstalledPrinters Debug.WriteLine(p) Next しかし、ネットワークプリンタで問題が生じています。 「\\マシン名\プリンタ名」で取得したいのですが、 「自動 プリンタ名 (マシン名 上)」の形式で取得できてしまいます。 ネットワークプリンタを「\\マシン名\プリンタ名」の書式で取得する方法はないのでしょうか？ 宜しくお願いいたします。 504 名前：デフォルトの名無しさん [2007/06/06(水) 14:14:08 ] 初めて質問します。VB6の時、msgbox が表示されたときに、 CNTL + BREAK でデバッグモードに移行できたのですが、 VB.NET ではできません。なんか方法がありますか？ 505 名前：デフォルトの名無しさん mailto:sage [2007/06/06(水) 14:21:17 ] あります 506 名前：デフォルトの名無しさん [2007/06/06(水) 14:39:24 ] >>503 507 名前：デフォルトの名無しさん mailto:sage [2007/06/06(水) 14:41:14 ] >>503 それで普通に \\マシン名\プリンタ名 で出るけどな。 「自動 プリンタ名 (マシン名 上)」 508 名前：504 [2007/06/06(水) 15:01:05 ] >>505 すいませんが、教えてください。 509 名前：デフォルトの名無しさん mailto:sage [2007/06/06(水) 15:06:48 ] >>508 メッセージボックスが出たらその行にブレークポイント仕掛ければいいんじゃね? 510 名前：504 [2007/06/06(水) 15:11:59 ] それをせずに、したいのです。ＶＢ５では当然のように、できてましたから。 511 名前：デフォルトの名無しさん mailto:sage [2007/06/06(水) 15:32:46 ] >>504 IDE に戻って Ctrl+Break では不満なのか。 512 名前：504 [2007/06/06(水) 15:56:09 ] >>511 知らなかった。そんな方法でできたとは・・・　　ありがとう。 513 名前：デフォルトの名無しさん [2007/06/06(水) 21:06:23 ] なぜ、ＤＢ書き込む時のADDNEW  がなくなったんですか？ ＶＢ６でも　皆、使わないんですか？ 514 名前：デフォルトの名無しさん mailto:sage [2007/06/06(水) 21:15:38 ] は？？？ >>513 NewRowがあるじゃないか？？？？ ん？？？ イミフ 515 名前：デフォルトの名無しさん [2007/06/06(水) 21:59:15 ] うへへｗｗ 516 名前：デフォルトの名無しさん mailto:sage [2007/06/07(木) 06:54:44 ] Visual Studioのマクロも子のスレでいけるんでしょうか？ 517 名前：513 mailto:sage [2007/06/07(木) 09:31:44 ] >>514 ADDNEWがいいんです。 518 名前：513 [2007/06/07(木) 09:35:58 ] すまん。知らなかった。INSERT してた。 519 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 20:40:15 ] なんか最近廃れてるね。 [質問１] Nullable(of T)の型に別名をつける方法って何かないかな？ [質問２] Windows Form用の自作の複合コントロールAがあるとして、 それを継承するコントロールA'にさらにコントロールやコンテクストメニューを追加すると、 ビルドも実行も問題ないのにA'をデザイナで開くことができなくなることがあるけど （このとき、「ClickはReadonlyなので書き込みできない、ような意味の例外メッセージがデザイナに 表示される）こういう場合もしAに何か問題があるとしたらどんな可能性があるでしょうか？ 520 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 20:50:07 ] >>519 [質問１]Imports NullableInt = System.Nullable(Of Integer) [質問２]例を出せ 521 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 21:05:18 ] >>520 [質問１] について なるほどこういう場合もImportsが一応使えるのか、ありがとう。 でも、（いや俺の質問の仕方が悪いのですが）その方法だとNullableIntっていう別名は ファイルスコープ（別のファイルからは見えない）になるよね？ 例えばList(of T)なら、 Public Class IntList Inherits List(Of Integer) End Class のように形だけの継承をしてList(Of Integer)にIntListという別名をつけることができるわけだけど、 同じようなことがNullableでもできないかと思いまして。 [質問２] について。 まあおっしゃるとおりなんですが、そういう問題が起こってる複合コントロールは 業務で使ってるんでコード晒せないんですよ申し訳ない。 522 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 21:21:42 ] なんでC#だと言語レベルでNullableをサポートしてるのに VB.NETはサポートしてないんだろうな 逆ならわかるけど 523 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 21:27:18 ] なんでわかるのかわからない 524 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 21:40:03 ] どうでもいいお手軽記法っぽいから でもC#と違ってVB.NETはできるだけ記号を使わない方針のようだから Dim i As Nullable Integer みたいにするんだったら意味ないと考えたのかな 525 名前：デフォルトの名無しさん [2007/06/08(金) 21:41:51 ] javaで ArrayList<Customer> arryCst = new ArrayList<Customer>(); while(rs.next()){ Customer objCst = new Customer(); objCst.setStrCode(rs.getString("code")); objCst.setStrYomi(rs.getString("yomi")); objCst.setStrName(rs.getString("name")); objCst.setStrPost(rs.getString("post")); objCst.setStrAddress(rs.getString("address")); objCst.setStrTel(rs.getString("tel")); arryCst.add(i,objCst); i++; } 見たいな事を.NETでやりたいんですが。。 あるクラスのインスタンスを作ってそのフィールドにDBからとってきた値を格納。 それを配列にしてほかのクラスに渡すようなことをしたいんです。 どうすればいいでしょうか。 526 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 21:52:18 ] 何がわからないのか そのように書け、としか 527 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 21:53:32 ] ArrayList→List 528 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 22:03:53 ] ＞のように形だけの継承をしてList(Of Integer)にIntListという別名をつけることができるわけだけど、 やめてくれｗ 529 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 22:10:11 ] 現在、VB.NETでClickOnceを使用し業務を作成しているのですが、 ClickOnceを使用した場合にクライアントPCのFDアクセスは可能でしょうか？ やれると思うのですが、確証が取れないのです誰か教えてください。 530 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 22:14:34 ] なんでテストしないの? 531 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 22:15:09 ] 誰かができるといったら確証が持てるわけ？ 532 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 22:15:51 ] ってかできないと思う理由は何？ 533 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 22:17:40 ] >>528 別にごく普通の手法だと思うけど。。 534 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 22:19:48 ] それはおかしい 535 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 22:19:58 ] >>529 確証は自分が調べてやってみてから聞けよ そうやってなんでもネットで調べようとするからカスになるんだ 536 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 22:31:09 ] >>533 ネタだよね？ね？ 537 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 22:43:41 ] >>536 別に君がそう思いたければ思えばいいと思うよ俺は止めない。 内心馬鹿だな、とは思うが。 少なくとも俺は外部に公開するときに Public Funtion Hoge() as List(of MyStruct) みたいなことは不恰好だし面倒だしやってられない。 すれにList(of T)ってのは後々案外機能を拡張したくなったりするから それに備える意味でも都合がいいしね。 538 名前：デフォルトの名無しさん mailto:sage [2007/06/08(金) 23:06:10 ] まあ自分が使う分にはいいんじゃない 539 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 00:23:56 ] 別名つけるのにそんなことしたら不便になる面もある。 まあ、その辺は割り切ってやってしまうってのもありだとは思うが。 やらないのは馬鹿みたいなのは本気か？と思うぞ。 540 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 01:01:11 ] >>539 すまん・・・俺の日本語の読解力が足りないせいか理解しづらい文章だ 541 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 01:16:06 ] やりたけりゃやりゃいいが、 それによる弊害もあるんだから、 やらないのは馬鹿みたいな言い方するやつは ほんとに分かってやってるのか？ と疑問だってことだな。 542 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 01:24:59 ] や 　　　　　　　　　　　　　　ら 　　な　　　　　　　い 　　　　　　　　　　　　　か？ 543 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 01:28:25 ] ＞やらないのは馬鹿みたいな言い方 ずいぶんとまた被害妄想的だねえ。 微妙に（いや本当はかなり）ニュアンス違わないか？ >>537にあえて言葉を付け加えるとすれば、 Public Class IntList Inherits List(Of Integer) End Class これに弊害を感じるとしたらむしろそういう自分のセンスにこそ弊害を感じるべきだろう。 継承の1特殊形態（それも最単純な）に過ぎないわけで、これに弊害があるなら 継承なんて怖くて使えないだろう。 544 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 01:29:04 ] >>537 Integerはやめてって言う意味だと思う。 内心馬鹿だな、と思うのは内心だけにしたらどうかと。 545 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 07:35:39 ] ＞継承の1特殊形態（それも最単純な）に過ぎないわけで、これに弊害があるなら 本来同じ意味であるはずの元のListと逆方向の互換性がなくなるとか、 FindAllとかのコレクションを返すメソッドの互換性がなくなるとか いろいろ弊害はあるわけだが。 546 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 07:46:36 ] ＞FindAllとかのコレクションを返すメソッドの互換性がなくなるとか いや、互換性じゃなくて、期待通りに動かない、てことだな。 547 名前：デフォルトの名無しさん [2007/06/09(土) 10:14:05 ] Public Class Form1 2: Inherits System.Windows.Forms.Form 3: 4: #Region " Windows フォーム デザイナで生成されたコード " 5: 6: Public Class Test 7: Public v As Integer 8: End Class 9: 10: Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 11: Trace.WriteLine(DateTime.Now) 12: Dim count As Integer 13: count = 10000000 14: Dim test(count) As Test 15: Dim i As Integer 16: For i = 0 To count - 1 17: test(i) = New Test() 18: test(i).v = i 19: Next 20: Dim sum As Long 21: For i = 0 To count - 1 22: sum = sum + test(i).v 23: Next 24: Trace.WriteLine(DateTime.Now) 25: End Sub 26: End Class 某HPからパクって来たソースです。 これってform　classの中でpublic　classとしてtestというものを宣言しているんでしょうか。 javaだとありえないんですけど、.netだと許されるんでしょうか 548 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 10:15:11 ] >>547 お前の存在そのものがあり得ないと思う 549 名前：デフォルトの名無しさん [2007/06/09(土) 10:23:18 ] 殺すぞテメ 550 名前：デフォルトの名無しさん [2007/06/09(土) 10:39:18 ] 殺人予告です！！！！ Try 殺人計画 包丁を足に落として自爆 いてぇえええええええええ Catch Ex asException 　殺人前に一回オナニーしたいという性衝動の例外が発生しました 　DoTheオナニー finally もう殺人なんてどうでもいいや end try 551 名前：デフォルトの名無しさん [2007/06/09(土) 10:45:18 ] asException でコンパイルエラーとなり、 殺人計画頓挫 552 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 10:47:53 ] ＞javaだとありえないんですけど、.netだと許されるんでしょうか 何がありえないのか明確に。 553 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 10:56:37 ] vb.net検索結果820万件 vb.net　activereports　49100件 java検索結果3億以上 java　＋　eclipse　でも4500万以上 java　eclipse　struts　169万件 こんなマイナー言語もうやりたくねーー わかりにくいHPかっ飛ばしてわかりやすいHP探すとか100%無理だし、本も売ってねーし 考えても答えでねーし。しかもスゲー忙しいからがんばってとか さらにわけのわかんねー10万円以上するつーるつかって、.netでいっぱいいっぱいなのになんでわけのわかんねーツールまで持ち出す 言語知識０でいきなり現場投入とかわけわかんねえええ 適当モード確定 もうどーでもいいや、シネとか言ってごめんね さようなら 554 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 11:03:04 ] クラスの中にもう一個クラス宣言することが許されるのかということ javaちっくに別モジュールにクラス作ってそれほかモジュールから呼ぼうとしたらインスタンスがドーのこーの言われて 出来なかったので調べてただけです。 インスタンス作ろうにもnew　クラス名（）　の（）が.net側で勝手に消されてしまう。 555 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 11:09:43 ] >>554 おまえその様子じゃJAVAもまともに使えてないと思うんだ 使われてるレベルだと思う 556 名前：デフォルトの名無しさん [2007/06/09(土) 11:10:25 ] >>554 試しにソース晒してみろよ？ 557 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 11:19:05 ] ＞クラスの中にもう一個クラス宣言することが許されるのかということ いつのJavaだよ 558 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 11:25:21 ] Java だと無名クラスなんてもんすらあるのにね 559 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 11:36:26 ] ソースさらしたくても会社にしかないので。大体こんな感じです public　class　person private name as string private kana as string private age as integer public sub　setPerson(byval name as string,byval kana as string,byval age as integer) this.name = name '---------thisはmeだったかも、覚えてないです--------- this.kana = kana this.age = age end sub end class 別もじゅーーるのフォームかなんかで 〜前略 person ps =new person '-------かっこつけたくても自動で消えます ps.setPerson(aaa,bbb,111) コンパイルは通ってもインスタンスどーのこーのでエラー javaは使いこなせてません、ただ見たことなかっただけですクラス中にクラスを作る。 560 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 11:40:48 ] >>559 結局何が言いたい（質問したい）んだい？ ただ馴れ合いたいだけなら個人的には他所いってやって欲しいね。 561 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 11:45:35 ] いったいそれは何言語だｗ ちなみにVBでは引数なしのメソッド呼び出しの()は省略できる。 New だとIDEが勝手に消してしまうので、ほっとけばいい。 562 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 11:46:22 ] Javaの方がはるかに内部クラスだらけじゃないか イベントハンドラを実装するために内部クラスを定義しないといけない仕様だぞ 563 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 11:46:29 ] ＞ただ見たことなかっただけです 見たことない＝ありえない。 おまえは神様かっ 564 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 11:55:54 ] 使ったことなかったですわ。('A`) イベントハンドライベントリスナーのことでいいんですかね それだったら使ったことありましたが1個1個implementsして使ってました。 無名とか内部クラスとかは知りませんでした。 .net書き方すらわからん初心者です。 板よごしなのでこれできえます。 565 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 12:01:17 ] 逆に凄いなｗ 566 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 14:45:40 ] もうほっとけよ 567 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 17:36:42 ] vb2003です。くだらない質問ですがお願いします。 mdiの子フォームでキーボードを叩いた時、親フォームのkeydownイベントを走らせないように したいのですけどどうすればいいですか？ 568 名前：デフォルトの名無しさん mailto:sage [2007/06/09(土) 17:58:25 ] 親のKeyPreview = Falseにする。 する、というかデフォルトでFalseなはずだけど。 自分でTrueにしておかしいおかしいって言ってるとしたらアホ丸出しだね。 569 名前：567 mailto:sage [2007/06/09(土) 18:25:05 ] >>568 ありがとうございます。確認してみます。 570 名前：デフォルトの名無しさん [2007/06/10(日) 13:58:04 ] vb.net2005でクラス同士が完全に等しいか比べるにはどうしたらいいのでしょうか？ equalsを使用してもうまくいきません 571 名前：デフォルトの名無しさん mailto:sage [2007/06/10(日) 14:02:50 ] インスタンスじゃなくてクラスが等しいのか。 普通見ればわかるんじゃね？ 572 名前：570 mailto:sage [2007/06/10(日) 14:04:13 ] >>571 すいません インスタンスです 573 名前：デフォルトの名無しさん mailto:sage [2007/06/10(日) 14:08:28 ] 何をもって完全に等しいとするのかをはっきりさせんといかんな。 574 名前：デフォルトの名無しさん mailto:sage [2007/06/10(日) 14:11:18 ] >>570 愚問だと思うよ。 そもそもそういう質問をするのはクラスがよく分かってないからだろうから 真面目に勉強しろ、としか言いようがない。 c#になるけど、アスキーから出てるartonって人のc#の本がその辺り 分かり易く掘り下げてるから読んでみるといいと思う。 575 名前：570 mailto:sage [2007/06/10(日) 14:15:08 ] >>573 なるほど！！！ 何をもって完全に等しいかを考えればよかったんですね！！！！！ 中に入っている変数の値、全てが完全に等しいものを探しているので 一つ一つ比較していけばおｋですね！ arraylistとか型がobject型のものは完全に等しいかを考えるのがむずかしいですね 576 名前：デフォルトの名無しさん mailto:sage [2007/06/10(日) 14:32:07 ] 思而不学則殆そのものだな。 まあ人事だからどうでもいいけど 577 名前：デフォルトの名無しさん mailto:sage [2007/06/10(日) 21:44:42 ] Wubi - Ubuntu installer for Windows pc11.2ch.net/test/read.cgi/software/1181387720/l50 578 名前：デフォルトの名無しさん mailto:sage [2007/06/10(日) 23:39:47 ] コピペ君って馬鹿だな、まで読んだ。 579 名前：デフォルトの名無しさん mailto:sage [2007/06/11(月) 06:18:32 ] ここは初心者馬鹿にしてストレス発散するスレだな。 580 名前：デフォルトの名無しさん [2007/06/11(月) 07:08:15 ] Form1で動画を再生(winmm.dllのmciSendStringAのopen、window、playを使って)→Form1をクリックしたら停止 というのを実現したいのですが、停止がうまくいきません。 Form1の動画以外の場所をクリックした時は停止するんですが、動画をクリックした時は停止しません。 動画をクリックした時も停止させる方法はあるのでしょうか？ ちなみに↓が停止のコードです。 Dim FileName As String = """C:\1.avi""" End SubSub Form1_Click(省略) Handles Me.Click mciSendStringA("close " & FileName, "", 0, 0) End Sub 581 名前：580 [2007/06/11(月) 07:11:38 ] すみません、間違えました。 ↓です。 Dim FileName As String = """C:\1.avi""" Sub Form1_Click(省略) Handles Me.Click mciSendStringA("close " & FileName, "", 0, 0) End Sub 582 名前：デフォルトの名無しさん [2007/06/11(月) 09:18:41 ] フォーム1に同じデリゲートのプロシージャ作って 動画のクリックイベントに停止処理のプロシージャをAddhandlerしたら終わるんじゃないの？ 583 名前：デフォルトの名無しさん mailto:sage [2007/06/11(月) 10:39:17 ] 動画をクリッコしたとき発生するイベントに mciSendStringA("close " & FileName, "", 0, 0) って書けばいいだろ。 584 名前：デフォルトの名無しさん mailto:sage [2007/06/11(月) 10:52:16 ] 栗っ子 585 名前：デフォルトの名無しさん mailto:sage [2007/06/11(月) 11:47:55 ] VB.NETでは「メソッド」と「プロシージャ」の言葉はどう使い分けてるの? プロシージャ : クラスかモジュールに定義されたSubかFunction メソッド : クラスに定義されたプロシージャ でいいの? 586 名前：580 [2007/06/11(月) 14:37:12 ] めちゃくちゃ低能な質問ですが、 mciSendStringA("window " & FileName & " handle " & Me.Handle.ToString, "", 0, 0) これで動画の表示先をForm1にしているのですが(MeはForm1)、この場合の動画のクリックイベントはMe.Clickではないのですか？ 587 名前：デフォルトの名無しさん [2007/06/11(月) 17:13:24 ] いや・・・・それいぜんに Dim FileName As String = """C:\1.avi""" >>End SubSub Form1_Click(省略) Handles Me.Click mciSendStringA("close " & FileName, "", 0, 0) End Sub >>つけてる行のソースはありえないから ヘタな小細工せずにそのまま貼り付けろヤ 588 名前：デフォルトの名無しさん [2007/06/11(月) 17:19:45 ] データ個数32768個（可変）、チャンネルが8ｃｈ（可変）のデータがテキスト形式であります。 チャンネルはタブ区切り、データ個数は改行区切りです。 　　　1ｃｈ　　　2ｃｈ　　　3ｃｈ　　　4ｃｈ　　… 1　　　0.5　　　 0.7　　　0.8　　　0.9　　　… 2　　　0.6　　　 0.12　　 0.13　　 0.5　　　… … 32768 という感じの並びです。これを2次元配列に格納してそれぞれのチャンネルの 解析に入りたいのですが、どうやって2次元配列に格納できるでしょうか？ Splitを使ってみたのですが、いまいち分からずに困っています。 589 名前：デフォルトの名無しさん mailto:sage [2007/06/11(月) 17:24:33 ] >588 590 名前：デフォルトの名無しさん mailto:sage [2007/06/11(月) 17:35:56 ] >588 きみのいう2次元配列ってのは (データ番号,チャンネル番号)でいいのかな？ 591 名前：デフォルトの名無しさん mailto:sage [2007/06/11(月) 17:37:00 ] Dim hoge(,) As String For i As Integer = 0 To データ数 - 1 データ = (i+1)行目のデータ Dim hogehoge() As String = データ.Split(Chr(Keys.Tab)) For j As Integer = 0 To hogehoge.Split(Chr(Keys.Tab)).Length - 1 ReDim Preserve hoge(i, j) =　hogehoge(j) Next Next 592 名前：588 [2007/06/11(月) 17:45:31 ] レスありがとうございます。 2次元配列はできたら（チャンネル番号、データ番号）がいいですが、 解析はどちらでもできると思います。 ReDim Preserve　は処理の速さはどうなんでしょう？ 593 名前：デフォルトの名無しさん mailto:sage [2007/06/11(月) 17:52:05 ] 自分で試してみろ 594 名前：580 mailto:sage [2007/06/11(月) 18:21:32 ] <<587 <<580は間違いなので、<<581で訂正していますが…。 とりあえず、全体です。 Public Class Form1 Dim FileName As String = """C:\1.avi""" Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" _ (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, _ ByVal uReturnLength As Integer, ByVal hwndCallback As Integer) As Integer Function SendString(ByVal cmdString As String) As Long SendString = mciSendString(cmdString, "", 0, 0) End Function Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click SendString("open " & FileName & " alias f1") SendString("window f1 handle " & Me.Handle.ToString) SendString("play f1") End Sub Private Sub Form1_Click(ByVal sender As Object, _ ByVal e As System.EventArgs) Handles Me.Click SendString("close f1") End Sub End Class ケータイで書き込んでいるので、見づらかったらすみません。 今パソコンから書き込めないんです。 595 名前：580 mailto:sage [2007/06/11(月) 18:31:13 ] >と<を間違えたorz 596 名前：デフォルトの名無しさん mailto:sage [2007/06/11(月) 18:40:22 ] >>591 やめてくれ

---

---

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

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