VB.NET質問スレ (Part17)

1 名前：最凶VB厨房 mailto:sage [2006/08/11(金) 19:40:44 ] [前スレ]VB.NET質問スレ (Part16) pc8.2ch.net/test/read.cgi/tech/1149432480/ 2 名前：最凶VB厨房 mailto:sage [2006/08/11(金) 19:47:09 ] MSDN msdn2.microsoft.com/ja-jp/library/ms229284.aspx 3 名前：最凶VB厨房 mailto:sage [2006/08/11(金) 19:48:03 ] どぼん！のVB道のトップページとTipsページ dobon.net/vb/ dobon.net/vb/dotnet/index.html Microsoftクイック スタート チュートリアル ja.gotdotnet.com/quickstart/default.aspx Insider.NET www.atmarkit.co.jp/fdotnet/index.html 宇宙仮面の C# プログラミング ukamen.hp.infoseek.co.jp/ .NET のつぼ park16.wakwak.com/~mimi/dotnet/top.html .NET TIPS www.atmarkit.co.jp/fdotnet/dotnettips/index/index.html 緑のバイク ★ 初めてのC# プログラム全般 homepage3.nifty.com/midori_no_bike/CS/ VB.NETとC#でデザインパターン hccweb1.bai.ne.jp/tsune-1/ 匣の向こう側 www.ne.jp/asahi/nami/mei/index.html WisdomSoft wisdom.sakura.ne.jp/ じゃんぬねっと jeanne.wankuma.com/ どっとねっとふぁん - C# Tips And Samples - homepage3.nifty.com/dotnetfan/index.html C#プログラミングTips www.atmarkit.co.jp/fdotnet/csharptips/index/csharptips_index.html CodeProject www.codeproject.com/vb/net/ 4 名前：最凶VB厨房 mailto:sage [2006/08/11(金) 19:48:37 ] the GotDotNet Home Page www.gotdotnet.com/ KEN's .NET www5b.biglobe.ne.jp/~yone-ken/VBNET/index.html Cetus Links: 19,498 Links on Objects and Components / .NET www.cetus-links.org/oo_dotnet.html HIRO's.NET vbdotnet.fc2web.com/index.html ＠IT：特集 .NET開発者のためのオンライン・リソース・ガイド www.atmarkit.co.jp/fdotnet/special/onlineres/onlineres_01.html .NETでいきまっしょい！ santamartadotnet.hp.infoseek.co.jp/ これがほしかった！厳選サンプルツール集 anetm.com/dev/tools/vbdotnet.htm ぬーやんのdotNET講座 www.geocities.jp/nuu_yan/dotNET/index.html PINVOKE.NET www.pinvoke.net/ WinAPI Database for VB Programmer www.geocities.co.jp/SiliconValley-Cupertino/5872/ Windows Api programming in C# , VB.NET, and VB6. Examples of P/Invoke and DllImport with Source code custom.programming-in.net/ 5 名前：最凶VB厨房 mailto:sage [2006/08/11(金) 19:49:29 ] ConvertCSharp2VB www.kamalpatel.net/ConvertCSharp2VB.aspx ＠IT：.NET Tools www.atmarkit.co.jp/fdotnet/tools/index/index.html SharpLibrary Redirector www.sharplibrary.com/ MSDN アカデミック アライアンス 技術資料 www.microsoft.com/japan/msdn/academic/articles/ 「300 秒でズバリ !!」&「10 行でズバリ !!」シリーズ www.microsoft.com/japan/msdn/thisweek/wednesday/default.asp PAPA'n VB www.mitene.or.jp/~sugisita/index.html VB レスキュー花ちゃん www.bcap.co.jp/hanafusa/dotnet/index.html （Java覚え書き）デザインパターンあれこれ www.dmz.hitachi-sk.co.jp/Java/Tech/pattern/ algorithm www.mnet.ne.jp/~tnomura/algorithm.html ラムダ計算入門 www.kb.ecei.tohoku.ac.jp/~sumii/class/keisanki-software-kougaku-2005/lambda.pdf 数値計算の基礎 www7.ocn.ne.jp/~kawa1/numeric.pdf 6 名前：最凶VB厨房 mailto:sage [2006/08/11(金) 19:53:21 ] テンプレ　完 7 名前：デフォルトの名無しさん mailto:sage [2006/08/11(金) 20:27:14 ] >6 乙 8 名前：デフォルトの名無しさん mailto:sage [2006/08/11(金) 22:04:48 ] 次スレから翔泳社のCodeZineもテンプレにいれてやろうよ codezine.jp/ で、質問。 2003のWindows FormでLocalizable = Trueにして多言語アプリ作ってるとき、 Languageで間違った言語を選択しちゃうとその言語用のリソースがbinフォルダなんかに 生成されると思うんだけど、これが削除してもしつこく復活してきやがります。 なにかこの不要なリソースが生成されなくなるようにする方法ってないかな？ 9 名前：デフォルトの名無しさん mailto:sage [2006/08/11(金) 23:00:03 ] vbproj ファイルのそのカルチャ文字列調べて要素を消してみたらどうだ 10 名前：8 [2006/08/11(金) 23:28:34 ] >>9 うーん、やっぱりそういう泥臭い方法になっちゃうんですかね。 しかるべき方法が用意されてて当然のような気もするんですが。 11 名前：デフォルトの名無しさん [2006/08/12(土) 23:29:44 ] 質問です。 form間でのDataSetの値渡しがしたいです。 ただ、他画面起動時に渡すのではなく、テキストボックスに書き込まれた後で、 つまりChangeイベントで渡したいのですが、いい方法ないでしょうか？ 12 名前：デフォルトの名無しさん [2006/08/12(土) 23:37:08 ] はぁ？ むしろ何がわかんねえのかわかんね。 だからChangedイベントで渡せよw 13 名前：デフォルトの名無しさん mailto:sage [2006/08/13(日) 01:07:18 ] １１はFORM間でデータをやり取りする方法がわからないのか？ 14 名前：デフォルトの名無しさん mailto:sage [2006/08/13(日) 01:44:21 ] 悪いことは言わんからDatasetみたいなデカイもんは参照にしとけって。 15 名前：デフォルトの名無しさん mailto:sage [2006/08/13(日) 04:01:28 ] むしろどうやって参照以外にするというのか リモーティング？ 16 名前：デフォルトの名無しさん mailto:sage [2006/08/13(日) 09:57:13 ] vb.net 2005 です。 textbox の validated で、button の click イベントを実行したくて、 button. PerformClick() と書いたのですが、click が発生しません。 textbox の leave イベントで button. PerformClick() を呼んだ時は button の click が発生しました。 validated で button. PerformClick() は実行できないのでしょうか？ なにか方法があればアドバイスよろしくお願いします。 17 名前：デフォルトの名無しさん [2006/08/13(日) 13:35:16 ] .net 2.0 SDKをインストールしてから時々Explorerなどを起動中にJUST-TIME-INデバッガのエラーが起動してExplorerが落とされる事があるのですが このJUST-TIME-INデバッガをSDKインストール前のように起動しなくなるようにするにはどうすればいいのでしょうか？ SDKをアンインストールしてもエラーは出てしまいます・・。 ちなみに他のアプリも落とされる事があります＾＾； 18 名前：デフォルトの名無しさん mailto:sage [2006/08/13(日) 14:17:51 ] vbと関係ないし。 エラーがでる元から断たなきゃ 19 名前：デフォルトの名無しさん mailto:sage [2006/08/13(日) 14:27:22 ] >>18 エラーを出ないようにする　× JITを削除する　○ JITがあるといろんなアプリでデバッガ起動しようとして落とされるのは良くあること 20 名前：デフォルトの名無しさん [2006/08/13(日) 22:34:14 ] form間の値渡しって、 （Ｂ画面にて） public A as formA = new fromA A.label.text = "１１１" って、newする方法以外、何かありますか？ あまり、newしたくありません。 21 名前：デフォルトの名無しさん mailto:sage [2006/08/13(日) 22:53:33 ] いやだから、そういうレベルの人はこんなところで質問してる場合じゃないよ。 まずは大人しく本でも読めよ。 22 名前：デフォルトの名無しさん [2006/08/13(日) 22:57:21 ] >>21 教えてやれよ。 すまんな。俺、コボル専門だから、わかんねーや。 23 名前：デフォルトの名無しさん mailto:sage [2006/08/13(日) 23:03:44 ] >>20 newする方法以外って言われても、それ値渡ってないし。 あなたが渡したいのは『すでにある』FormAのインスタンスに、でしょ? そのコードは新しく作った『別の』FormAのインスタンスに渡してるんでしょうが。 まあフォートラン専門のおれに言えるのはここまでだ 24 名前：デフォルトの名無しさん mailto:sage [2006/08/13(日) 23:04:15 ] FormをPublicにしちまえよ 25 名前：デフォルトの名無しさん mailto:sage [2006/08/13(日) 23:20:15 ] 大域変数を使えばいいじゃない。 26 名前：デフォルトの名無しさん mailto:sage [2006/08/13(日) 23:21:57 ] そもそもForm間で渡す設計が悪い それぞれのFormからメソッドを呼び出すようにそろ 27 名前：デフォルトの名無しさん mailto:sage [2006/08/13(日) 23:26:46 ] >>20 dobon.net/vb/dotnet/form/accessanotherformdata.html まずはここ見て、自分の好みにあったやり方を探しておくれ。 28 名前：デフォルトの名無しさん [2006/08/13(日) 23:34:36 ] そうやって基礎もろくに覚えてないうちから対処療養的なことを教えるから 理屈もわからずサンプルコードをコピペしまくる「VB厨」が生まれるんだけどね。 親切なことしたつもりなのは「教えたがり」の本人だけで、実際には相手に 毒を盛ってるのと同じだと俺は思うがね。 29 名前：デフォルトの名無しさん mailto:sage [2006/08/13(日) 23:37:34 ] どこからどこまでが基礎なんだろうなぁ 30 名前：デフォルトの名無しさん mailto:sage [2006/08/13(日) 23:41:16 ] 悪魔のささやきとしては、Formはすべて暗黙のインスタンスを使う（笑 31 名前：デフォルトの名無しさん mailto:sage [2006/08/14(月) 00:20:15 ] ×暗黙のインスタンス ○暗黒のインスタンス 32 名前：最凶VB厨房 mailto:sage [2006/08/14(月) 10:01:59 ] 理屈もわからずサンプルコードをコピペしまくって いまだに基礎がわかっていないVB厨の俺が来ましたよ。←帰れ 33 名前：デフォルトの名無しさん mailto:sage [2006/08/14(月) 11:01:12 ] SCSIといっしょで、理屈に合ってなくても動いていればそれで良し。 34 名前：デフォルトの名無しさん mailto:sage [2006/08/14(月) 15:06:06 ] あまりnewしたくないって 新鮮な発想だ。 35 名前：デフォルトの名無しさん mailto:sage [2006/08/14(月) 15:47:40 ] たしかにあまりnewしたくないなぁ 36 名前：デフォルトの名無しさん mailto:sage [2006/08/14(月) 17:30:04 ] うちなんてコンストラクタ使用禁止だ 37 名前：最凶VB厨房 mailto:sage [2006/08/14(月) 17:34:51 ] コンストラクタ使用禁止って･･･ 虐待やな。 38 名前：デフォルトの名無しさん [2006/08/16(水) 02:30:00 ] 構造体の内容をそのままファイルに書き込むにはどうすればいいですか？ 39 名前：最凶VB厨房 mailto:sage [2006/08/16(水) 02:42:56 ] BinaryFormatter使ってみるのはどうだ？ 40 名前：デフォルトの名無しさん mailto:sage [2006/08/16(水) 02:51:08 ] 人間に読めるほうがいい→XMLにシリアライズ 人間に読めなくてもいい→BinaryFormatterでシリアライズ 41 名前：デフォルトの名無しさん mailto:sage [2006/08/16(水) 09:58:36 ] リストビューについてですが選択行が変わったイベント SelectedIndexChangedはありますが 選択行が変わるよイベントが見つからないのですが そのようなイベントは無いのでしょうか？ 42 名前：デフォルトの名無しさん [2006/08/16(水) 10:38:28 ] あまりニューしたくないって理屈は何だ？ 43 名前：デフォルトの名無しさん mailto:sage [2006/08/16(水) 11:09:04 ] それよりもファイルが1000個あるフォルダでCtrl+AするとSelectedIndexChangedイベントが 1000回起きるのがイヤだ そりゃSelectedIndexChangingだろ… 44 名前：デフォルトの名無しさん mailto:sage [2006/08/16(水) 18:08:16 ] VB.NETです Formを開いた後に実行されるイベントはあるでしょうか？ ゲームを作っているのですがLoadが終わったあとにビジーループさせたいのです （Loadイベントでビジーループさせるとフォームが開かない） 45 名前：デフォルトの名無しさん mailto:sage [2006/08/16(水) 18:09:05 ] Shown 46 名前：44 mailto:sage [2006/08/16(水) 21:30:26 ] >>45 すいません、見当たらないです…… 47 名前：デフォルトの名無しさん mailto:sage [2006/08/16(水) 21:33:22 ] shownは.NET Framework 2.0からだからね。 48 名前：デフォルトの名無しさん mailto:sage [2006/08/16(水) 21:43:52 ] >>Loadが終わったあとにビジーループ っつーのを、もうちょっと詳しく。 49 名前：デフォルトの名無しさん [2006/08/16(水) 21:57:11 ] 質問です。助けてください。 自分で作成したDatasetとスプレッドシートをバインドさせたいのですが 出来ません。 データグリッドみたいにバインド出来ると、思ってたのですが、無理でした。 スプレッドシートは初めて使うので、全くわかりません。 教えていただけるのが、一番嬉しいのですが、 駄目なら、この本を読めとか、このサイトを見ろとか、ヒントを下さい。 50 名前：デフォルトの名無しさん mailto:sage [2006/08/16(水) 21:59:31 ] スプレッドシートって何だよ？ サードパーティー製ならそこに聞け 51 名前：デフォルトの名無しさん [2006/08/16(水) 22:01:43 ] >>50さんへ VB.NETのコンポーネントタブに入ってる、コントロールです。 エクセルみたいな感じのヤツです。 52 名前：デフォルトの名無しさん mailto:sage [2006/08/16(水) 22:17:24 ] だから標準でそんなコントロール付いてないってば 53 名前：デフォルトの名無しさん mailto:sage [2006/08/16(水) 22:18:18 ] ていうか何故正式名称を出さないんだ？ 54 名前：デフォルトの名無しさん mailto:sage [2006/08/16(水) 22:26:27 ] >>51 マウスポインタをコンポーネントタブの該当コントロールに当てて、 ちょっと待ったら出てくるツールチップに書いてある名称を一言一句 間違いなく書き出すんだ。 55 名前：デフォルトの名無しさん [2006/08/17(木) 00:03:39 ] 本当だ。 付いてない。 家で試したら無かったです。 でも、職場でダウンロードもインストもした記憶がないのですが・・・ サードパーティー製スレに行ってきます。 56 名前：デフォルトの名無しさん mailto:sage [2006/08/17(木) 00:12:59 ] そんなスレあるの？ メーカーに聞けという意味で言ったんだけどｗ 57 名前：デフォルトの名無しさん [2006/08/17(木) 12:11:14 ] datagridに書き込んだデータをExcelのシートに流し込んでExcelの機能を使って印刷 するソフトを作ったのですが、Datagridの中に特定の文字列が書き込まれているとき、 Excelに流し込む文字列を変更することは出来ないでしょうか？ ちょっと分かりにくいのですが、 Datagridにkm3と書き込まれたとき、3をExcelの文字飾り上付きにしたいのです。 (要するにkm3では無く立方キロメートルの単位にしたい) どうやったらいいのかが全く分かりません。 実現可能であれば方法を御教授願います。 58 名前：デフォルトの名無しさん mailto:sage [2006/08/17(木) 13:26:00 ] >57 ExcelのVBAでやれば済むのでは？ 59 名前：デフォルトの名無しさん [2006/08/17(木) 15:05:31 ] >>58 MySQLと連動させているのでVBAでやるのは難しいと思うのです。 作ったアプリでMySQLにデータを入力しつつExcelで作ってある フォーマットに出力という形です。 60 名前：デフォルトの名無しさん [2006/08/17(木) 15:20:17 ] >>59 なんで？ VBAからODBC経由でもつながるし。頑張れば.net側からExcelVBAの関数呼べるだろうし。 61 名前：デフォルトの名無しさん mailto:sage [2006/08/17(木) 16:00:18 ] Excelオブジェクト作れば大体の制御は出来るよね 62 名前：デフォルトの名無しさん [2006/08/17(木) 16:10:13 ] >>60 もう作ったソフトがあるのでそれを改良する方向にしたいのです。 >>61 Excelオブジェクトを作って書き込んでいると思います。 Dim oXL As Excel.Application Dim oWB As Excel.Workbook Dim oSheet As Excel.Worksheet Dim oRng As Excel.Range って奴ですよね？ 63 名前：デフォルトの名無しさん [2006/08/17(木) 16:11:51 ] 書き込むだけじゃなく、VBAの呼び出しも出来ると思うが。 それに、Excel操作の基本は、マクロで記録して、それをぱくるですよ。 64 名前：デフォルトの名無しさん mailto:sage [2006/08/17(木) 16:40:15 ] VB.NET 2005 ExpressEditionをセットアップ実行中に、 .NET 2.0 日本語Language Pack のインスコ途中で、 文字化けのメッセージで error 1324とかでるのですが、 こいつの原因および対処方法はどうしたらよいでしょうか？ あと.NET FrameWork 1.1関係も再セットアップやアンインスコしようとすると 同じエラーが出ます。ボスケテ。 65 名前：デフォルトの名無しさん mailto:sage [2006/08/17(木) 17:39:33 ] HDDをハンマーで叩き割る。 66 名前：デフォルトの名無しさん [2006/08/17(木) 18:43:12 ] >>63 つまりExcelでVBAを吐かせてそれをプログラムに組み込むって事ですか？ (なかなか上手く行かない〜) 67 名前：デフォルトの名無しさん [2006/08/17(木) 18:45:05 ] .NETフレームワーク1.0で動作しているアプリケーションは2.0でも正常に動作するのでしょうか？ 68 名前：デフォルトの名無しさん mailto:sage [2006/08/17(木) 18:50:09 ] するかもしれないし、しないかもしれない。 でも、だいたいはする。 69 名前：64 mailto:sage [2006/08/17(木) 19:18:55 ] スマン自己解決できた、 AppLocaleの一時ファイル（apploc.tmp）のせいで文字化けしていた。 ・問題点 AppLocaleを使って中国語等のソフトを使用・インストール・アンインストールした後、 日本語のソフトをインストールしようとするとインストール画面が文字化けすることがあります。 Windows Installerを使用するソフトやOfficeセットアップで発生します。 ・原因 AppLocaleの一時ファイル（apploc.tmp）が、Windows Installerに影響を与えているようです。 ・解決方法　（ファイルを書き換え、読み取り専用にする） １：メモ帳で「c:\windows\apppatch」にあるapploc.tmpを指定して開きます。 　 ファイルの種類を「すべてのファイル」にしないと見えませんから注意してください。 ２：メモ帳で開くと「・・　」のようなものが見えますから、これを全部消して、上書き保存してからメモ帳を終了します。 ３：「c:\windows\apppatch」にあるapploc.tmpを右クリックして、プロパティを出し、「読み取り専用」にチェックを入れます。これでOKです。 70 名前：デフォルトの名無しさん mailto:sage [2006/08/17(木) 20:54:53 ] 大きなチラシが必要だな 71 名前：デフォルトの名無しさん mailto:sage [2006/08/17(木) 23:06:37 ] >>66 よくわかんないけど、今あるExcelファイルにデータはき出すのでないの？ なら、普通にthisworkbook.load(だっけか？）でいいのでは？？ 新規作成なら、また別のお話で。（でもどのみちVBAかと） 72 名前：66 [2006/08/18(金) 10:16:11 ] >>71 今はVB.net2003で作ったアプリでMySQLとExcelを使ってます。 伝票を作るアプリで、DataGridが配置されています。 そのDataGridに書き込んだデータを定型フォーマットとして作られた Excelのシートに流し込んで印刷というものです。 要はデータ管理はMySQL、印刷のみExcelでそれを操作するために VBでアプリを作ったのですが、DataGridに書き込んだ文字列はその ままExcelに送られて印刷するだけなので体積や回転速度の単位を 表すことが出来ないのです(DataGrid上ではm3やmin-1としか表記 出来ないが、印刷のときこのまま印刷ではなく、この場合の3と-1は 右上に小さく出したい）。 使う単位はm3とmin-1しかないので、Excelにデータを送る直前に 文字列検索を掛けてm3やmin-1とあったときのみこの3と-1を文字飾り 上付きにしてExcelに送りたいのです。 73 名前：デフォルトの名無しさん mailto:sage [2006/08/18(金) 10:55:39 ] >>72 VB2005+Excel2003でとりあえず動くコンソールアプリのサンプル(多分VB2003でも動くはず） COMの解放とかやってないけどその辺は気にしないように Imports Microsoft.Office.Interop Module Module1 　　Sub Main() 　　　　Dim app As Excel.Application = New Excel.Application() 　　　　Dim wbk As Excel.Workbook = app.Workbooks.Add() 　　　　Dim wst As Excel.Worksheet = DirectCast(wbk.Worksheets(1), Excel.Worksheet) 　　　　Dim r1 As Excel.Range = wst.Range("A1") 　　　　r1.Value = "100m3" 　　　　r1.Characters(CStr(r1.Value).Length).Font.Superscript = True 　　　　Dim r2 As Excel.Range = wst.Range("B1") 　　　　r2.Value = "10min-1" 　　　　r2.Characters(CStr(r2.Value).Length - 1).Font.Superscript = True 　　　　app.Visible = True 　　End Sub End Module 74 名前：72 [2006/08/18(金) 11:39:51 ] >>73 これって r2.Characters(CStr(r2.Value).Length - 1).Font.Superscript = True の部分で-1を文字飾り上付きにしてると理解したつもりだけど、 DataGridに 5-10kw　20min-1 ってあった場合、5-10kwの部分にある-1も小さくなりますか？ 75 名前：デフォルトの名無しさん mailto:sage [2006/08/18(金) 11:43:01 ] ｳﾎﾞｧ('A`) 76 名前：デフォルトの名無しさん mailto:sage [2006/08/18(金) 11:46:00 ] >>74 サンプルをアレンジすることなくそのまま使う気か？ 自分でデバッグする気もないのか？ 77 名前：73 mailto:sage [2006/08/18(金) 11:55:39 ] >>74 セルの文字列の右から2文字を上付きにするというコードです。 DataGridからExcelにどうやって編集してるか分からないので あなたの質問には答えられません。 78 名前：74 [2006/08/18(金) 12:12:25 ] >>76 いや　どうやってmin-1とほかの-1を区別しようか考え中です。 今のところは １、min-1をReplaceで絶対使わないであろう文字列(仮にX）にする ２、-1をReplaceで絶対使わないであろう文字列(仮にY)にする ３、XをReplaceでmin-1に戻す ４、-１をSuperscriptで小さくする ５、YをReplaceで-1に戻す でいいのかなと考えてるところです。 >>７７ 右から2文字を上付きにするコードとありますがその2文字を指定している 部分が見当たらない(上手く探せないだけだと思いますが)ので考えたのです。 単位が出るのは確実に右端なのでこのままで良いと思いますが、折角なので 色々試してみようかなと思います。 79 名前：デフォルトの名無しさん mailto:sage [2006/08/18(金) 12:16:18 ] >>78 > でいいのかなと考えてるところです。 なら>>74みたいなことまで聞くなよ('A`) 80 名前：78 [2006/08/18(金) 12:23:40 ] >>79 脊椎反射で書き込んだ。 今は反省している。 てかその顔いいな。 私は好きです。>('A`) 81 名前：デフォルトの名無しさん mailto:sage [2006/08/18(金) 12:26:50 ] >右から2文字を上付きにするコードとありますがその2文字を指定している >部分が見当たらない ｳﾎﾞｧ('A`) 82 名前：デフォルトの名無しさん mailto:sage [2006/08/18(金) 12:27:00 ] システム屋には向かん性質だな。 転職考えなよ。 83 名前：デフォルトの名無しさん [2006/08/18(金) 14:03:20 ] r2.Characters(CStr(r2.Value).Length - 1).Font.Superscript = True の.Length - 1←　この-1はmin-1の-1と勘違いしていた。 絶対にmin-1は右端だと思っていたら 10min-1　200V (40min-1)　とかいろんなパターンを見つけちゃったのでこれから min-1の位置を正確に割り出す方法を考えます。 みんなサンクス。 84 名前：デフォルトの名無しさん [2006/08/18(金) 18:51:28 ] Label1とLabel2に タイマーを使った乱数のスロットの値aとbを表示するプログラムを作ったのですが Label1とLabel2に表示された値が同じ（a=b）だった時に、また自動的に選び直すようにしたいのに Do until（a<>b）文にInt関数を挟んでも、 それらをIf（a=b）文で挟んでも、選び直してくれません。 タイマーのスタートとストップをInt関数のかわりに二段並べて記述しても、当然の事ながらうまくいきませんでした。 どうすれば良いのかどうかお知恵をお貸し下さい。 85 名前：デフォルトの名無しさん [2006/08/18(金) 19:11:40 ] >>84 そういうエスパー向きの質問はムーにでも投稿しろよ。 誰がそんな文章読んで理解できるんだよアホか 86 名前：デフォルトの名無しさん mailto:sage [2006/08/18(金) 19:56:08 ] >>84 コードを全部貼れ。 話はそれからだ。 87 名前：デフォルトの名無しさん [2006/08/18(金) 21:44:05 ] 想像されるコード If(a=b)Then Do Until (a<>b) Int() Timer1.Start Timer1.Stop Loop EndIf 88 名前：84 [2006/08/19(土) 05:34:58 ] >85>86 ドコで聞けば良いでしょうか？ >87 そうなんです！ Label1=Int（ランダム） Label2=Int（ランダム） もしくは Timer1=true Timer2=true Timer1=false Timer2=false のどちらかをDo until文の中に記述したんです。 どなたか、助けて下さい!! 89 名前：デフォルトの名無しさん mailto:sage [2006/08/19(土) 07:35:14 ] >>88 ヒント : Do 〜 Loop Until(While) 90 名前：88 mailto:sage [2006/08/19(土) 09:31:23 ] >89 ありがとうございます！ 来週始めに学校に行った時に試してみます。 91 名前：デフォルトの名無しさん mailto:sage [2006/08/19(土) 12:31:53 ] VB.net Express Edition で発行した際のインストール先について教えてください。 インストール環境　XP　.NetFramework2.0 1)発行で作成したsetup.exeでXPのマシンにインストールする場合 　インストール先はユーザーから選択することはできないのでしょうか？ 　（インストールしたユーザーのMyDocuments以下のLocal Settings\Apps\2.0\に作成されます） 　インストール時にユーザーがフォルダを選択できるのがベストです。 2)XPでAdministrator権限のユーザーがインストールした場合でも 　そのユーザーしか使用できません。他に何か設定する必要がありますか？ VB.netでの開発が初で面食らっております。なにとぞよろしくです。 92 名前：デフォルトの名無しさん mailto:sage [2006/08/19(土) 13:02:39 ] >>91 ClickOnceとはそういうもの。 普通のセットアップが作りたければStandard以上が必要。 93 名前：デフォルトの名無しさん mailto:sage [2006/08/19(土) 13:15:06 ] >>92 なるほど、そうでしたか。 早速の回答どうもありがとうございました。 94 名前：デフォルトの名無しさん [2006/08/21(月) 13:06:44 ] VB.NET2005で質問です DayOfWeekで曜日の番号を取得した後 それを日本語名の曜日名に変換するにはどうすればいいでしょうか？ だｙOfWeekの結果=0 の場合 ”日”　または　”日曜日” を取得したいのです。 日付から曜日は検索しても出てくるのですが しつもんのは内容の見受けられませんでした。 ご存知の方よろしくお願いいたします。 95 名前：デフォルトの名無しさん [2006/08/21(月) 13:10:23 ] 自作汁 96 名前：デフォルトの名無しさん mailto:sage [2006/08/21(月) 13:22:32 ] >>94 enum DayOfWeekJP { 　日曜日, 　月曜日, 　火曜日, 　水曜日, 　木曜日, 　金曜日, 　土曜日 } 97 名前：デフォルトの名無しさん mailto:sage [2006/08/21(月) 13:36:39 ] >>94 For d As DayOfWeek = DayOfWeek.Sunday To DayOfWeek.Saturday 　　Console.WriteLine(System.Globalization.DateTimeFormatInfo.CurrentInfo.GetDayName(d)) Next 98 名前：97 mailto:sage [2006/08/21(月) 13:48:11 ] 短い方が欲しければGetAbbreviatedDayName(d) 99 名前：84 [2006/08/21(月) 14:09:52 ] 以前に>84で質問を致しまして、このスレで教えていただいた方法を試してはみたのですが、なかなかうまくいかないので、どなたか助けていただけないでしょうか…？ 以下に、参照用としてコードを記入しておきます。 Timer1_Tick Label2.Text = Int((52 * Rnd()) + 1) Label3.Text = Int((52 * Rnd()) + 1) Button1.Click Timer1.Enabled = True Button2_Click Timer1.Enabled = False a = Val(Label2.Text) b = Val(Label3.Text) Do Label2.Text = Int((52 * Rnd()) + 1) Label3.Text = Int((52 * Rnd()) + 1) Loop Until a <> b 100 名前：デフォルトの名無しさん mailto:sage [2006/08/21(月) 14:18:40 ] >>99 すまんが、何がやりたいのかもっとまとめてくれないか？ １、Button1でタイマースタート。乱数表示開始。 ２、Button2でタイマーストップ。表示されている乱数をa,bに代入。 ３、‥‥ みたいな感じで、箇条書き＆時系列に沿って書き出してみてくれ。 101 名前：デフォルトの名無しさん mailto:sage [2006/08/21(月) 14:31:37 ] >>99 Button2_Click Timer1.Enabled = False Do Until Label2.Text <> Label3.Text 　　Label2.Text = Int((52 * Rnd()) + 1)　　'こっちはいらない気もする 　　Label3.Text = Int((52 * Rnd()) + 1) Loop でいいんじゃねえの？

---

---

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

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