VB.NET質問ｽﾚ (Part6)

1 名前：デフォルトの名無しさん [04/07/03 08:49] VB.NETの質問全般です 過去スレ VB.NET質問ｽﾚ (Part5) pc5.2ch.net/test/read.cgi/tech/1078134703/ VB.NET質問ｽﾚ (Part4) pc2.2ch.net/test/read.cgi/tech/1065269043/ 【老若】VB.net質問ｽﾚ【男女】 (Part3) pc2.2ch.net/test/read.cgi/tech/1056281084/ 【老若】VB.net質問ｽﾚ【男女】 (Part2) pc2.2ch.net/tech/kako/1043/10436/1043629429.html 【老若】VB.net質問ｽﾚ【男女】 pc2.2ch.net/tech/kako/1025/10258/1025848458.html 482 名前：デフォルトの名無しさん mailto:sage [04/08/12 22:26] VBは確かに楽な言語だな。 VBで用意されているコンポーネントを使う分にはとても楽でいい。 ちょっと変な事を客から要求されるとかなり大変になるけど。 でも、VBに溺れたＰＧは最悪だな。 もうＶＢ以外全然できない。 入門としてＶＢをやるのはいいが、そこからステップアップする気概が欲しいね。 483 名前：デフォルトの名無しさん mailto:sage [04/08/12 23:02] >>473 電卓みたいに、入力できるのを最下桁に固定すると 簡単になるじょ。 484 名前：デフォルトの名無しさん mailto:sage [04/08/12 23:03] >>482 .NET使ったこと無いだろ（ｗ 485 名前：デフォルトの名無しさん mailto:sage [04/08/12 23:07] >484 残念、逆。 .NETでVBに触れた。 486 名前：デフォルトの名無しさん [04/08/12 23:08] >>482 ＞入門としてＶＢをやるのはいいが、そこからステップアップする気概が欲しいね。 Ｃ言語のほうが使いやすい奴がＶＢはじめるのはステップダウンですか？ 487 名前：デフォルトの名無しさん mailto:sage [04/08/12 23:13] >>485 そっか・・・ 貴殿はVB6を見ると卒倒するんだろうな・・・ 488 名前：デフォルトの名無しさん mailto:sage [04/08/12 23:20] >486 そうは言わないよ。 VBだって優れた言語だ。 ただ、VBしかやっていないでいると、計算機の本質を考えずにプログラミングできてしまう。 それは>482で言った「ちょっと変な事」を実現するための想像力の欠如に繋がる。 結果として作られたレールの上しか走れないＰＧになる。 それはクリエイターとしては大きすぎる痛手だ。 >487 色んな言語やってるから大丈夫だと思う。 自分で設計するならオブジェクト指向なしに戻りたくはないが。 489 名前：デフォルトの名無しさん mailto:sage [04/08/12 23:30] >>488 計算機の本質じゃなくて、Windowsプログラミングの本質でしょ。 何が本質かは主観の問題だろうけど、 SDKプログラミングだって「作られたレールの上」を走っていることに違いはない。 490 名前：デフォルトの名無しさん mailto:sage [04/08/12 23:49] 結局自慢話か(　´,_ゝ｀) 491 名前：デフォルトの名無しさん mailto:sage [04/08/12 23:51] 「VBでアプリを作るのは非常に簡単。VBで『マトモな』アプリを組むのは非常に難しい」 VB4の頃からウチの会社に伝わっている格調高き名言でつ。 ﾄﾞﾄﾈﾄになってからは更に加速したﾖｶﾝ。 492 名前：デフォルトの名無しさん mailto:sage [04/08/12 23:53] >>488 まあ、言ってる事は分かるんだけど、VB.NETに関しちゃ、 JavaでもC#でも似たようなもんじゃないかな。Cとかなら別だけど。 計算機の本質と言うか、単にプログラミングということ自体の理解が足りないかな。 ついでに… 最悪なのはVBしか出来ないプログラマではなくて、VBすらできないプログラマだ… ってか、VB.NETが「ちゃんと」使えるなら大丈夫なんだけどね。 493 名前：483 mailto:sage [04/08/13 00:04] ひまだとＶＢ議論のスレになるのだ。 >>473 こんな感じでいかがなものかな？ Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress Dim v As Decimal If InStr("0123456789", e.KeyChar) > 0 Then v = Val(TextBox1.Text.Replace(",", "")) v = v * 10 + Val(e.KeyChar) TextBox1.Text = Format(v, "#,##0") TextBox1.SelectionStart = TextBox1.Text.Length End If e.Handled = True End Sub 若干手抜きかも知れないのでみんなで直してくれい。 494 名前：デフォルトの名無しさん mailto:sage [04/08/13 00:08] TextChangedだったかのイベントの方が良いと思うのだよ。 495 名前：483 mailto:sage [04/08/13 00:12] >>494 そうなの？ 理由教えて。 496 名前：デフォルトの名無しさん mailto:sage [04/08/13 00:25] あ、ちょっと勘違いしてたかも… 言いたかったのは、メニューからペーストした場合とか、 要はキー入力以外でも書き換えられる可能性はあるという意味だったんだが… 497 名前：483 mailto:sage [04/08/13 00:43] >>496 なるほどね。ペーストされちゃダメだわ。 でも言われて TextChanged バージョンも作ってみたけど結構めんどうそうだよ。 Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged Dim c As Integer Dim v As Decimal c = TextBox2.SelectionStart If c > 0 Then If InStr("0123456789", TextBox2.Text.Substring(c - 1, 1)) = 0 Then TextBox2.Text = TextBox2.Text.Replace(TextBox2.Text.Substring(c - 1, 1), "") TextBox2.SelectionStart = c - 1 End If End If c = TextBox2.Text.Length - TextBox2.SelectionStart v = Val(TextBox2.Text.Replace(",", "")) TextBox2.Text = Format(v, "#,##0") If TextBox2.Text.Length - c > 0 Then TextBox2.SelectionStart = TextBox2.Text.Length - c End Sub まだちょっとおかしい。 498 名前：483 mailto:sage [04/08/13 00:57] もっと簡単になったよ。 Private Sub TextBox3_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox3.TextChanged Dim c As Integer Dim a As Integer Dim v As Decimal c = TextBox3.Text.Length - TextBox3.SelectionStart For a = 0 To TextBox3.Text.Length - 1 If InStr("0123456789", TextBox3.Text.Substring(a, 1)) > 0 Then v = v * 10 + Val(TextBox3.Text.Substring(a, 1)) End If Next TextBox3.Text = Format(v, "#,##0") If TextBox3.Text.Length - c > 0 Then TextBox3.SelectionStart = TextBox3.Text.Length - c End Sub こんなもんでいいのかな？ 499 名前：デフォルトの名無しさん mailto:sage [04/08/13 00:57] だからそもそもそんな糞みたいなUI採用するのが間違っとる。 まあそれは置くとしても入力制限するんだからそもそもペーストに反応しちゃまずい。 そして入力制限さえ出来れば、後の処理はParseしてToStringするだけ。 TextBox1.Text = Integer.Parse(TextBox1.Text).ToString("###,###,###,###,###,###") 500 名前：483 mailto:sage [04/08/13 01:19] >>499 １行で出来るよってこと？ そうだったのか、かっこ悪い漏れ orz 後は任せた。 501 名前：デフォルトの名無しさん [04/08/13 08:42] >>486 自分もそのクチだけど、けっこう新しい発見があるので損はしないよ。 502 名前：デフォルトの名無しさん [04/08/13 09:14] 偉そうなこと言う奴に限ってxxx 499 < 498 503 名前：デフォルトの名無しさん [04/08/13 17:12] >>502 まあおまえは何も出来ない無能なわけだが。 504 名前：デフォルトの名無しさん mailto:sage [04/08/13 18:29] OSの作り方教えてください。 505 名前：デフォルトの名無しさん mailto:sage [04/08/13 20:53] TabControlなのですが、ふと気付くとタブの順序が入れ替わって しまっていることがありるのですが、戻す方法は無いでしょうか・・・ 506 名前：デフォルトの名無しさん mailto:sage [04/08/13 21:05] Tabつながりでふと思い出したこと TABキーを押したときの順番をGUIで変更することってきる？（ACCESSみたいに） .NET発表の際にその辺が強化されたって話を聞いてたんだけど 507 名前：デフォルトの名無しさん mailto:sage [04/08/13 22:29] >>502 まぁほっといてやれ。 もともとの質問出した >>473 が好きなほうを選ぶよ。 508 名前：デフォルトの名無しさん mailto:sage [04/08/13 22:45] >>505 デザイン時？ 実行時？ デザイン時なら、TabPageコレクションエディタの [↑] [↓] ボタンで 順番は変えられるよ。 実行時なら、もう少し詳しく現象を報告してちょ。 509 名前：デフォルトの名無しさん mailto:sage [04/08/13 22:46] >>506 旧VBって、できなかったの? 510 名前：デフォルトの名無しさん mailto:sage [04/08/13 22:50] >>508 デザイン時なら、TabPageコレクションエディタの [↑] [↓] ボタンで できました。ありがとうございます。 実行時に勝手に変わるということは無いと思うので、デザイン時だとは思うのですが そのプロパティはいじってないし、ふと気付くと変わってることがある状態で気持ち 悪いです（しく VB.NET(2002) 511 名前：506 mailto:sage [04/08/14 03:07] 自己解決 表示のタブオーダーでできました 512 名前：506 mailto:sage [04/08/14 03:12] >>509 もしかしたら有るのかもしれないけど 一個一個ｵｻﾙのごとく数値変えてました（ｗ 513 名前：デフォルトの名無しさん [04/08/14 16:15] VB.net 2003でWindowsコントロールライブラリの勉強をしています。 UserControl上にLabelとButtonを追加したユーザーコントロールに 新たなプロパティーを追加する場合について質問です。 <System.ComponentModel.Browsable(True)> _ Public Property tProp_Button() As Button Get Return Me.Button1 End Get Set(ByVal Value As Button) Me.Button1 = Value End Set End Property Buttonをデザイン上で変更出来るようにする為に上記のコードを記述すると、 そのユーザーコントロールを貼り付けた別のプロジェクトのデザイン上では、変更した値が表示される(例えば.textに"hoge"とするとボタンに"hoge"と表示される)のですが、 そのプロジェクトを実行させた場合、デザイン上で変更した値が反映されません。 ただ、Buttion1の宣言をpublicにして、コードで変更した値は、実行時には正常に反映されます。 コントロール自体をデザイン上で変更出来る様にするにはどのようにすればよいのでしょうか？ 514 名前：デフォルトの名無しさん mailto:sage [04/08/14 16:23] なにがしたいのかさっぱり分からん。 デザイナ上でコントロール自身を変更するってどういうこと？ っていうかコントロール自身を入れ替えてどうするの？ 515 名前：デフォルトの名無しさん [04/08/14 19:42] >281さん、結果報告キボンヌ。 ぢつはおいらも、別フォームで入力したテキストの内容を、セクション１の テキストオブジェクトに表示したくて、Googleで調べたらここに辿り着いた っす。 で、そのテストに>290さんのをやってみました。 ビューワーを指定したFormを開くときに、>290さんのコードを実行している んですが、ビルドエラーなどは出ないんですけど、Text1は空っぽのままっす。 表示したビューワーをリロードしても表示されませんです。 >281 さん、上手くいったなら、報告をながいます。 516 名前：デフォルトの名無しさん mailto:sage [04/08/15 00:24] 質問なのですが、下のリンク先にある、Visual Basic .NET 2003というものは、Visual Studioを使った時のようなエディタがついているのでしょうか? ttp://www.microsoft.com/japan/msdn/vbasic/productinfo/default.asp 兄が、仕事で使っているというVB.NETでは、関数の名前を入力した後、ピリオドをうつと各プロパティとか命令が表示されて、かつそれぞれのヘルプまで表示されると聞いたのですが、その機能がほしいのです。 517 名前：デフォルトの名無しさん mailto:sage [04/08/15 00:37] >>514 それは君が無知で無恥だから。ユーザーコントロールって概念が理解できてないんだろ。 知らないなら黙ってろよ。 何をやりたいかは>>513の文章で理解可能。俺は解決法は知らないけど。 ま、でもデザインモードでの変更がコードに反映されてないだけだろうから そんなに難しい問題じゃない気がするけど。 .NETではVB6みたいにウィザードがコード書いてくれないのか？ 518 名前：デフォルトの名無しさん mailto:sage [04/08/15 00:55] >>517 うーむ、俺が無知なら正直すまんかったんだが… 見たところユーザコントロールに既に貼り付けてあるボタンのインスタンスを プロパティで入れ替えようとしてるんだよね？ ってかいてて今やりたいことが多分分かった… 普通その場合は、プロパティを読込専用にするだろ？ 入れ替えできるようなプロパティを書いてるから勘違いしてたよ。 519 名前：デフォルトの名無しさん mailto:sage [04/08/15 00:57] あと、VB.NETで貼り付けたコントロールの実体はプロパティなので、 普通はメンバをPublicにするだけでOK。 まあ、新たに追加してもいいことはいいんだけど… 520 名前：デフォルトの名無しさん mailto:sage [04/08/15 01:00] って何度もすまん、これじゃデザイナでできないって言ってるのか… まえに同じような事して単純に出来たような気がするんだけど…未確認。 生成されたコード上でのプロパティの設定順かな…？ 521 名前：デフォルトの名無しさん mailto:sage [04/08/15 01:15] >>516 「VB.NET単体でVS.NETと同じようなテキストエディタが用意されているのか？」 と言う質問ですか？ それなら答えはYesです 522 名前：デフォルトの名無しさん mailto:sage [04/08/15 01:29] >>517 俺には>>513の意味はぱっと見て分からなかった。 誤解を招く表現がいくつかあるから、意味を取れなくても無知かどうかは分からんのじゃないの？ 逆にやりたいことと>>513の書き込みを見て違和感も感じないなら、その方が無知の可能性あり。 523 名前：513 [04/08/15 10:12] すみません。難解な文章を書いてしまって･･･もう一度、書いてみますと UserControl上にButton1を追加します。そして、Button1をデザイン上で設定出来るようにする為にプロパティを追加しました。（UserControlのコードを下記に記載） そして、ビルドを行いUserControl1.dllを生成し、Windowsアプリケーションの別プロジェクトを立ち上げ、アイテムの追加と削除より、UserControl1.dllを追加します。 Form上にUserControl1を貼り付け、プロパティを見ると、tButtonが出来ています。 そのtButtonプロパティの値を変更（Textに"hoge"をセットする）とデザイン上では、Button1の表示が"hoge"となります。 この状態で、実行してみると、Textに"hoge"とセットしていたはずなのに、"hoge"と表示されず"Button1"と表示されます。 このように、プロパティで設定した値が、実行時には全く反映されません。 どのようにすれば良いのでしょうか？ >>519 Button1をPublicに変更して行って見ましたが、プロパティで設定した値は、デザイン上では 変わっているのですが、実行時には反映されませんでした。 Public Class UserControl1 Inherits System.Windows.Forms.UserControl #Region " Windows フォーム デザイナで生成されたコード " <System.ComponentModel.Browsable(True) _ , System.ComponentModel.DesignerSerializationVisibility(System.ComponentModel.DesignerSerializationVisibility.Content)> _ Public Property tButton() As Button Get Return Me.Button1 End Get Set(ByVal Value As Button) Me.Button1 = Value End Set End Property End Class 524 名前：516 mailto:sage [04/08/15 12:51] >>521 ありがとうございます。 525 名前：デフォルトの名無しさん mailto:sage [04/08/15 13:10] >>523 デザイナで生成されたコード内に、プロパティの変更コードは出てる？ 526 名前：デフォルトの名無しさん mailto:sage [04/08/15 15:33] エクスプローラの詳細表示のような、横に複数項目表示できるリストボックスって VB.NET標準コントロールには無いの？ 527 名前：526 mailto:sage [04/08/15 15:46] 悪い。自己解決した。ListViewだったね 528 名前：デフォルトの名無しさん [04/08/15 22:31] test 529 名前：デフォルトの名無しさん mailto:sage [04/08/16 09:04] >513 どっかで見た質問だなぁ。 どこで見たんだろ……まぁいいや。 そんときは >#Region " Windows フォーム デザイナで生成されたコード " この中で初期化してた、ってオチだったよ。 530 名前：デフォルトの名無しさん mailto:sage [04/08/16 09:35] >>513 そもそも、Button1のプロパティを全て公開する必要があるの？ ユーザーコントロールにカプセル化するんだから、 必要なプロパティのみを公開すべきじゃない？ Public Property ButtonText() As String 　　Get 　　　　Return Button1.Text 　　End Get 　　Set(ByVal Value As String) 　　　　Button1.Text = Value 　　End Set End Property 他にも必要なら、 ButtonBackColor とか、 ButtonFont という風に追加すればいいのでは？ 531 名前：ＭＳサンプルにバグ？ [04/08/16 09:48] ja.gotdotnet.com/quickstart/howto/doc/Remoting/mainfeatures.aspx リモート処理の概要 参照によってオブジェクトを渡すのサンプルを実行すると、 セキュリティ制限のため、型 System.Runtime.Remoting.ObjRef にアクセスできません。 というエラーがでます。 クライアント、リモート オブジェクト、およびリモート ホスト アセンブリを異なるディレクトリに置いてサンプル実行しています。 対策ご存知の方、教えてください。 532 名前：自己解決 [04/08/16 18:43] >>531自己解決。お騒がせ↓ www.microsoft.com/japan/msdn/library/default.asp?url=/japan/msdn/library/ja/cpguide/html/cpconautomaticdeserializationinnetremoting.asp 533 名前：513 [04/08/16 23:08] >>529 確かに #Region " Windows フォーム デザイナで生成されたコード " の中は、デフォルトのままです。具体的には、どのように修正すれば宜しいのでしょうか？ >>530 確かに、通常は必要と思われるプロパティのみ公開するのですが、 ボタンコントロールなどは、予めどれが必要と言われると、ほぼ全部使う可能性があると思われます。 その場合、数十にもなるプロパティを記述していくのは･･･という事と、 勉強も兼ねて、コントロール自体のプロパティを全て公開するにはどうするのだろうと、疑問に思い 質問した次第です。 534 名前：473 mailto:sage [04/08/17 14:52] 483さんの方法でやってみたらうまく行きました。ありがとうございます。 535 名前：デフォルトの名無しさん [04/08/19 17:03] APIを使いたいんですが 関数の形は void __stdcall fncSub(struct Info *p); って形になっていて Public Declare Sub fncSub Lib "HOGE.DLL" (ByRef p As Info) という風に宣言して fncSub(p) というように呼び出したんですが、 「'System.NullReferenceException' のハンドルされていない例外が test.exe で発生しました。 追加情報 : オブジェクト参照がオブジェクト インスタンスに設定されていません。」 て出るんです。 どのようにすれば正しく呼び出せるのでしょうか。 よろしくお願いします。 536 名前：デフォルトの名無しさん [04/08/19 17:28] ぬるり 537 名前：デフォルトの名無しさん [04/08/19 17:39] データアダプタで質問させてください。 まず前作業としてMDBでテーブル２つとビュー１つを作成します。 TABLE1 　　ID,FIELD_1,FIELD_2　（キーはID） TABLE2 　　ID,FIELD_A,FIELD_B　（キーはID） VIEW1 　　ID,FIELD_1,FIELD_2,FIELD_A,FIELD_B さて、ここでVB.NETからVIEW1のデータアダプタを作りたいのですが、 構成ウィザードで警告が出てしまい、UPDATEとDELETEについてコマンドが作成されません。 アダプタ自体は作成できるのですが、削除が実行できないのです。 どうしたらいいんでしょうか・・・ TABLE1とTABLE2の２つアダプタを作って、それぞれに削除かけないとだめなのかしら・・・ VIEWで一発ですませたいんですが・・・ 538 名前：デフォルトの名無しさん [04/08/19 17:49] あ、警告はちなみに一意に識別する列を作成できませんでした、とかいうやつです。 キーがあるから一意のはずだし、Accessからは削除できるのに・・・なぜ・・・ 539 名前：デフォルトの名無しさん mailto:sage [04/08/19 20:23] >537-538 DBは何を使ってるんだよ。 DBから主キーを取得できてないって事。 540 名前：デフォルトの名無しさん mailto:sage [04/08/19 22:10] >>536 ガッ 541 名前：535 mailto:sage [04/08/19 22:37] 535です。 どうやらAPIのほうが悪かったようで void __stdcall fncSub(struct Info *p); は extern "C" HOGE_API void __stdcall fncSub(struct Info *p); という風にするのを忘れていたようです。 それで、後者のほうにDLLを修正したところ、今度は 「'System.ExecutionEngineException' のハンドルされていない例外が mscorlib.dll で発生しました。」 というエラーが発生しました。 これはどういうエラーなんでしょうか。 ググったりMSDNで調べたりしましたがいまいちわかりません。 分かる人がいましたら解決方法を教えてください。 よろしくお願いします。 542 名前：デフォルトの名無しさん mailto:sage [04/08/19 23:32] そのAPIって参照設定で読み込めたりしないのかと横着を考える 543 名前：541 mailto:age [04/08/20 00:50] >>541 参照設定をしようとしたら「有効なDLLじゃない」とエラーが出て 設定できませんでした。 ところで、使っている構造体の形は struct Info{ char A[10][1024]; char B[10][512]; char C[10][512]; }; って形になっているんですけど、VBでこの構造体を宣言するには Public Structure Info Dim A() As String Dim B() As String Dim C() As String End Structure でいいんでしょうか？教えてください。お願いします。 544 名前：デフォルトの名無しさん mailto:sage [04/08/20 08:15] >>543 だめ。構造体の宣言で、マーシャリングをきっちり指定する必要あり。 結構面倒だよ。 545 名前：デフォルトの名無しさん mailto:sage [04/08/20 17:04] .netであるクラスのプロパティを動的に参照するため wk1 = ClassA.PropA wk2 = ClassA.PropB ↓ wk1 = ClassA.xxxx("PropA") wk1 = ClassA.xxxx("PropB") のような感じにしたいのですが どのようにコーディングすればよいでしょう？？？ VB6時代だとProperties("PropA")のようなことができた気が… 546 名前：デフォルトの名無しさん mailto:sage [04/08/20 18:50] VB よくわかんないけど、例えばクラス ClassA の静的プロパティの場合 val = typeof(ClassA).GetProperty("PropA").GetValue(Nothing, Nothing) インスタンス a のプロパティの場合 val = GetType(a).GetProperty("PropA").GetValue(a, Nothing) とかかなあ・・・ Object が帰ってくるから、型変換は必要。 あとプロパティの一覧を得たいなら、System.Type.GetProperties メソッドが使えます。 547 名前：546 mailto:sage [04/08/20 18:50] >>546 ｽﾏｿ。typeof は C# か。 548 名前：デフォルトの名無しさん mailto:sage [04/08/21 00:55] >>546-547 >GetType(a).GetProperty("PropA").GetValue(a, Nothing) 書き込み後なんとかGetType(a).GetProperty("PropA")のプロパティ情報列挙までは自己解決していましたが GetValue()の配列indexの使用法を間違ってました。 配列要素でないときはNothingなのかー！ 激さんくすです！！ 549 名前：デフォルトの名無しさん mailto:sage [04/08/21 17:42] データーグリッドを使って、データーを表示させた際に、グリッド右端をクリックすると 幅が自動で広がりますが、あれをプログラムでやらせることは出来るでしょうか？ 550 名前：デフォルトの名無しさん [04/08/21 19:09] MSDEとＶＢの組み合わせで、"display_order"をintに設定して SqlDataAdapter1.SelectCommand.CommandText = "SELECT * FROM pc_data ORDER BY display_order " とやると数値が大きなものが上にきてソートされます。 SqlDataAdapter1.SelectCommand.CommandText = "SELECT * FROM pc_data ORDER BY display_order DESC" とやれば、小さい順にソートされるかな・・・とやってみたのですが、うまく動きません。何が間違っているのでしょうか？ 551 名前：デフォルトの名無しさん mailto:sage [04/08/21 20:17] どうでもいいけど昇順と降順間違ってないか？ 552 名前：デフォルトの名無しさん mailto:sage [04/08/21 22:05] いろいろ 553 名前：デフォルトの名無しさん mailto:sage [04/08/21 22:51] まだVB.NET初めて間もないのですが 以下のようなコードで「オブジェクト参照のインスタンスがありません」 とエラーが出てしまいます。 dim wrk_item() as string wrk_item(0) = "テキスト"　　←ここでエラーが起こってます wrk_item(1) = "テスト" エラーの原因がわかりません。配列の要素数はあらかじめ決めておかないと だめなのでしょうか・・・ 554 名前：デフォルトの名無しさん mailto:sage [04/08/21 23:17] dim wrk_item() as string = { "","" } 555 名前：デフォルトの名無しさん mailto:sage [04/08/21 23:19] 「配列を参照する事のできる」変数を定義しただけで、 「配列自体を作成」していない。変数の初期もしていない。 よって「配列を参照する事のできる」変数はNothingのままだから以下省略 556 名前：デフォルトの名無しさん mailto:sage [04/08/21 23:20] >>554 ありがとうございます やはり配列要素を決めておかないとだめみたいですね 557 名前：デフォルトの名無しさん mailto:sage [04/08/21 23:22] >>555 なるほど、そういうことでしたか・・・ 558 名前：デフォルトの名無しさん mailto:sage [04/08/21 23:33] >553 ArrayListとかReDimとか使えば？ 559 名前：デフォルトの名無しさん mailto:sage [04/08/22 10:21] ボクのPCはDELLのディメンションですがVB.NETをうごかしてもこわれないでしょうか？ 560 名前：デフォルトの名無しさん mailto:sage [04/08/22 10:24] 残念ながらどこのPCでも壊れるときは壊れます。 561 名前：デフォルトの名無しさん mailto:sage [04/08/22 14:15] まあ、基本的にはArrayListあたり使うのが常套かな。 562 名前：デフォルトの名無しさん [04/08/22 18:56] >>559 VisualStudio.net入れると壊れる可能性が高いですね。 563 名前：デフォルトの名無しさん [04/08/23 09:19] >>550 ここは初心者の来る場所じゃありませんＹＯｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗ 564 名前：デフォルトの名無しさん mailto:sage [04/08/23 12:35] かといって高度な問題には解答が出来なかったりする 565 名前：デフォルトの名無しさん mailto:sage [04/08/23 13:57] 変数のタイプっの取得なんですが･･･ dim val dim s as String = "" val = s.GetTypeCode なら結果　String ですが dim val dim s as String val = s.GetTypeCode で初期化していないと当然 ｓは生成されていないので.GetTypeCodeが取れません。 初期化されてない変数タイプ取得ってどう記述しますか？ 566 名前：565 mailto:sage [04/08/23 14:02] あ、ちなみに上記で GetTypeCode(s) で　Object　が返るのですが Dimで定義されている　String　を返したいのです･･･ 567 名前：デフォルトの名無しさん [04/08/23 16:17] >>550 どう動かないのかというのが良くわからないが、データーグリッドの表示順を変えたいだけなら データセット名.Clear() SqlDataAdapter1.SelectCommand.CommandText = "SELECT * FROM pc_data ORDER BY display_order" SqlDataAdapter1.Fill(データセット名, "car_data") としてやるだけでいけると桃割れ。 568 名前：デフォルトの名無しさん [04/08/23 16:34] って"car_data"ってなんだよ"pc_data"ねｗ。 ところで、ここの上のほうにあるデータグリッドの幅をデーターの長さに自動であわせて表示するっていうの を、どなたか出来る方いませんか？ 569 名前：546 mailto:sage [04/08/23 16:44] >>565-566 無理。そもそも String が帰る時だって、値の型を取得しているだけで "変数" のタイプを取っているわけじゃないし。 570 名前：デフォルトの名無しさん mailto:sage [04/08/23 21:02] >>569 よくわからんが無理ってことはないんじゃないか？ むしろインスタンスからしか型に関する情報を取れないなんてライブラリの方が 不条理な気がする。 www.microsoft.com/japan/msdn/library/default.asp?url=/japan/msdn/library/ja/vblr7/html/vaoprgettype.asp と www.microsoft.com/japan/msdn/library/default.asp?url=/japan/msdn/library/ja/cpref/html/frlrfsystemtypeclassgettypecodetopic.asp の組み合わせでいけるんじゃないだろうか。 571 名前：546 mailto:sage [04/08/23 23:56] >>570 　レスされたので答えるけど、その手のメソッドでは無理。 IL にコンパイルされた後はそもそもローカル変数なんて タイプ情報にも存在しなくなっちゃうんで、 「ローカル変数が何型で宣言されたか」ってな情報を得るには、 ライブラリではなく言語自体によるサポートが必要。 値型 (value types - 単純型や structure) のものなら、 変数宣言と同時にインスタンスが作成されるので大丈夫だけど（と思う） 572 名前：デフォルトの名無しさん mailto:sage [04/08/24 00:37] >>565 ちなみになんでそんなことがしたいわけ？ >>571も言ってるけど、ライブラリじゃなくて言語仕様で そういう機能があるかどうかの問題になるね。 573 名前：565-566 mailto:sage [04/08/24 00:55] >>569 >値の型を取得しているだけで >"変数" のタイプを取っているわけじゃないし。 私も同様の認識だったのですがデバッグ中に… Dim s As String 直後のステップをブレーク、イミディエイトにて ?type.GetTypeCode(s)　 と実行した際、 「型 'String' の値を 'System.Type' に変換できません。」 といったメッセージが出たもので… 「あれ？エラーだけどここで'String'と認識するってことは…なにかしらの記述で変数のタイプも取得できるのか？？？」と… 574 名前：デフォルトの名無しさん mailto:sage [04/08/24 11:51] Form1で 　　　　Dim f2 As Form2 　　　　f2.show() のようにしてForm2を表示して、そのForm2からForm1のTextbox1の内容を操作するにはどうしたらいいんですか？ Form1からForm2の操作はできるんですが・・・その逆を行おうとするとエラーがでます。 575 名前：デフォルトの名無しさん mailto:sage [04/08/24 12:31] またVB6から進化できてない人間が迷い込んだな。。 576 名前：デフォルトの名無しさん [04/08/24 12:39] だから旧VBスレも合わせて、スレの>>1のテンプレに愚問集作ってそこに 　『別フォームの……』 を入れとくべきだろう。 577 名前：デフォルトの名無しさん [04/08/24 12:39] ここは初心者の来る場所じゃありませんＹＯｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗ 578 名前：デフォルトの名無しさん mailto:sage [04/08/24 12:50] そして、煽りも要りませんので・・・ とりあえず過去ログ読みまっしょ 579 名前：デフォルトの名無しさん [04/08/24 13:23] >>577 すいません 初心者はどこへ行けばよいですか？ 580 名前：デフォルトの名無しさん mailto:sage [04/08/24 14:15] >>579 ここは２ちゃん。「うるせー馬鹿」が返しの挨拶。 581 名前：デフォルトの名無しさん mailto:sage [04/08/24 14:51] あの〜 いつぞやに、.NETの板が出来たと思っていたのですが、 あれは夢だったのでしょうか？ 582 名前：デフォルトの名無しさん mailto:sage [04/08/24 15:55] >>581 ( ﾟДﾟ)氏ね

---

---

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

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