VB.NET質問スレ (Part17)

VB.NET質問スレ (Part ..

446:デフォルトの名無しさん
06/09/18 00:10:07
>>444
おまいノーベル賞並みの天才だな

447:デフォルトの名無しさん
06/09/18 00:19:12
皆さんありがとうございます。
>>444
実は
Case "a" To "z", "A" To "Z"
hasAlpha = True
Case "0" To "9"
hasNum = True
で
If　hasAlpha = True　And　hasNum = True
Okメッセージ

これでやってるんですが、うまくいかないんです。

448:デフォルトの名無しさん
06/09/18 00:21:19
まず、どうやったら良いかを考える前に、
それの何がいけないのか、どうしてこんな馬鹿なことを考えたのか、
それらが解るようになるまで勉強し直しておいで。

449:デフォルトの名無しさん
06/09/18 00:25:16
>>447
まあこのスレは精神的幼児が多いから無視していいよそういうのはw

VBのSelect Case はC系のとそれと違ってマッチする条件があるとそのままBreakするから
それでは正しく動かない。

450:デフォルトの名無しさん
06/09/18 00:31:02
>>449
やっとひとつ理解できました。
ということは、Select Caseを使ってアルファベットと
数字を別々に判定することは無理なんですかね。

451:デフォルトの名無しさん
06/09/18 00:33:59
そうだから正規表現覚えるのが結局一番早いよ。
今後の応用範囲も広がるし

452:デフォルトの名無しさん
06/09/18 00:35:13
正規表現っていうのはこの場合何でしょう？

453:デフォルトの名無しさん
06/09/18 00:36:06
この場合もクソもないでしょ

454:デフォルトの名無しさん
06/09/18 00:39:23
>>447
そのSelectは何に対してやってるんだ？
パスワード全体に対してやっても意味無いぞ。
ループの中でパスワードの1文字ずつに対してやればうまく行くんじゃないの？

455:デフォルトの名無しさん
06/09/18 00:42:00
甘やかしな教えた君が増えると、努力もしない教えて君が調子ぶっこいて何でも聞いてくるようになるから嫌だよな。

456:デフォルトの名無しさん
06/09/18 00:50:36
ここ質問スレなんだけどｗ

457:デフォルトの名無しさん
06/09/18 00:52:48
つってもvb以前の質問はねー

458:デフォルトの名無しさん
06/09/18 00:53:15
まあ質問者が自分で考えもしない超低レベルなら、回答者も馬鹿揃いだから、丁度いいんじゃね？

459:デフォルトの名無しさん
06/09/18 02:06:09
C#スレみたいに本スレと初心者スレ分ければいいんじゃね?
C#のほうはあんまり機能してないけど

460:デフォルトの名無しさん
06/09/18 07:36:09
質問とか初心者以前だろ？

どうしたらいいか？　正規表現。

これで終わってる話。
それを調べて判らない点が出たら再質問。それが常識。

会社の新人で、ここにいる質問の人みたいのいたらケリだよ。

461:デフォルトの名無しさん
06/09/18 09:44:33
434じゃないけど便乗質問。
自分の頭では"(全部数字)|(全部英字)|(全部英数字)"にマッチして、
グループ1と2が空でグループ3が空じゃなかったらOKというのしか思いつかなかった。
マッチしたかどうかで一発で判定できる正規表現って書ける？

462:デフォルトの名無しさん
06/09/18 11:30:18
検索文字列がパターン化できないのであれば正規表現は使いにくいよ。
「英字が入ってる AND 数字が入ってる」でチェックして、外れたの
はやり直しって感じでいいんでない？

URLﾘﾝｸ(homepage1.nifty.com)

463:デフォルトの名無しさん
06/09/18 12:56:04
最低・最悪のユーザー・エクスペリエンスと評判の　.NETアプリ
こんな素晴らしいクソ言語の学習に皆さんがんばって下さい

464:デフォルトの名無しさん
06/09/18 13:08:45
学習、なんて言っているうちは何を言っても説得力無し。

465:デフォルトの名無しさん
06/09/18 13:51:11
すいません、上記の方々と別件なのですが、正規表現で質問です。

「?:@123xxxxx」という文字列を含むinstrを「@123」へ変換したいと思っています。
※「?」「:」「@」は普通の文字として扱う。

以下のような正規表現で変換しようとしたら、resultがNothingになってしまいます。
result = System.Text.RegularExpressions.Regex.Replace(instr, "\?\:\@(\d\d\d)(\w+)","\@$1")

ちなみに以下のようにしたら、例外が発生。
result = System.Text.RegularExpressions.Regex.Replace(instr, "?:@(ddd)(w+)","@$1")

VB.netの正規表現ではどのように表現すればよろしいでしょうか。
よろしくお願いいたします。

466:デフォルトの名無しさん
06/09/18 13:54:33
エスケープする必要がある文字とない文字を MSDN で調べれ

467:デフォルトの名無しさん
06/09/18 14:37:58
検索パターンに余計な\を入れても無視されるだけで戻り値がNothingになることは無いと思うんだが。

468:465
06/09/18 15:05:20
>>466
以下のように変更したら、キチンと値が帰ってくるようになりました。
どうもありがとうございまいした。
work = System.Text.RegularExpressions.Regex.Replace(instr, "\?:@(\d\d\d)(\w+)","@$1")

>>467
私も今までPerlやJavaでは465のように書いていて問題なかったため、
VB.NETでも同様だと思ったのですが、Nothingになってしまいました。
VB.NETでは厳密にエスケープ文字を判定しているようですね。。。

469:デフォルトの名無しさん
06/09/18 19:11:55
>>411
select * from 利用テーブル　Where 登録月
でdatasetに書き込み
その後datavviewでID=Aとかいくらでも抽出しればいくね。

470:デフォルトの名無しさん
06/09/18 19:15:04
正規表現文字クラスの[]指定内で前方参照する方法ってある？
(['"])[^\1]+\1
みたいな（ここの2つ目の[]のやつね）。
上のは、'か"で囲まれた文字列の検索。

471:デフォルトの名無しさん
06/09/18 19:15:46
ここって思うし、質問する人間と回答する人間、経験何年と年収いくらか一緒に記載すると、
返答も相手のレベルに合わせられるし、質問した方も、回答の理解の仕方が上がるんじゃない？

普通会社では相手が見えるから、お互いのレベルを分かった上で話すじゃん。
そう思うのは私だけかい？

472:デフォルトの名無しさん
06/09/18 19:56:36
>>471
そんなの質問に必要ない。

適切な日本語で質問を表現できること、会話になること。
本人が言われたことに対して試してフィードバックできること。
それだけ。

473:デフォルトの名無しさん
06/09/18 20:01:22
>>471
日本語でお願いします

474:デフォルトの名無しさん
06/09/18 20:23:21
>>472
ほぼ同意。
それに加えて「雑音を聞き流す大人の対応」もできれば大吉。
煽るだけで有益な情報のない脊髄レスは脳内フィルタリングするべし。

475:デフォルトの名無しさん
06/09/18 20:23:23
>>471
たった数行のレスで相手のスキルを推測し真性なのか釣りなのか即座に
判断できないようでは一流のＳＥとは言えん。

476:デフォルトの名無しさん
06/09/18 20:34:31
エスパー乙。
今後も行間を読みまくって適切な解答を書いてください。

477:デフォルトの名無しさん
06/09/18 20:41:20
このレスの住人はユーモアを理解せぬようだの。

478:デフォルトの名無しさん
06/09/18 20:54:08
レスには住めんのう…

479:デフォルトの名無しさん
06/09/18 20:58:10
>>478
面白くない。
Debug.Print()百回やって出直してこい。

480:デフォルトの名無しさん
06/09/18 21:10:04
ループでまわしていいですか?

481:デフォルトの名無しさん
06/09/18 21:17:58
>>480
gotoにしとくと飯が旨く感じるらしいぞ

482:デフォルトの名無しさん
06/09/18 21:35:53
残念、オレはconsole.writeline()だ

483:デフォルトの名無しさん
06/09/18 21:51:54
>>479
ﾄﾞﾄﾈﾄらしく System.Diagnostics.Debug.WriteLine() を使えよ！！

484:デフォルトの名無しさん
06/09/18 21:54:38
うーん、ここって高度な技術者なのかな・・全然日本語がわからない。

485:デフォルトの名無しさん
06/09/18 22:22:32
>>470
ベタに書けばこんなんだが
(?<quote>'|")(?<match>(?!\k<quote>).+)\k<quote>
最長一致じゃ拙いように思うがね
// グループに名前付けてるのはわかりやすさを優先したから

486:デフォルトの名無しさん
06/09/19 03:57:27
VB.netで、画像加工のアプリを作ってるんですが、
ブラシを使って塗りつぶして、保存した後、フォトショップで開くとエラーが出て開けません。
あと、mixiのプロフィールの画像に指定しようとアップロードすると、
「画像が壊れています」とエラーが出て失敗してしまいます。
他のアップローダでアップするとちゃんといけて、表示もされました。
原因が分かる方教えてください。

487:デフォルトの名無しさん
06/09/19 14:21:10
どうやって、どんな形式で保存しているのか。

それが問題だ。

488:デフォルトの名無しさん
06/09/19 15:34:53

　　クソ言語　　VB.NET

489:デフォルトの名無しさん
06/09/20 22:01:40
VB6からのイメージだけで思ってないか?
まあ漏れも使ったことないけど

490:デフォルトの名無しさん
06/09/20 22:17:57
VB6ユーザーを何とか移行させたくてどんどんクソ言語になって来てるのは事実

491:デフォルトの名無しさん
06/09/20 23:30:46
2003までで乗り換えがうまくいかなかったからか、2005では驚くほど
6.0ユーザーに擦り寄ってるの見え見え。

492:デフォルトの名無しさん
06/09/20 23:46:59
諦めてVB6を再販すれば無問題。

493:デフォルトの名無しさん
06/09/21 00:07:33
マクロの DTE.Find.Execute() で検索を実行すると末尾まで検索すると
先頭に戻って検索を繰り返すのですがどうやったら止めれるのでしょう？

494:デフォルトの名無しさん
06/09/21 15:21:36
リストビューのcontextmenuを使ってポップアップメニューを作る際、
右クリックされたのが、
カラムヘッダーのときと、
リストのアイテムのときと、
アイテムの無いリスト部分のときとで、
ポップアップメニュー表示非表示を切り分けるってことできます？
どうしても、どんな場合でも右クリックしたらメニューが表示されてしまいます。
同一コントロール内で、どこでクリックされたかの判断したいです。

495:デフォルトの名無しさん
06/09/21 16:51:39
>>494
できるよ。

＞どうしても、どんな場合でも・・・(ry
それは嘘だろー　どうやったのか書いてくれ。
何もしてないんだろ？

496:494
06/09/21 17:41:33
>>495
申し訳ない。
私がウソコでした。
ContextMenuプロパティから操作しようというのが間違えていました。
素直にMouseUpイベントからGetItemAtメソッドでできました。

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

497:デフォルトの名無しさん
06/09/22 08:51:17
MDIについての質問です。
UserControlから呼び出すフォームを親フォームのMDIに表示しようとして躓いています。
Parentプロパティを送るときに例外「トップレベルのコントロールをコントロールに追加できません」が発生します。
Me.ParentFormのIsMdiContainerはTrueになっています。

UserControlのイベント内で、
Dim f as New Form
f.Parent = Me.ParentForm←ここでエラー
f.Show()

498:デフォルトの名無しさん
06/09/22 09:40:28
ParentじゃなくてMdiParentじゃないの？

499:497
06/09/22 10:01:51
>>498
あああああっ
俺、何やってんだぁぁぁ（T.T

ども、ありがとです

500:デフォルトの名無しさん
06/09/22 11:19:37
ComboBoxで質問ですが
Itemsで追加した文字列のほかに任意の数値（文字でも可）を指定する方法ってありますか？
例えば、
aaaa,0
bbbb,3
cccc,4
ドロップダウンに表示するのはaaaa、bbbb、ccccで
SelectedIndexが2のときにはccccと4が抽出できるような・・・

501:デフォルトの名無しさん
06/09/22 11:38:11
DataSource
DisplayMember
ValueMember

502:デフォルトの名無しさん
06/09/22 12:26:51
>>501
それはデータベーを使わなくても使えますか？
つか、以前のＶＢで言うところのItemDataって奴があればいいとおもって調べたら
SetItemDataってのがＮＥＴにはあるっぽいのでやってみたらエラーに・・・
これどうやって使えばいいのかな・・

503:デフォルトの名無しさん
06/09/22 12:49:05
>>502
それくらいMSDN嫁

504:デフォルトの名無しさん
06/09/22 13:24:45
>>503
('д｀)えー
あのエスパーにしか解読できないヘルプをですか・・・
こっちがヘルプしてほしいくらいのヘルプだよねＭＳのって(´･ω･`)

505:デフォルトの名無しさん
06/09/22 13:28:38
>>504
ならぐぐるとか。

506:デフォルトの名無しさん
06/09/22 13:55:04
>>595
ぐぐってみました。
どうやらVB6からアップデートしたらSetItemDataが使えるらしいですが
新規でＮＥＴならそれはできないらしいですね。
ちょっと>>501のアレをみてみるかな

507:デフォルトの名無しさん
06/09/22 23:24:17
>>504

自分の読解力を棚に上げてる可能性が５割。
英語の原文読めばいいのに読んでない可能性が５割。

508:デフォルトの名無しさん
06/09/22 23:30:02
createobjectでIEのオブジェクトを作成しているのですが
最前面で表示されない場合があります。
最前面で表示される方法はないでしょうか？
よろしくお願いします。

dim ie as object
ie = createobject("InternetExplorer.Application")
ie.visible = true
ie.navigate2 "URLﾘﾝｸ(www.google.co.jp")

'最前面へ

509:デフォルトの名無しさん
06/09/22 23:31:37
>>507
MSDNの日本語訳は原文にある重要な説明が省略されていたり酷いもんだな～
で、結局、原文の方を読まないと使い物にならない。

あんな訳なら自動翻訳のがマシ。

510:デフォルトの名無しさん
06/09/22 23:38:01
>>508
SetForegroundWindow

511:デフォルトの名無しさん
06/09/23 00:45:33
>>492
MSDNライブラリで再販というか公開再開されてたな。MSJava部分を削除して。
よっぽど需要が多かったんだろう。
>>509
さすがに「宇宙天啓データベース」よりは…
まあ人間が「意図的に」重要な部分を脱落させる方がたちが悪いかもだけど

512:デフォルトの名無しさん
06/09/23 08:16:55
Int32からIntPtrへキャストする方法教えてください。

513:512
06/09/23 08:26:39
事故解決しました。

514:デフォルトの名無しさん
06/09/23 08:28:02
コンストラクタ

515:デフォルトの名無しさん
06/09/23 10:40:45
これだけ乗換えが進まないってことは、
オブジェクト指向が糞ってことだよな。

516:デフォルトの名無しさん
06/09/23 10:50:49
VB脳には高度すぎたんだよ

517:デフォルトの名無しさん
06/09/23 12:26:57
>>509
実際にオリジナルの英語版と日本語の翻訳を読み比べたことがないのがバレバレ
MSDNの翻訳は極めて適切だっつーにw
わかりにくいのは翻訳のせいじゃないし

518:デフォルトの名無しさん
06/09/23 12:49:28
>>517
Platform SDK 辺りのは強ち間違いでもない。
絶対数としてはそう多くはないが、やはり間違いは印象に残るからな。

MSDN2 では極めてと言っても良いぐらいに質が高くなったね。

519:デフォルトの名無しさん
06/09/23 15:41:17
OleDbでFirebirdを使うプログラミングをしてるのですが、
ExecuteNonQueryメソッドやExecuteReaderメソッドで、
「指定されたキャストは有効ではありません。」という例外が発生します。

Dim oConn As OleDb.OleDbConnection
Dim com As OleDb.OleDbCommand
Dim oCmd As OleDb.OleDbCommand
Dim oReader As OleDb.OleDbDataReader

oConn = New OleDb.OleDbConnection
oConn.ConnectionString = "File Name=C:\test.udl;"
oConn.Open()

oCmd = oConn.CreateCommand()
oCmd.CommandText = "select * from country where country = 'USA'"

oReader = oCmd.ExecuteReader()
While oReader.Read()
Debug.WriteLine(CStr(oReader("COUNTRY")) & "," & CStr(oReader("CURRENCY")))
End While

oReader.Close()
oConn.Close()

何か間違えているところはありますか？

520:デフォルトの名無しさん
06/09/23 15:49:39
GetHogehoge メソッド使って .NET の型で取得すれ。

521:デフォルトの名無しさん
06/09/23 20:32:10
>>517
昔のMSDNはwsprintf()の1,024バイト制限の記述が日本語の方では漏れていたり
結構酷いもんだったよ。こんなの致命的でしょ。
で、最近は英語の方しか見ないのでいちいち対比なんてしてません。w

522:デフォルトの名無しさん
06/09/23 20:49:56
化石乙

523:デフォルトの名無しさん
06/09/23 21:22:46
３年で化石か。

524:デフォルトの名無しさん
06/09/23 22:06:17
この場合msdn2に移行というイベントがはっきりしてるわけで

525:デフォルトの名無しさん
06/09/23 22:40:01
英語版MSDN2をローカルに入れられるインストーラはありますか？

526:デフォルトの名無しさん
06/09/23 23:05:45
でも、MSのサイトでみる自動翻訳はやっぱりむごいよ。
てにおはが間違ってるんだもん。読んでて疲れる。

527:デフォルトの名無しさん
06/09/23 23:16:56
自動翻訳に文句言っても仕方ないだろｗ

528:デフォルトの名無しさん
06/09/24 03:48:46
どうでもいいがMSDNでまともに探せないとか見つけても理解できない奴は
ＶＢに限らず何やっても相当苦労すると思う。

むしろ対話式で質疑応答しないと出来ない奴がプログラミングしてるってのは凄いと思う。
どれほど難しく見えてるのか想像つかん。まじで

529:デフォルトの名無しさん
06/09/24 06:46:48
ああ、違いない。どうでもいいことだな。

530:デフォルトの名無しさん
06/09/24 09:21:11
VB.NET 2005 の TreeViewコントロールに関して教えていただきたいのですが、
Shiftキーを押しながらマウスがホイールされたら一度に表示可能な項目数分を
スクロールさせたいのですが、どうやったら良いでしょうか。。。

イメージとしては下記のコードのような感じです・・・・(コンパイルできませんが；；)

Private Sub TreeView_MouseWheel(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles TreeView1.MouseWheel

If CBool(Control.ModifierKeys And Keys.Shift) Then
Select Case e.Delta
Case Is < 0 '下に TreeView1.VisibleCount 分スクロール
e.Delta = TreeView1.VisibleCount * -1 '←ReadOnlyなので値を入れられない
Case Is > 0 '上に TreeView1.VisibleCount 分スクロール
e.Delta = TreeView1.VisibleCount '←ReadOnlyなので値を入れられない
End Select
End If
End Sub

531:デフォルトの名無しさん
06/09/24 12:25:58
お前らの言いたいことはわかったから、おれのマシンの

「問題が発生したため、Microsoft(R) Visual Basic Compilerを終了します。
ご不便をかけて申し訳ありません。」

をどうにかしてくれ。
謝る前に直せよ、ビル・ゲイツ。

532:デフォルトの名無しさん
06/09/24 15:29:46
まあ、2ｃｈで文句言ってる暇あったらインストールしなおすよな。OSから。

533:デフォルトの名無しさん
06/09/24 23:01:07
俺のマシンは夏休みと冬休みにバックアップ＆初期化＆フルインスコ
してるよ。95OSR2時代からの癖みたいなもんだ。

534:デフォルトの名無しさん
06/09/25 15:08:31
MAPIでOutlook2002sp3以降にアクセスした際の警告ダイアログ、
プログラムが、Outlook 内に保存されている電子メールアドレスに
アクセスしようとしています。よろしいですか?」ってやつ。
あれってExchangeServerの設定いじる以外にどうしようもないですかね。
クライアントのレジストリいじくれば何とかなりそうなんだが。

535:デフォルトの名無しさん
06/09/25 15:41:12
ComboBoxのSelectedIndexChangedイベントでは変更後のSelectedIndexですが
このSelectedIndexの変更前の値を知る方法を教えてください

536:デフォルトの名無しさん
06/09/25 16:01:27
Enterで値確保しとけば？

537:デフォルトの名無しさん
06/09/25 16:38:35
初期値をフィールドに入れといて
SelectedIndexChangedの度にそのフィールド更新したらいいじゃん

538:デフォルトの名無しさん
06/09/25 17:24:58
PostMessageを使って別のEXEにメッセージを送りたいんだけど
Spy++で見てもなぜかメッセージがPostされてません
同じように宣言と設置をしてるFlashWindowはちゃんと動作してるので
ハンドルの取得ミスとかではないと思うのですが、、、
PostMessageには何か特殊なやり方があるのでしょうか？

宣言↓
Public Declare Function PostMessage Lib "user32" Alias "PostMessageA" _
(ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long

539:デフォルトの名無しさん
06/09/25 17:27:28
それVB6用だろ

540:538
06/09/25 17:38:33
>>539
もしかしてLongのところ全部Integerですか？？

と思って全部換えたら動きました
ありがとうございました！

日ごろVC++ばっかり使ってたのでVBの仕様の違いをしりませんで、、
すいませんでしたorz

541:デフォルトの名無しさん
06/09/25 20:39:13
>>540
つ URLﾘﾝｸ(www.pinvoke.net)

542:デフォルトの名無しさん
06/09/25 21:09:44
デバッガでStringとかの値が１６進値で表示されないんですが仕様ですか？

543:デフォルトの名無しさん
06/09/25 21:36:54
仕様です
て言うかその16進値ってのは何を指してるんだ

544:デフォルトの名無しさん
06/09/25 22:29:02
>>543
CR/LFとかのコードが入ってるか見たいわけよ。

545:デフォルトの名無しさん
06/09/25 22:30:19
お世話になります。
Asp.netでボタンを押下した時にクライアントサイドに
メッセージボックス表示、そして
処理の途中にもう一度メッセージ表示するには
どうしたらいいでしょうか？

546:デフォルトの名無しさん
06/09/25 22:58:50
ngen.exe の使いかたがよくわからないんだけどどうやるの？

547:デフォルトの名無しさん
06/09/25 23:10:50
ngen /?

548:デフォルトの名無しさん
06/09/25 23:46:34
「フォームの作成」と「プロシージャの記述」とは主にどのような作業のことを指すのですか？
できれば、簡潔にまとめてほしいです。

549:デフォルトの名無しさん
06/09/25 23:48:56
まあ簡潔にいうと君はプログラマには向いてないってことでしょう。

550:デフォルトの名無しさん
06/09/25 23:55:12
だな。
最近多いよね。基本的な入門書も読まずにプログラム組む新人。

551:デフォルトの名無しさん
06/09/26 00:04:32
>>550
組むわけではないんですが、都合上どうやるのかを知っておかなくては行けないんです。

552:デフォルトの名無しさん
06/09/26 00:21:46
フォームの作成
フォームのインスタンスをコンストラクトすること

プロシージャの記述
プロシージャをディスクライブすること

553:デフォルトの名無しさん
06/09/26 00:27:37
>>552
上は分かりますが、下はそのままじゃないですか。
もうすこし、詳しく教えていただけませんか？

554:デフォルトの名無しさん
06/09/26 00:32:26
プロシージャの記述
プロシージャをコンポーズするステートメントをディスクライブすることによって
プロシージャとしてのファンクションをコンポーズすること

555:デフォルトの名無しさん
06/09/26 01:42:14
もうやめれｗ

556:デフォルトの名無しさん
06/09/26 09:38:07
・フォームの作成
フォームを精魂込めて我が子を育てるがごとく作成すること。

・プロシージャの記述
関数の記述は一関数入魂が基本です。血の出るほどの魂を込めて記述しましょう。

557:デフォルトの名無しさん
06/09/26 11:01:55
>>548
「フォームの作成」
ボタンやテキスト・フィールド、コンボ・ボックス等のGUI部品を並べて画面を作る事です。

「プロシージャの記述」
フォームの作成で作ったボタン等が押された時に何かの計算をするとかデータベースから
値を読み込むとかのプログラム処理を記述します。

# >>548がのクライアントだったらどうするよ？しかもおエラいさん。
# いい加減なことを吹き込んで苦労するのはおまいらだ。w

558:デフォルトの名無しさん
06/09/26 11:03:02
日本語が変だ。orz

559:デフォルトの名無しさん
06/09/26 11:05:52
思ったより簡単に沢山釣れましたので満足です。
どう見ても釣堀りです。ありがとうございました。

560:デフォルトの名無しさん
06/09/26 15:08:14
VB.NET2003でコントロールのサブクラス化がしたいのですが
サンプルをいただけないでしょうか？

561:デフォルトの名無しさん
06/09/26 15:17:55
URLﾘﾝｸ(support.microsoft.com)

562:560
06/09/26 15:32:27
すみません。事故解決しました。

563:560
06/09/26 16:01:29
Protected Overrides Sub WndProc(ByRef m as System.Windows.Forms.Message)

If m.Msg = &h201 Then 'WM_LBUTTON_DOWN
　If Msgbox("キャンセルしますか？") = vbYes Then
　　Return
　End If
End If

MyBase.WndProc(m)

End Sub

としてキャンセルのときは左クリックを無かったことにしたいのですが
上記のようにただのReturnですと左クリックのメッセージが
うまくキャンセルできていません。
次の左クリックが無効になってしまいます。
綺麗なキャンセルのやり方があれば教えてください。
よろしくお願いします。

564:デフォルトの名無しさん
06/09/26 21:13:15
>>563
釣り？
そりゃクリックとキー入力じゃメッセージ違うでしょ。

っていうか、ドトネトじゃそういうやり方はどっちかというと邪道。
OnClickをオーバーライドした方が簡単だしわかりやすい。

565:デフォルトの名無しさん
06/09/26 21:16:15
つーか、そんな糞UI誰が喜んで使うんだと小一時間

566:563
06/09/26 21:19:58
すみません。事故解決しました。

567:デフォルトの名無しさん
06/09/26 21:22:40
完全に頭おかしい奴だなw

568:デフォルトの名無しさん
06/09/27 11:34:38
PictureBox1.ImageLocationに、
リファラーを設定してWeb上の画像を表示する方法を教えてください。

569:デフォルトの名無しさん
06/09/27 11:48:38
リファラーを設定を設定します

570:デフォルトの名無しさん
06/09/27 12:36:18
PictureBox1.ImageLocationに、
リファラーを設定してWeb上の画像を表示する方法を教えてください。

571:デフォルトの名無しさん
06/09/27 12:42:09
572 :570 :2006/09/27(水) hh:mm:ss
すみません。事故解決しました。

って来る予感w

572:デフォルトの名無しさん
06/09/27 12:42:39
PictureBox1.ImageLocationに、
リファラーを設定してWeb上の画像を表示する方法を教えてください。

573:570
06/09/27 13:08:42
みません。事故解決しました。

574:568
06/09/27 13:14:20
PictureBox1.ImageLocationに、
リファラーを設定してWeb上の画像を表示する方法を教えてください。

誰も解らないのですか？

575:563
06/09/27 13:24:06
HTTPで画像を取ってきてPicutureBox1にロードすればいいのでは？

576:デフォルトの名無しさん
06/09/27 13:33:04
画像の置き場の管理者に
「リファラみんじゃねーぞ（ﾟﾛﾟ）ﾓﾙｧ！！」
ってメール打て

577:568
06/09/27 14:20:36
PictureBox1.ImageLocationに、
リファラーを設定してWeb上の画像を表示する方法を教えてください。

ここはラベルの低いスレですね

578:デフォルトの名無しさん
06/09/27 15:31:46
ヒント
インターネットRFC辞典を読め

579:568
06/09/27 16:19:56
PictureBox1.ImageLocationに、
リファラーを設定してWeb上の画像を表示する方法を教えてください。

ほんと皆さんにはがっかりです

580:デフォルトの名無しさん
06/09/27 16:30:18
池沼？

581:デフォルトの名無しさん
06/09/27 16:44:45
エロ画像Browserでも作ってるんだろうな

582:デフォルトの名無しさん
06/09/27 17:09:32
PictureBox1.ImageLocationに、
リファラーを設定してWeb上の画像を表示する方法を教えてください。

全然役に立たないですね

583:568
06/09/27 17:58:37
PictureBox1.ImageLocationに、
リファラーを設定してWeb上の画像を表示する方法を教えてください。

オナニーは抜いた後にしてください。

584:真の568
06/09/27 18:10:19
みんな興味深々じゃんｗｗｗ
教えたれよ

585:デフォルトの名無しさん
06/09/27 18:10:27
解答もらえてる質問ともらえてない質問には大きな差がある。

質問するなら他の質問の仕方を見てみろ。

586:デフォルトの名無しさん
06/09/27 18:18:55
解答もらえてる質問
→簡単な質問

もらえてない質問
→難しい質問

587:デフォルトの名無しさん
06/09/27 18:49:31
>>568
なぜリファラーが必要だと思うのか説明してくれよ。
本当はリファラーかどうかもわからないんだろ？

>>586
典型的な答えてもらえないタイプだな。

588:デフォルトの名無しさん
06/09/27 19:18:28
PictureBox1.ImageLocationに、
リファラーを設定してWeb上の画像を表示する方法を教えてください。

無駄なレスは不要です

589:デフォルトの名無しさん
06/09/27 19:21:13
しばらく構わずに放っておいたらどこまで続くだろうな。

590:デフォルトの名無しさん
06/09/27 19:21:54
PictureBox1.ImageLocationに、
リファラーを設定してWeb上の画像を表示する方法を教えてください。

質問する時間帯が悪かったみたいですね

591:デフォルトの名無しさん
06/09/27 19:47:23
PictureBox1.ImageLocationに、
リファラーを設定してWeb上の画像を表示する方法を教えてください。

荒らしてた厨房は今頃宿題ですかね

592:真の568
06/09/27 20:06:50
>>587
例えば、ITMadiaはリファラーを設定しないと画像直リンできません。
URLﾘﾝｸ(image.itmedia.co.jp)
とかをフォーム上で表示したい場合、
リファラーに　URLﾘﾝｸ(www.itmedia.co.jp)　を指定するとDLできます。
なので、リファラーは必要です。

ターゲットURLとリファラーURLを引数として、
ターゲットURLにリファラーURLをセットしてPOSTし、
対象をDLするSubプロシージャーを作りたいのです。

どなたかテンプレを。。。

593:デフォルトの名無しさん
06/09/27 20:30:57
HttpWebRequest 調べれ
自前で取ってくる必要がある

594:デフォルトの名無しさん
06/09/28 11:02:57
クソ言語　　VB.NET

595:デフォルトの名無しさん
06/09/28 18:30:30
>>594
馬鹿とハサミは使いよう。
言語も同じく。

596:デフォルトの名無しさん
06/09/28 19:15:50
言語つーより、このツール自体ゴミですね。
なにこの操作性？まともな開発ツールじゃないよ？
どこかの素人学生がつくったようなツールだ

597:デフォルトの名無しさん
06/09/28 19:20:48
スレ違い

598:デフォルトの名無しさん
06/09/28 19:21:56
いやVB.NETの事なのでスレ違いじゃないですよ

599:596
06/09/28 19:31:47
あ、開発ツールの話は、
Visual Studio 2005スレ Part16
ｽﾚﾘﾝｸ(tech板)
ですね＾＾

すいません。私の頭にウジが沸いているんです。許してください。

600:デフォルトの名無しさん
06/09/29 03:11:25
vb.netで、DataGridのカラムヘッダーのソート方向を表す▲の色ってどのオブジェクトで変更できます？
DataGridのBackgroundColorとHeaderBackColorを同じ色にしたら三角が見えなくなったので、
別の色に変更したいです。

601:デフォルトの名無しさん
06/09/29 14:39:57
DataSetの中に、Tableがあるかないかを取得するには、どうしたらいいですか？

602:601
06/09/29 14:59:01
Dim tb1 As DataTable
Dim str1 As String
For Each tb1 In ds.Tables
str1 = tb1.TableName
If str1 = "Table1" Then
MsgBox("Table1は、ないです。")
Exit Sub
Else
MsgBox("Table1は、あるです。")
End If
Next tb1

↑みたくしてみました。
もっと、うまい方法があるのかな？

603:デフォルトの名無しさん
06/09/29 15:02:54
あ！↑あるとない逆でした／／／。

604:デフォルトの名無しさん
06/09/29 15:16:11
>>601
つds.Tables.Contains(テーブル名)

あと602のコードだけど実行したら
ないです→ないです-(以下見つかるまでループ)→あるです
ってブラクラみたくなると思うんだが

605:デフォルトの名無しさん
06/09/29 15:22:08
そんなあるか無いか調べないと駄目っていう状態で作りたくないな。
質問者の設計が糞だと思う。

606:600
06/09/29 15:39:14
help me, please...

607:デフォルトの名無しさん
06/09/29 16:21:30
>>606
自前で描画

608:デフォルトの名無しさん
06/09/29 16:39:23
VB.NET始めて2ヶ月の初心者です
学習用のサンプルで
CInt(x)
と
CType(x, integer)
というのが出ていたのですが、これって同じ結果になるものですか？
それとも状況によって使い分けたりするものなのでしょうか

609:デフォルトの名無しさん
06/09/29 17:01:48
>>606
描画がいやなら、別の色組み合わせを検討してみよう。

610:デフォルトの名無しさん
06/09/29 17:14:01
>>608
VB.NETのキャストは何種類かある
CType(val, T)は汎用。ちなみに失敗するとInvalidCastExceptionが出る。
CIntとかCLngとかは6.0以前の遺産じゃないかな?まあ型指定の手間省けるけど。
これらも変換できないときはInvalidCastExceptionを投げる。

ちなみにTryCast(obj, T)だと失敗したときはNothingが返される。ただし参照型限定。

611:デフォルトの名無しさん
06/09/29 17:38:09
>>604
Containsで、できました！嬉しいです。ありがとうございました。

ソースをコピペしたとき、なにげなしに、<> のとこを = に変更しちゃったので、
ブラクラになってしまいました。ホントは、Exit Subは下の段です。。
すみませんでした。。

612:600
06/09/29 17:40:25
>>607 >>609
サンクスです。
基本的に逃げ道は無いということですね…。

613:デフォルトの名無しさん
06/09/29 20:18:33
>>610
System.Convertと言うのもあるな。

614:デフォルトの名無しさん
06/09/29 22:45:52
行き先の型が確定してるなら、DirectCastが良い。

615:デフォルトの名無しさん
06/09/29 23:34:24
質問スレと関係ねえけど、先進性を売りにしてるドトネト諸言語でも
キャストと変換が峻別されてないのはどうにかならんかねと思う。

616:デフォルトの名無しさん
06/09/30 03:32:23
＞行き先の型が確定してるなら、DirectCastが良い。
おかしなことをゆうな。

617:デフォルトの名無しさん
06/09/30 06:08:03
元先って表現が正しかったかね。
あいまいさのない変換ならって意味。

618:608
06/09/30 09:07:27
>>610,613,614
回答ありがとうございます
色々試して使い分けられるように頑張ります

619:デフォルトの名無しさん
06/09/30 14:37:58
検索をしようと、ctrl+Fを押下したのですが、検索ボックスが表示されません。
昨日までは、表示されていたのですが・・・
どうしたら表示されるようになるでしょうか？

620:619
06/09/30 15:08:17
タスクバーをけしてみたら、画面の下の方に出ていました。
くそ質問ですみませんでした。

621:デフォルトの名無しさん
06/09/30 17:29:14
>>620
IDEのツールボックスやウィンドウレイアウトは、オプションから初期
設定に戻すことができるよ。今回のが該当するのか不明だけど、同僚
がいっつもツールボックスを紛失するんで、俺も覚えてしまった。

622:デフォルトの名無しさん
06/09/30 18:29:41
VB.NETで非同期イベントってどうやればいいんですか？
C#だとこんな感じでできるのですが
　//delegate設定
　public delegate void testDelegate( object sender, EventArgs e );
　//イベント設定
　public event testDelegate Tested;

　//非同期イベント発行
　Tested.BeginInvoke(this, EventArgs.Empty, new AsyncCallback(TestedCallback), Tested);
　//コールバック関数
　private void TestedCallback(IAsyncResult ar)
　{
　 testDelegate callback = ar.AsyncState;
　 callback.EndInvoke(ar);
　}

VBだとTested.BeginInvoke()でエラーがでます。

623:デフォルトの名無しさん
06/09/30 19:12:09
>>622
同じようにやればいいんじゃないの？
VBでどう書いてどういうエラーが出たんだ？

624:デフォルトの名無しさん
06/09/30 19:21:32
>>623
　//delegate設定
　Public Delegate Sub testDelegate(ByVal sender As Object, ByVal e As EventArgs)
　//イベント設定
Public Event Tested As testDelegate

Tested.BeginInvoke()で「Testedはイベントであるため、
直接呼び出すことはできません。」のエラーがでる。

625:デフォルトの名無しさん
06/09/30 19:47:06
Testedをイベントじゃなくて単なるデリゲートにしたら？
イベントハンドラがいらないならイベントである必要はないんだけど。

626:デフォルトの名無しさん
06/09/30 19:49:14
>>622
おま、そのC#のほうも、内容わかってないだろ。
内容をまず理解したほうがいい。そうすれば簡単にわかる話だ。

まずはそれからだ！

627:デフォルトの名無しさん
06/09/30 20:06:24
てきとーに、イベントに関数を与えるのはAddressofでやるのでは？

628:デフォルトの名無しさん
06/09/30 21:15:08
>>622
ああ、C#だとそういう風にイベントをデリゲートとして扱えるのか。。
VBだとたぶんそのコードを「直訳」することはできないね。

ばかばかしいことだけど、RaiseEventでイベントを生成するメソッド(OnTested)
を、別のデリゲートで非同期呼び出しする必要がありそう。

この変はイベントを簡単に扱えるようにしているVB.NETの暗黒面かもしれん。

ちなみに、どうでもいいんだけどそういうの非同期イベントっていうのは
正式な用語法なのかな？

629:デフォルトの名無しさん
06/09/30 21:25:09
>>628
> ちなみに、どうでもいいんだけどそういうの非同期イベントっていうのは
> 正式な用語法なのかな？
いんや。

つか 622 のコードはイベントをデリゲートとして扱えてしまう C# の暗黒面。
BeginInvoke はあくまで非同期デリゲートなんだから。

630:デフォルトの名無しさん
06/09/30 21:31:14
>>629
それ君の倒錯だと思うけどね俺は。

実際問題、たとえば何らかのデバイスなりストリームなりを監視する
ワーカースレッドから、UIスレッドに同期したイベントを生成したいって場合は
少なからずあるんだよ。

そういう場合はVBだと>>628に書いたような非常にばかばかしいコードを書かなきゃならん。

631:デフォルトの名無しさん
06/09/30 21:36:02
ちょっとC#勉強してくるﾉｼ

632:デフォルトの名無しさん
06/10/01 04:17:33
てかよ、デリゲートの非同期呼び出しはマルチキャストできないんじゃなかったっけ？
つまりそもそもイベント発火すんのにそんなもん使っちゃだめってことだろよ。
UIに同期したいなら面倒でもメソッドいっこかませりゃ済む話でそ？

633:デフォルトの名無しさん
06/10/01 12:26:44
>>632
どこにそんなこと書いてあるんだよw

634:デフォルトの名無しさん
06/10/01 15:04:35
マイクロソフト公式解説書「プログラミング Visual C# 2005 言語編」
にはっきりと書いてある。

635:デフォルトの名無しさん
06/10/01 15:18:13
書いてあるわけねーw
だってそんなの事実に反するからね

だいいちデリゲートにとっちゃ自分のケツを誰が叩いているかなんて
全然関係のない話だろw

636:デフォルトの名無しさん
06/10/01 15:25:07
おまえ言ってること勘違いしてないか？

デリゲートの非同期呼び出しはマルチキャストでは使えない（これは上記の本に書いてある）。
イベントはマルチキャストすることが普通にある。
よってイベントをデリゲートの非同期呼び出しで呼び出すのはまずい。

って言ってるんだが。
イベントの発火をデリゲートの非同期呼び出しでやったらまずいってのは
上記からの俺の見解だからｌこれは書いてないけどな。

637:デフォルトの名無しさん
06/10/01 15:58:56
>>636
勘違いしてるのはたぶん君だと思うよ。

推測でしかないけど、たぶんEndInvoke使って返り値を取れるのは
デリゲートが一番最後に呼び出したメソッドだけ、って話とどっかで
混同してるんじゃないの？

638:デフォルトの名無しさん
06/10/01 16:07:08
人によって Control.BeginInvoke を言ってるのか Delegate.BeginInvoke を言ってるのか
バラバラでグダグダになってるな。
非同期デリゲートなんだから Delegate.BeginInvoke の話のはずだが。

EventHandler handler = delegate { Console.WriteLine("a."); };
handler += delegate { Console.WriteLine("b."); };
IAsyncResult ia = handler.BeginInvoke(null, null, delegate(IAsyncResult ar) {
　　handler.EndInvoke(ar);
}, null);
ia.AsyncWaitHandle.WaitOne();

> ハンドルされていない例外: System.ArgumentException:
> デリゲートに指定するターゲットは 1 つでなければなりません。

匿名メソッドは楽じゃのう。

639:デフォルトの名無しさん
06/10/01 16:23:19
どうみても>>636が正しいです。

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

640:デフォルトの名無しさん
06/10/01 16:34:27
>>637
だから書籍に書いてあるってんのに何をどう勘違いするってんだ。
「BeginInvokeメソッドは、シングルキャストデリゲートに対してのみ使用できます」
って書いてあるっての。

641:デフォルトの名無しさん
06/10/01 16:37:08
ああ…つまりそういうことだｗ

642:637
06/10/01 17:35:49
なんか勘違いしてるのは俺の方だったみたいね。。
なんか恥ずかしいなw

ってことは、結局非同期的にマルチキャストなイベントを起動しようと思ったら
OnXXXを非同期的に呼び出さないとダメってことなのか？

C#でもイベントに対してBeginInvokeなんて迂闊に使ったらまずいわけか。

643:デフォルトの名無しさん
06/10/01 19:05:36
んーたいていの場合、イベントソースの方が非同期で処理してるんだろうから、
そのままイベント投げればいいと思うんだけどな。
非同期でイベントを発火しなきゃならん状況があんまりうかばないんだが。

644:デフォルトの名無しさん
06/10/01 19:11:58
>>643
制御系とかでユーザ操作に関係なく発生するイベントとかは？

645:デフォルトの名無しさん
06/10/01 19:21:40
んーじゃなくてさ
非同期で発生するイベントはいろいろ考えられても、
イベントソースの方が非同期でイベントを発火することはあまりないんじゃ？てこと。
※ソース側のスレッドからさらに非同期でイベントを発火するって話ね。

そりゃ制御系とか、その他、ソース側のワーカスレッドをブロックしては困る場合とかは
あるだろうけど、そういうのは少ないんじゃ？ってこと（ないとは言ってない）

646:デフォルトの名無しさん
06/10/01 20:08:57
>>645
たとえばHWバッファが貧弱なために一定の時間間隔以下で必ずreadしてやらないと
バッファがオーバーフローしてしまうようなデバイスをスレッドでバッファリングしているとして、
特定の値を受信した場合にそのスレッドからイベントを生成したいような場合。

ってちょっと強引な設定か。

647:デフォルトの名無しさん
06/10/01 20:37:37
うん、そういう場合は必要だけど、そういう場面はあんまりないんじゃ？ってだけね。

648:デフォルトの名無しさん
06/10/03 03:11:24
System.IO.File.Copy("C:\Hoge.txt", "C:\Foo\Bar.txt", True)

上記の場合に、C:\Hoge.txtが存在しなかったら強制終了してしまうんですが
ファイルが存在しない旨のメッセージを表示させたいときはどうすれば良いんでしょうか？
VBです。

649:648
06/10/03 03:12:09
すみません。↑は誤爆です。
気にしないでください！！

650:デフォルトの名無しさん
06/10/03 14:34:39
プログラム初心者で、簡単な質問かもしれないですがお願いします。

VB.NETの質問で申し訳ありませんが、イメージを貼り付ける時に
ImageBox1.Image = Image.FromFile("gazou.gif")
ImageBox2.Image = Image.FromFile("gazou.gif")
ImageBox3.Image = Image.FromFile("gazou.gif")
ImageBox4.Image = Image.FromFile("gazou.gif")
ImageBox5.Image = Image.FromFile("gazou.gif")
というプログラムを、IfやForを使ってもっと簡潔にまとめられないでしょうか？
いろいろと試してみましたが、エラーばかりでうまくいかなくて…よろしくお願いします。

651:デフォルトの名無しさん
06/10/03 14:50:08
>>650
for each

652:デフォルトの名無しさん
06/10/03 14:55:30
>>650

URLﾘﾝｸ(homepage1.nifty.com)

上から下まで全部読んだら、方法がいくつかわかると思う。

653:デフォルトの名無しさん
06/10/03 15:01:43
>>651-652
とりあえず紹介されたサイトのほうに目を通したいと思います
早い返答ありがとうございました

654:デフォルトの名無しさん
06/10/03 17:25:00
>>652
650じゃないですが、ちょうど同じ内容を探してました
感謝です

655:デフォルトの名無しさん
06/10/04 06:46:51
ローカルネットワークのActive Directory上動くアプリを作っています。
そのアプリの認証にWindows認証を取り入れたいのですが、
どのように認証すればよいのでしょうか？

656:デフォルトの名無しさん
06/10/04 09:51:12
VB.Net2003 + .NetFrameWork1.1
で、ListVIewのListVIewItem(i).Textプロパティに改行文字を含んだ文字列を
指定したらTextのAlignがCenterになってしまいます。
しかも妙に左右に空白ができてしまいます。
Viewプロパティは smallicon にし、48x48pxlのアイコンを使用しています。

┏━┓　　　abc
┃　┃　あいうえお
┗━┛　　123456

これを

┏━┓abc
┃　┃あいうえお
┗━┛123456

このように表示したいのです。
イメージとしては、windows(XP以降)のFileExplore右側リストビューにて
「並べて表示」した時の感じです。

ListViewにはTextAlignプロパティは無いし、Alignmentプロパティは
アイコンの並び方を変えるだけでした。
どのような方法で実現できるでしょうか？

また、Textプロパティの1行目のフォント色は黒で、2行目以降はグレーで表示したいのですが
どのようにすれば実現可能でしょうか？

そもそも、WindowsのFileExploreのListViewは.NetFrameWorkのListViewとは
異なるものなのでしょうか？

657:デフォルトの名無しさん
06/10/04 14:12:27
同じ型の構造体をコピーする方法を教えてください

658:デフォルトの名無しさん
06/10/04 14:15:16
コピーしたい構造体を反転選択、
Ctrl-c

659:デフォルトの名無しさん
06/10/04 14:16:24
A4白黒あたりで良ければ、
コンビニで10円

660:デフォルトの名無しさん
06/10/04 14:21:10
うっ、この時間って馬鹿しかいなかったか・・・

661:デフォルトの名無しさん
06/10/04 14:24:04
質問の仕方も知らない馬鹿をからかっているだけだと思われ。

662:デフォルトの名無しさん
06/10/04 14:30:51
答えれないと煽るか誤魔化す馬鹿しかいない時間帯だってわかってるよ

663:デフォルトの名無しさん
06/10/04 14:34:49
>>660
その通り。
この時間、回答者も質問者も馬鹿しかいない。

664:デフォルトの名無しさん
06/10/04 14:37:21
>>663
違うだろ。　馬鹿な質問者にはそれなりの馬鹿しかレスしねえだけだ。

665:656
06/10/04 15:10:25
事故解決です。
どーやら.NetFrameWork2.0のListViewコントロールには
View.Tilingというビューモードが追加になってるみたいですね。
やりたかったことはそれなので、2.0導入するまでちょっと我慢します。

666:デフォルトの名無しさん
06/10/04 15:17:25
>>664
だからお前がレスしてるのね

667:デフォルトの名無しさん
06/10/04 15:20:29
>>666
ようこそ。

668:デフォルトの名無しさん
06/10/04 15:37:15
>>657
Struct1 struct1 = struct2;

次ページ