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 641 名前：６２７ [04/08/26 16:12] 640様 返答いただきありがとうございます。 ＳＱＬサーバ7.0内のＲＤＢとなります。接続はＯＤＢＣ接続しています。 642 名前：デフォルトの名無しさん mailto:sage [04/08/26 16:50] >>641 データセットに入れてあるのなら、ループで逆に読めば OK。 レコードセットに入れてあるのなら、MoveLast して、MovePrevious しながら とっていけば OK。 643 名前：６２７ [04/08/26 17:38] 642様 ありがとうございます。 早速、試してみたいと思います。 本当に感謝致します。 644 名前：デフォルトの名無しさん mailto:sage [04/08/26 19:01] 掲示板を自動巡回するソフトを作りたいのですが、 どういった知識が必要なのでしょうか。 いくつかの掲示板を自動巡回できるようにし、 また各掲示板用の書き込みを巡回前に用意しておけば 巡回中に、自動で投稿されるようにしたいです。 掲示板によっては投稿に必要な手順が異なったりするのも ソフトの方で登録できるようにしたいです。 どなたか、よきアドバイス・実現方法等ご教授下さらないでしょうか。 645 名前：デフォルトの名無しさん [04/08/26 19:08] >>644 まずは、IEコンポーネントとかを使わずにブラウザを作るところからスタートだな。 TCP/IPとHTTPとHTMLぐらい。 646 名前：デフォルトの名無しさん mailto:sage [04/08/26 21:00] コントロールA（アンカー左）とコントロールB（アンカー右）を配置した後、 フォームをリサイズしたら、BがAの下に潜り込んでしまいました。逆に AがBの下に潜り込むようにしたいんですが、どうすればいいんでしょうか。 各コントロールの重なり方を指定するやり方を教えてください！m(_ _)m 647 名前：デフォルトの名無しさん mailto:sage [04/08/26 21:14] >>646 まずはデザインモードでコントロールを右クリック。 話はそれから。 というか、普通それで解決法がわかると思う。 648 名前：デフォルトの名無しさん mailto:sage [04/08/26 22:32] >>644 ついこないだそんなもん作ったなぁ・・・お前は俺か？（ぉ www.gotdotnet.com/japan/student/column/firststep/ ここのダウンローダーあたりを見ればwebから取得する方法は分かるだろ。 これで巡回はいいとして・・・ あとはその掲示板への投稿方法を見なければならないからなぁ HTMLフォームの知識も必要になるだろう。 (簡単なHTTPの知識もあったほうがいいと思われ。RFCでも見るんだ) 巡回先が2chじゃないだろうな？一応 www.monazilla.org/document/index.html 自動投稿スクリプトでAA連投プログラムとか作っちゃダメだぞ 649 名前：デフォルトの名無しさん mailto:sage [04/08/27 09:43] Windows Script HostのMapNetworkDrive メソッド、RemoveNetworkDrive メソッド と同じような事をwsh使用せずにVB.NETだけでしたいのですが System.IO,System.netクラスにはなさそうだったのですができないのかな？ ネットワークドライブの割り当てせずにUNC形式でﾊﾟｽかかってるファイル、フォルダに アクセスできればいいのですがどなたかご存知ないでしょうか？ 650 名前：デフォルトの名無しさん mailto:sage [04/08/27 10:40] プログラムを常駐させといて、ユーザーのクリックに反応してある関数を動かす そんなプログラムを作りたいのですが、.NET Frameworkで実現できますか？ 651 名前：646 mailto:sage [04/08/27 19:09] >>647 レス遅れてしまってすいません！ ありがとうございました！ とても簡単に解決できたんですね・・・申し訳ないです。助かりました。 多謝です　m(_ _)m 652 名前：デフォルトの名無しさん [04/08/27 22:25] SQLからNullを含んだ列をDataSetに読み込んできたんですが、その列が Nullであるかどうかを判別するのってどのようにすればいいんでしょうか？ SqlDataAdapter1.Fill(DataSet11.TestTable) For Each dr As DataSet1.TestTableRow In DataSet11.TestTable If Not dr.X Is Nothing Then .... Else If Next という感じで書いてみたんですがだめでした XMLスキーマエディタでNullValueを設定しようとしたら このコンテキストでは無効です というエラーが出てしまい、保存できません どなたがご教授お願いします 653 名前：デフォルトの名無しさん mailto:sage [04/08/27 23:43] >>652 IsDBNull関数でできると思うけど？ 654 名前：デフォルトの名無しさん mailto:sage [04/08/28 09:52] >>653 出来ません。 655 名前：デフォルトの名無しさん mailto:sage [04/08/28 10:09] 自作プロパティ、メソッドに説明文をつけたいのですが方法がわかりません。 プロパティウインドウの下の部分や、入力候補に表示させるにはどうしたらいいのでしょうか？ 656 名前：652 mailto:sage [04/08/28 12:28] >>653 >654の言うとおりで出来ませんでした。 datasetの項目はpropertyみたいなのでgetメソッドの中で 例外が発生しているみたいです。 657 名前：デフォルトの名無しさん [04/08/28 12:40] ちょっと質問です。 VB6.0では、スクリプトコントロール (www.microsoft.com/japan/msdn/scripting/default.asp) があって、VBアプリからVBスクリプトを簡単に利用できましたが VB.NETで同じようなことはできるでしょうか？ 658 名前：デフォルトの名無しさん [04/08/28 13:22] DataSet11ってオリジナルのクラス？ 659 名前：652 mailto:sage [04/08/28 13:36] >>658 そうです。データアダプタでデータセットの生成をやったときに 新しいデータセットを作るときのデフォルトの名前がDataSet1 で、それをフォームに追加したときに出来るのがDataSet11です。 660 名前：デフォルトの名無しさん mailto:sage [04/08/28 14:10] その方法でDataSetを使ったことがないんだけど XMLスキーマ経由で返されるNULLってゼロストリング""じゃなかったっけ？ CrystalReportsのXMLデータセットで使ったときはNULL＝""で対処してた 661 名前：652 mailto:sage [04/08/28 15:16] >>660 XMLスキーマエディタでNullValueをemptyに設定するとゼロストリング"" になるらしいんですけど、その設定が出来ませんでした。（保存するとき にエラー「このコンテキストでは無効です」が出る） ＞NULL＝""で対処してた それで対処できるのはわかるんですけど、たとえばSQLdatareaderとかを 使う場合とかならISDBNUllとかで対処できるからdatasetでもできるんじゃ ないかと思ったんです 662 名前：デフォルトの名無しさん mailto:sage [04/08/28 15:54] 試しに ID Int STR CHAR DT DATETIME っていうSQL結果(テーブル)からDataSet1.xsd 作ってみたんだけど STRのNullValueプロパティを（Empty）にしたら問題なくコンパイルが通った DT（DateTime）のNullValueプロパティを（Empty）にしたら 「カスタム ツール エラー : コードを生成できませんでした。システム エラーです。」 と言うのが発生したけど、これはまた別物かな 一度XMLスキーマに通してるみたいだけど 直接Data.DataSetにFillすることは出来ないのかね？ Data.DataTable内のDataColumnならNull値（Nothing)が取れるんだけど 何かあんまり力になれそうにないです ｽﾏｿ 663 名前：デフォルトの名無しさん mailto:sage [04/08/28 16:09] datasetじゃなくてdatatableじゃﾀﾞﾒなん？ 664 名前：652 mailto:sage [04/08/28 16:19] >STRのNullValueプロパティを（Empty）にしたら問題なくコンパイルが通った >DT（DateTime）のNullValueプロパティを（Empty）にしたら >「カスタム ツール エラー : コードを生成できませんでした。システム エラーです。」 >と言うのが発生したけど、これはまた別物かな 同じエラーです。こっちではそれでコンパイルが通らなくなっちゃうんですよね。 何がちがうんですかね？ >一度XMLスキーマに通してるみたいだけど >直接Data.DataSetにFillすることは出来ないのかね？ えーっと私の理解ではdatasetを生成すると自動でXMLスキーマが生成されて さらに編集したい場合にはエディタを使うってことだと思ってたんですが 違いますか？ >Data.DataTable内のDataColumnならNull値（Nothing)が取れるんだけど DataTableは使ったことがないんで試してみます。 >何かあんまり力になれそうにないです >ｽﾏｿ いえいえありがとうございました。参考になりました。 >>663 とりあえずやってみます 665 名前：デフォルトの名無しさん mailto:sage [04/08/28 16:35] >>664 XMLのDataSetとSystem.Data.DataSetは名前は同じなんですけど中身が別物です Dim dt As New Data.DataTable '新しいDataTable作成 SqlDataAdapter1.Fill(dt)　　　　　　'でDataTable内にデータを取得できるので For Each dr As Data.DataRow In dt.Rows dr.Item(カラム名か番号)　'<-これでレコードごとのカラムにアクセスできます Next な感じでデータを取得できます 666 名前：652 mailto:sage [04/08/28 18:08] >>665 >dr.Item(カラム名か番号)　'<-これでレコードごとのカラムにアクセスできます ここでItem(カラム名か番号)がNULLだと例外が出てしまうんです。 If dr.Item(カラム名か番号) Is Nothing then ... If ISDBNull(dr.Item(カラム名か番号)) then ... などとやってもうまくいかないんですよ(TT) 667 名前：デフォルトの名無しさん mailto:sage [04/08/28 20:26] If IsDBNull(dr.Item(カラム名か番号)) then てやらんと。 DataRowに入ってるSystem.DBNull.Value とNothingは別物だぞ 668 名前：667 mailto:sage [04/08/28 20:32] If dr.Item(カラム名か番号) Is DBNull.Value then ... でもok 669 名前：665 mailto:sage [04/08/28 20:57] 失礼 NothingじゃなくてDBNullでした 670 名前：デフォルトの名無しさん mailto:sage [04/08/28 21:58] dr.Item(カラム名か番号) で例外が出るんだったらそれでは無理と思うが… 671 名前：デフォルトの名無しさん mailto:sage [04/08/28 22:00] って勘違いしてたかな？スマン 672 名前：デフォルトの名無しさん mailto:sage [04/08/28 23:26] ON_WM_KEYUP( )ﾒｯｾｰｼﾞﾊﾝﾄﾞﾗで他のｱﾌﾟﾘのｷｰUPﾒｯｾｰｼﾞって拾えますか？ 673 名前：デフォルトの名無しさん [04/08/29 05:29] SqlDataAdapter1.Fill(DataSet1,"DataTable")で作成したDataTableの中身を Excelファイル(.xls)に吐き出して、Excel起動→WorkSheet表示→印刷 →Excel終了をVBのプログラムから実行したいのですが方法が分かりません。 どなたかご教示頂きたく宜しくお願いいたします。 ちなみに、VBは2003、Excelは2002、DBはMSDE-RelAです。 674 名前：デフォルトの名無しさん mailto:sage [04/08/29 08:17] >>673 www.atmarkit.co.jp/fdotnet/index/bbs/dir91.html ヒントが見つかるんでないかな 675 名前：523 [04/08/29 12:35] >>655 入力候補ってのはどんな奴を指してるかイマイチ解りませんが、 Modifiersプロパティみたいな奴だったら Public Enum testEnum t0 = 0 t1 End Enum <System.ComponentModel.Description("説明です")> _ Public Property test() As testEnum で、OKと思われる 追伸 誰か、523の回答もお願いします 676 名前：デフォルトの名無しさん mailto:sage [04/08/29 20:09] >>675 >>523のやつまだやってたのかよ。 ってか>>518で書いてるようにプロパティをReadOnlyにしたらいけたぞ？ ReadOnlyじゃないと、DesignerSerializationVisibility.Contentの指定が生きてない感じ。 というより、コントロールのオブジェクト自体入れ替えられるんだから指定が意味なしってことかな・ 677 名前：523 [04/08/29 21:20] >>676 すみません。完全に見落としてました・・・＿|￣|○ ReadOnlyにしたら出来ました。 678 名前：デフォルトの名無しさん mailto:sage [04/08/30 09:15] VisualStudio.NET2003と.NET Framework1.1の組み合わせで 使用しています。 TreeviewやListviewを使った標準的な3ペインのアプリケーションを 作っているんですが、起動時に、Treeviewに水平スクロールバーが 表示されます。必要もないのに、です（つまりノードはすべて表示し 切れています）。Treeviewの大きさを変えたりすると、消えてしまいます。 これはバグでしょうか？ scrollableプロパティをfalseにすれば表示され ないんですが、これだと、ノードが表示しきれなくなったときにバーが 出なくなってしまいます。この水平スクロールバーの表示をなくすには どうしたらよいでしょうか。よろしくお願いします。 679 名前：655 mailto:sage [04/08/30 09:36] >>675 レス感謝です。 プロパティは確かに実現できました。 ＞入力候補ってのはどんな奴を指してるかイマイチ解りませんが、 ソースを入力している時にピリオドを打つと出てくる奴のことです。 たとえばShowメソッドだと、 Me. と打った時に入力候補が出て、Showの説明には、 コントロールをユーザーに対して表示します。 と表示されます。この説明を設定したんです。 680 名前：デフォルトの名無しさん mailto:sage [04/08/30 10:10] >>679 XML ドキュメント 681 名前：デフォルトの名無しさん mailto:sage [04/08/31 02:28] >>680 もっとわかりやすく伝わるように努力してくれませんか？ 682 名前：デフォルトの名無しさん mailto:sage [04/08/31 02:46] 681 名前： デフォルトの名無しさん [sage] 投稿日： 04/08/31 02:28 >>680 もっとわかりやすく伝わるように努力してくれませんか？ 他人に努力を求めるってのもすごいな 683 名前：デフォルトの名無しさん mailto:sage [04/08/31 03:47] >>681 ぎゃはははは、じゃとっととあきらめろ。 やならドキュメントコメントについて調べろ。 684 名前：デフォルトの名無しさん [04/08/31 09:56] ここは中途半端な知識の香具師が、エラを張るｲｿﾀｰﾈｯﾂでつね。 685 名前：デフォルトの名無しさん mailto:sage [04/08/31 12:41] ｲﾝﾀｰﾈｯﾂ？ ２ちゃんねるだよ　ボケ！ 686 名前：デフォルトの名無しさん mailto:sage [04/08/31 18:08] >>683 そんな一言じゃアドバイスになりません。 煽るつもりならレスしないでください。 687 名前：デフォルトの名無しさん [04/08/31 18:54] 夏の終わりに変なのが出てきたな･･･ 課題が終わらない大学生か？ 688 名前：デフォルトの名無しさん [04/08/31 19:15] idCode1で絞込みをして、外装コンボボックスに値を出力、次にidCode1とidCode2で 絞込みをして内装コンボボックスに値を出力しようと思っています。 下のように書いて、外装コンボボックスに"excol_name"値は出力できました。次に この"excol_data"テーブルに存在している"excol_id"の値を"idCode2"に代入したい のですが、コンボボックスの"excol_name"をフォームから選んだ時に、その行にある "excol_id"を"idCode2"として得る方法を教えてください。 Private Sub frmMakedata_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim cmd As SqlClient.SqlCommand = SqlConnection1.CreateCommand() Dim dr As SqlClient.SqlDataReader Dim idExcol1 As Integer cmd.Connection = SqlConnection1 SqlConnection1.Open() '外装コンボボックスの設定 cmd.CommandText = "SELECT * FROM excol_data WHERE car_id =" & idCode1 & "" dr = cmd.ExecuteReader() Do While dr.Read = True cmbExcol.Items.Add(dr("excol_name")) Loop dr.Close() End Sub 689 名前：デフォルトの名無しさん mailto:sage [04/08/31 23:24] 外装とか内装って何よ 好意的に解釈すると ComboBoxが2個ある 一方に値を設定すると、他方にそれに該当する候補値を入れたいって事か だったらSelectedIndexChangedかSelectedValueChangedでその変化をひらって みるとか できたらもう少し状況がわかるように書いてくれよ つうか人間にうまく伝えられなかったら、コンピュータにもうまく伝えられないんじゃねぇ 690 名前：688 [04/09/01 00:56] えーとですね、車の見積を作ってるんです。 んで、外装の色のコンボボックスは、車種でもって、ふるいに掛けられて 内装の色のコンボボックスは、車種と外装の色でもって、ふるいに掛けた いんです。 で、外装の色コンボボックスは、excol_dataのテーブルに含まれてる車種 のidであるcar_idでふるいに掛けることに成功したんですが、内装の色の コンボボックスの値を決めようとすると、車種をあらわすidCode1=car_idと、 外装の色を表す、idCode2=excol_idが必要になるんです。 で、外装の色のコンボボックスで、色を選択したときに、このテーブルに含 まれているexcol_idを取得したい・・・というわけなんです。 判りにくくてすいません。 691 名前：デフォルトの名無しさん mailto:sage [04/09/01 01:46] 車のデータベースか・・・ 以前どこかで見かけたような・・・ いや、ﾃﾞｼﾞｬｳﾞだろうな・・・ 692 名前：デフォルトの名無しさん mailto:sage [04/09/01 05:32] >>691 意味ないレスしてんじゃねーよ おまえはチラシの裏にでもレスしてろ 693 名前：デフォルトの名無しさん [04/09/01 07:53] ｵﾏｴﾓﾅｰ 694 名前：デフォルトの名無しさん [04/09/01 07:54] ここは、役に立たないｲｿﾀｰﾈｯﾂですね。 695 名前：689 mailto:sage [04/09/01 11:02] >>688 >>690 Accessとかでやった方がすこぶる簡単だと思われ 696 名前：デフォルトの名無しさん [04/09/01 20:53] ACCESS以下だと言う事が露呈しました。 697 名前：デフォルトの名無しさん mailto:sage [04/09/02 01:32] Accessって何？ 698 名前：デフォルトの名無しさん mailto:sage [04/09/02 02:40] TreeViewコントロールのツリー構造をどこかに保存しておき、 アプリケーションを起動したときに、そのツリー構造を正確に 再現するようにしたいんですが、どうしたらいいのか見当つかず 困っています・・・。このツリー構造は、ユーザーがノードを 追加・削除できるもので、プログラマ側が、具体的にどのような ツリー構造となるかは予想できません。TreeViewコントロールは いろんなアプリに利用されていて、保存・再現はほとんど必須の テクニックだと思うのですが・・・。どのように処理するとよいんで しょうか。 699 名前：デフォルトの名無しさん mailto:sage [04/09/02 10:34] >>698 検索しろ。過去ログ嫁。 700 名前：デフォルトの名無しさん mailto:sage [04/09/02 17:40] Webサービスで <WebMethod()> _ Public Function FX(ByVal X As Integer, ByVal Y As Integer, ByVal Z As Integer) As Integer Z = X + Y End Function というサービスを起動し クライアントアプリケーション（VB.NET）でZの値を取得しようとしたのですが 値が返ってきません Webサービスでは引数に戻り地を渡すことは出来ないのでしょうか？ 701 名前：デフォルトの名無しさん mailto:sage [04/09/02 19:46] ByVal Z As Integer じゃなくて ByRef Z As Integer じゃないのかな 702 名前：デフォルトの名無しさん mailto:sage [04/09/02 21:46] >>697 Office製品の一部？ 703 名前：デフォルトの名無しさん mailto:sage [04/09/02 22:13] >>700 何がしたい 704 名前：デフォルトの名無しさん mailto:sage [04/09/02 22:23] >>698 キーワード: シリアライズ 705 名前：デフォルトの名無しさん mailto:sage [04/09/02 22:39] シリアライズする元ですら作れないと思われ。 っていうか、TreeViewの情報って何を保存しときたいの？ ツリーの構造と状態？名前？その他のデータ？ その情報は誰が（何が）操作、作成するわけ？ 706 名前：デフォルトの名無しさん [04/09/02 22:46] 役に立たないから落とせよ、このスレ。 ﾌﾟ 707 名前：デフォルトの名無しさん mailto:sage [04/09/02 22:48] (σ´∀｀)σ）・ω・） >>706 708 名前：デフォルトの名無しさん mailto:sage [04/09/02 23:38] みんな基本コントロールを継承して軽くカスタマイズして使ってるだろけど、 ネットで公開してるのは少ないな。 TreeViewの構造を読み書きできる継承クラスぐらい落ちてそうなもんなのに。 709 名前：700 mailto:sage [04/09/03 00:25] おそくなりました >>701 ByRefにしてみてもダメでした >>703 サーバ上のとあるユーティリティ（COMコンポーネントで実装）を実行して 検索結果を返すというサービスです 複数の結果を同時に返す必要があるので 引数で返す方法をとりたかったのですが 710 名前：デフォルトの名無しさん mailto:sage [04/09/03 08:54] ＞７００ Returnしなくていいのか？ 711 名前：デフォルトの名無しさん mailto:sage [04/09/03 08:56] ＞７００ ７０９読んでなかった、７１０は見逃してくれ。 構造体で返したらだめ？ 712 名前：デフォルトの名無しさん [04/09/03 11:18] めちゃめちゃ基本的な質問ですが。 ポップアップして処理状況を表示したりするときって、どういう処理してます？ MessageBoxと違って、自動で閉じたりしたい場合。 CreateObject("WScript.Shell").Popupだと秒数指定で閉じられるけど、 これだと外部からクローズできるのかな？ でもこんなので遅延バインディングするのもなんか嫌なかんじ。 わざわざ個別にフォーム作るのもめんどくさいんで、 Timeoutプロパティとか表示メッセージのプロパティとかを くっつけたクラスをさくっと作ろうかと思ったけど、 普通みんなどうしてるんでしょう。 713 名前：デフォルトの名無しさん mailto:sage [04/09/03 12:36] 時間が来たら自律的に死ぬクラスがそんなに悩むようなこととも思えないが。。 714 名前：デフォルトの名無しさん mailto:sage [04/09/03 14:05] 作るのに悩んでるんじゃなくて、 定石を知りたいんじゃないのかな？ 自律死はともかく、ポップアップ窓はなんか標準であってもよさそうだし。 715 名前：デフォルトの名無しさん mailto:sage [04/09/03 14:34] (´-`).｡ｏO( 自演Z 716 名前：700 mailto:sage [04/09/03 15:26] >>711 本来はクライアントアプリケーションで使うOCXを Webサービスで使おうとしているので 　　　　r = FX.HOGE(X,Y,Z) <= Zに計算結果、rは成功か失敗か このようなOCXの場合 　　　　r = FXweb.HOGE(X,Y,Z) <=Web経由で同じ作業をさせたい のように FXオブジェクト をWeb参照にするだけで、現状のｿｰｽを書き換えたかったのです もともと「IIS（ASP)でも使えます」というOCXだったので 上記のような使い方が出来るものかと思いまして・・・ ただWebサービスの内部はXMLのPOSTのようなので、引数はInputのみなのかもしれません 別の方法が無いか試して見ます 717 名前：デフォルトの名無しさん [04/09/03 17:04] vb.netで「ペイント」のようなソフトを作りたいんですけど、 良いサンプルありませんか？ 718 名前：デフォルトの名無しさん mailto:sage [04/09/03 18:46] 無い 719 名前：デフォルトの名無しさん [04/09/03 19:08] Dim X As string = (SqlDataAdapter1.SelectCommand.CommandText = "SELECT name FROM member WHERE member_id = 25") ってやったら、Ｘにid25番の人のnameじゃなくて、ＴｒｕｅかＦａｌｓｅが帰ってきちゃうんで すが、nameを返すにはどうしたらよいでしょうか？ 720 名前：デフォルトの名無しさん mailto:sage [04/09/03 19:49] >>719 Dataset の使い方を一から勉強しなおす。 721 名前：デフォルトの名無しさん mailto:sage [04/09/03 20:02] DBやったこと無いけど>>719は絶対に真偽値を返す事だけはわかる。 722 名前：まんこ ◆yCMANKO3dM [04/09/03 20:11] 質問内容からして素人なんだから、だれか説明してやれよｗｗｗｗ。 723 名前：デフォルトの名無しさん [04/09/03 21:01] ばか、ここは生まれながらにして、VBが使える神の集うスレナンダよ！ だから、どんな質問でも完璧に答えられる。 自分で調べろ！ な？完璧だろ？ 724 名前：デフォルトの名無しさん mailto:sage [04/09/03 22:37] タスクトレイに表示したアイコンから www.geocities.jp/mootdata/unno.jpg みたいにメッセージを表示したいのですが どう殺ったらよいのでしょうか？ 725 名前：デフォルトの名無しさん mailto:sage [04/09/04 00:24] >>713 簡単なようだが、まともに動作する、かつ問題のない こういうクラスを作るのは、それ程簡単でもないぞ。 726 名前：デフォルトの名無しさん [04/09/04 00:54] >>724 VBの神が答えてやろう。 自分で調べろ。 727 名前：デフォルトの名無しさん [04/09/04 01:11] >>724 一番簡単なのは新しいハードウエアを抜き差しすることだな 728 名前：デフォルトの名無しさん mailto:sage [04/09/04 01:12] Objectのキャストについてどなたかご存じでしたら教えてください。 ・フォームに複数のコントロールがある ・各コントロールのTagプロパティに、文字列 　またはオブジェクトがセットされている この状態で、フォーム内の全コントロールを参照して Tagプロパティに文字列"hogehoge"がセットされているもの だけに処理を施したいと思い、Tagプロパティをcstrでキャストして "hogehoge"と比較したいのですが オブジェクトが入っている場合、エラーになってしまいます。 こういう場合、cstrでキャストできるかどうかの判断をする方法 というのはあるのでしょうか？ それとも、TryCatchで例外を拾うしかないのでしょうか？ 729 名前：デフォルトの名無しさん mailto:sage [04/09/04 01:19] If TypeOf hoge.Tag Is String AndAlso CStr(hoge.Tag) = "hogehoge" Then 　ほにゃらら 730 名前：デフォルトの名無しさん [04/09/04 08:01] ↑ちがうだろ。 正解は、自分で調べろ。だろw 731 名前：デフォルトの名無しさん mailto:sage [04/09/04 08:36] なにこの良スレ 732 名前：デフォルトの名無しさん [04/09/04 09:03] 初心者に”自分で調べろ”と言って、日ごろの憂さを晴らすデジタル・ドカタ のスッドレはココですか？ 733 名前：デフォルトの名無しさん mailto:sage [04/09/04 10:14] 初心者じゃなくて、何か（例えば「初心者」）を口実っていうか免罪符にして 他人を利用しようとするズウズウしい横着者を叩いて日ごろのウサを晴らす デジドカのスレがここですが文句ありますか。 ついでに自分のあつかましさを批判されると逆切れする>>732みたいな あつかましい奴ももれなく叩いておりますが。 734 名前：デフォルトの名無しさん [04/09/04 10:20] ↑デジタルドカタキター。 735 名前：デフォルトの名無しさん mailto:sage [04/09/04 10:33] 休日の朝から、カルシウム不足の>>733が湧いたな、牛乳でも飲んでろ。 >>719もまいは、明日から俺のメイドさんになること。もしくは口からクソを垂れる前と後 にSirをつけること。あと、入門書に乗ってないことでも、冷静に色々やってみろ。 '変数の定義 Dim X As String 'SqlConnection1を使って、データコマンド作成 Dim cmd As SqlClient.SqlCommand = SqlConnection1.CreateCommand 'データーリーダーの設定 Dim dr As SqlClient.SqlDataReader 'コマンドのコネクション設定 cmd.Connection = SqlConnection1 '検索条件の設定（Ａ） cmd.CommandText = "SELECT name FROM member WHERE incol_id = 25 " 'コネクションを開く() SqlConnection1.Open() 'データリーダーから、データーを読み出す dr = cmd.ExecuteReader() '読めたら、Xに代入・・・（Ａ）のＳＱＬでnameのところを*にしてＸをＹだのＺだのに変えて、 '好きなだけ変数を引っ張れｗ Do While dr.Read = True X = dr("name") Loop 'データリーダーを閉じる() dr.Close() 'コネクションを閉じる() SqlConnection1.Close() デジタルドカタは、人に者を教えるときはそいつのレベルまで下がって教えてやれよｗ。 お前らだって誰かに習っただろうにｗｗｗ。 736 名前：デフォルトの名無しさん mailto:sage [04/09/04 11:00] >>724 これは漏れも知りたい >>727 ﾜﾛﾀ 737 名前：デフォルトの名無しさん mailto:sage [04/09/04 13:05] >>724 Baloon Tooltip を使え。 738 名前：デフォルトの名無しさん [04/09/04 16:07] DateTimePickerコントロールをデータセットに連結してます。 ユーザー操作無しにコントロールのValue値をデータセットに反映させるには どうすればいいのでしょうか？ 例えば、新規レコード追加Formでコントロールに年月日が表示されますが、 その日付でいいやと言うことでコントロールを操作しないと、新規レコードの 日付はNullになってしまいます。 これを何とかしたいです。言葉足らずがあったらすみませんm(_ _)m 739 名前：デフォルトの名無しさん [04/09/04 17:43] 変更がない時は、Nowを突っ込む。 Null入れてんじゃねえよ！と言うエラー捕まえて、Nowを突っ込む。 てのは？ 740 名前：デフォルトの名無しさん mailto:sage [04/09/04 17:56] 意味がわかりません 741 名前：738 mailto:sage [04/09/04 18:07] >>739 レスありがとうです。 現状は、 Dim dvHogeHoge As DataView Dim cm As CurrencyManager DateTimePickre.DataBindings.Add("Text",dvHogeHoge,"HIDUKE") みたいな感じになってるので、 If DateTimePickre.Text = "" Then dvHogeHoge(cm.Position)("HIDUKE") = Now() End If ってな感じで試してみようと思います。

---

---

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

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