トップページ⇒tech
1001コメント296KB

VB.NET質問スレ(Part28)

レス数が1000を超えています。これ以上書き込みはできません。
0001デフォルトの名無しさん2008/12/19(金) 22:57:42
前スレ

VB.NET質問スレ(Part27)
http://pc11.2ch.net/test/read.cgi/tech/1222612480/l50

テンプレは>>2～
0002デフォルトの名無しさん2008/12/19(金) 22:58:24
MSDN
http://msdn.microsoft.com/ja-jp/library/ms229284.aspx
どぼん！のVB道のトップページとTipsページ
http://dobon.net/vb/
http://dobon.net/vb/dotnet/index.html
Insider.NET
http://www.atmarkit.co.jp/fdotnet/index.html
宇宙仮面の C# プログラミング
http://uchukamen.com/
.NET TIPS
http://www.atmarkit.co.jp/fdotnet/dotnettips/index/index.html
緑のバイク ★ 初めてのC# プログラム全般
http://homepage3.nifty.com/midori_no_bike/CS/
VB.NETとC#でデザインパターン
http://hccweb1.bai.ne.jp/tsune-1/
匣の向こう側
http://www.ne.jp/asahi/nami/mei/index.html
WisdomSoft
http://wisdom.sakura.ne.jp/
じゃんぬねっと
http://jeanne.wankuma.com/
どっとねっとふぁん - C# Tips And Samples -
http://homepage3.nifty.com/dotnetfan/index.html
http://dotnetfan.org/
C#プログラミングTips
http://www.atmarkit.co.jp/fdotnet/csharptips/index/csharptips_index.html
0003デフォルトの名無しさん2008/12/19(金) 22:59:09
CodeProject
http://www.codeproject.com/vb/net/
the GotDotNet Home Page
http://www.gotdotnet.com/
KEN's .NET
http://www5b.biglobe.ne.jp/~yone-ken/VBNET/index.html
Cetus Links: 19,498 Links on Objects and Components / .NET
http://www.cetus-links.org/oo_dotnet.html
HIRO's.NET
http://vbdotnet.fc2web.com/index.html
＠IT：特集 .NET開発者のためのオンライン・リソース・ガイド
http://www.atmarkit.co.jp/fdotnet/special/onlineres/onlineres_01.html
.NETでいきまっしょい！
http://santamartadotnet.hp.infoseek.co.jp/
これがほしかった！厳選サンプルツール集
http://anetm.com/dev/tools/vbdotnet.htm
ぬーやんのdotNET講座
http://www.geocities.jp/nuu_yan/dotNET/index.html
PINVOKE.NET
http://www.pinvoke.net/
WinAPI Database for VB Programmer
http://www.winapi-database.com/
0004デフォルトの名無しさん2008/12/19(金) 22:59:38
Windows Api programming in C# , VB.NET, and VB6. Examples of P/Invoke and DllImport with Source code
http://custom.programming-in.net/
CodeZine
http://codezine.jp/
ConvertCSharp2VB
http://www.kamalpatel.net/ConvertCSharp2VB.aspx
＠IT：.NET Tools
http://www.atmarkit.co.jp/fdotnet/tools/index/index.html
SharpLibrary Redirector
http://www.sharplibrary.com/
MSDN アカデミック アライアンス 技術資料
http://www.microsoft.com/japan/msdn/academic/articles/
「300 秒でズバリ !!」&「10 行でズバリ !!」シリーズ
(VS2005) http://www.microsoft.com/japan/msdn/thisweek/300x10/
(VS.NET 2003) http://www.microsoft.com/japan/msdn/thisweek/wednesday/
PAPA'n VB
http://papanvb.i-love-vb.net/
(旧コンテンツ) http://www.mitene.or.jp/~sugisita/index_old.html
VB レスキュー花ちゃん
http://www.bcap.co.jp/hanafusa/dotnet/index.html
0005デフォルトの名無しさん2008/12/19(金) 22:59:58
VB中学校
http://homepage1.nifty.com/rucio/main/main.htm
初心者から中級者のためのVB
http://www7b.biglobe.ne.jp/~vb_beginner2008/
0006デフォルトの名無しさん2008/12/20(土) 17:44:28
乙
0007デフォルトの名無しさん2008/12/22(月) 01:41:30
標準モジュールでForm1のTextBox1に文字を書き込むにはどうしたら良いですか？
0008デフォルトの名無しさん2008/12/22(月) 01:44:26
すみません。できました。
0009デフォルトの名無しさん2008/12/22(月) 18:55:10
せっかくだからどうやったか書いてよ
0010デフォルトの名無しさん2008/12/23(火) 02:11:06
.NETを使うんだったら
C#、C++/CLI、VB
どの言語を使っても生成されるEXEの実行速度は同じですか？
0011デフォルトの名無しさん2008/12/23(火) 02:15:20
それぞれの処理系から生成された物が同じなら同じ環境ではほぼ同じになることが期待されます
0012デフォルトの名無しさん2008/12/23(火) 02:21:56
だったら、WIN32APIを呼び出すのが面倒なC#、VBを使うメリットってないんですか？
0013デフォルトの名無しさん2008/12/23(火) 02:25:09
演算がメインだったり、画像処理だったりする場合は
ポイントが扱えるC#、C++のほうが有利。

大抵の場合は>>11
0014デフォルトの名無しさん2008/12/23(火) 02:38:15
>>12
何かトゲのある言い方に感じるが、
＞WIN32APIを呼び出すのが面倒なC#、VB
ではなく、WIN32APIを呼び出す必要がないのがC#、VBのメリットだ。

ほとんどの場合APIを呼ぶ必要はない、ちゃんとそれ相応のクラスが用意されている。
0015デフォルトの名無しさん2008/12/23(火) 03:21:48
んだんだ
0016デフォルトの名無しさん2008/12/23(火) 08:43:38
vs2008+SQL2005で開発を行っていますが、突然vs側からSQLが
見えなくなり、SQLサーバーをインストールしてくださいというような
メッセージが表示され、型付データセットの作成やデータベースへの接続
が出来なくなってしまいました

特に設定を変更したとか、vsやSQLにSPを当てたなどと言うことはありません

どなたか解決策をお持ちじゃないですか？
0017デフォルトの名無しさん2008/12/23(火) 08:46:14
同じPC なのかリモートなのか
サービスは起動してるのか
接続プロトコルは正しいのか？
セキュリティ構成は正しいのか？
ファイヤウォールが悪さしてないのか？

などなど、調べることはたくさんあるぞ
0018デフォルトの名無しさん2008/12/23(火) 09:06:03
>>17

同じPCで、Vistaで動かしています。
サービス、プロトコル、セキュリティ構成、FW共に特に問題はありません

不具合が出る以前に作ったDB接続型のWebアプリをVSで開いてデバッグをかけると
問題なく動作しますので、vsの仮想WebサーバーとSQLは接続が出来ています

IDEとSQLがうまく接続しないようで、そのアプリの型付データセットを開くと、XMLで
しか表示されず、デザイナで開くことが出来ません
新しいデータセットを作ると、XMLコードファイル（.xss）しか生成されず、デザイナファイル（.xsd）
は生成されません

項目追加でSQLデータベースを選ぶと、SQLがインストールされていないからSQL Expressを
インストールせよというアラートが表示され、データベースの作成も出来ない状況です

今日中に納品しないといけない、というときに限ってこういう事が起こるんですよね……
0019デフォルトの名無しさん2008/12/23(火) 10:29:58
　ひ　と　の　せ　い　に　す　る　な
0020デフォルトの名無しさん2008/12/23(火) 11:40:17
>>19

誰に言ってんだ？
0021デフォルトの名無しさん2008/12/23(火) 13:22:49
SQLServerのサービスが止まってないか？
0022デフォルトの名無しさん2008/12/23(火) 13:26:58
VB.net2003でFTPサーバー上のファイルのタイムスタンプを取得するプログラムを書きたいのですが、
2003は無料では使えないので、VB 2005 Express Editionをインストールして、このサイト
http://support.microsoft.com/kb/832679/ja
のプログラムを試しています。
ところが、いくつかエラーがでてしまい上手く動作しません。

NET Framework 2.0以降でサポートされているFtpWebRequest、FtpWebResponse等を使わずに
NET Framework 1.1の環境でFTPの操作をするにはどうすればいいのでしょうか？
0023デフォルトの名無しさん2008/12/23(火) 14:12:33
TcpClientかSocket使って通信、ってのはリンク先でもやってるのな、2005対象なのに謎

VS2005は.NET 2.0開発専用
// 大体のデザインやコーディングなんかには流用できるだろうが
最終的には,NET 1,1でのコンパイルが必要
.NET 1,1 SDKならまだ転がってるな
0024デフォルトの名無しさん2008/12/23(火) 14:39:03
>>23
ありがとうございます。参考になります。
VB 2005 EEはアンインストールして.NET 1,1 SDKにしようかな．．

このあたり
http://homepage1.nifty.com/MADIA/vb/vb_bbs/200409/200409_04090086.html
のAPIを使うコードなら2005でも2003でも動くのかなと思ったりしています。
0025デフォルトの名無しさん2008/12/23(火) 14:40:45
>>24
しようかな、じゃなくて、1.1 じゃなきゃ意味なし。

WinInet ってのはいい選択肢かも。ただ、できることには制限があるけどね。
0026デフォルトの名無しさん2008/12/23(火) 14:50:59
つかFTP自体はもうできてるじゃんか
ざっくり見ただけだがVB8/.NET2.0追加分もなさそうだし
わざわざWin32APIに手を出す意味があるとも思えんね
0027デフォルトの名無しさん2008/12/23(火) 15:41:05
NET 1,1 SDKインストールしてみたんですが、CUIはちょっときついな…
フォームの作成とかどうするんだろう。
やっぱりAPIで書こうかな…

>>26
22のリンク先のコードをVB2005 EEに貼り付けてもエラーが出たりして動かないんですよ。
0028デフォルトの名無しさん2008/12/23(火) 15:44:15
うざいな・・・ VS2003 買えよ
0029デフォルトの名無しさん2008/12/23(火) 15:49:57
>9
聞くまでもないだろ。。。
0030デフォルトの名無しさん2008/12/23(火) 15:54:32
エラーが出たりして動かないとか言ってるようじゃ何もできんわ
0031デフォルトの名無しさん2008/12/23(火) 16:23:40
>>30
まあ、そうですね。

とりあえず、22のリンク先の「FTP アプリケーションの検証」の「clsFTP.vb」の
Public Function GetFileListのoutput.Close()のところでエラーになっています。
これは、outputがDimで定義されていないからだと思うので、とりあえずコメントにして

次にm_aBuffer.Clearのところが
「インスタンスを経由する共有メンバ、定数メンバ、列挙型メンバ、または入れ子にされた型へのアクセスです。正規の式は評価されません。」
というエラーになっています。
エラー修正のオプションでm_aBufferをArrayにするとエラーはでなくなります。

それと、Dns.Resolveのところで
「'Public Shared Function Resolve(hostName As String) As System.Net.IPHostEntry' は旧形式です: 'Resolve is obsoleted for this type, please use GetHostEntry instead. 」
というエラーがでるので、ResolveをGetHostEntryに書き換えるとエラーはでなくなります。

これらの修正を施して上記「FTP アプリケーションの検証」のModule1.vbを動かすと
（ff = New clsFTP(...をTryの上に持ってくるとModule1.vbは動くようです）
If (ff.ChangeDirectory("MyOwnFolder") = True) Then
等がTrueにならず、処理を続行しても途中で例外処理に入ってしまい動かないのです。

VB.Netはよく分かっていないので、自分としてはちょっと厳しいですね。
0032デフォルトの名無しさん2008/12/23(火) 16:25:35
VB.NET 以前の問題だな。MyOwnFolder ってフォルダはあるんかい？
0033デフォルトの名無しさん2008/12/23(火) 16:27:00
>>32
失礼。サンプルをそのまま貼り付けたのですが、存在するフォルダを指定しても動かないのです。
0034デフォルトの名無しさん2008/12/23(火) 16:37:59
・・・

フォルダ変更なんて本質的な処理じゃないんだから、そういうところは外していけば
いいんじゃねーの？
0035デフォルトの名無しさん2008/12/23(火) 16:39:13
そもそも、VS2003 で作らなきゃいけないものを、VS2005 で確認してどうするつもりなんだか・・・
0036デフォルトの名無しさん2008/12/23(火) 16:47:46
>>34
そうなんですが、それ以外のところでも根本的に上手く動いていないような気がするので。
m_aBufferをArrayにしたのが不味いような気がしています。

>>35
VS2003はヤフオクでも高いので、仕方なく2005 EEを使っているのです。

24のリンク先のコードは動いているようなので、そちらを使った方が良さそうですね。
0037デフォルトの名無しさん2008/12/23(火) 16:55:19
宿題スレでも行ってください
0038デフォルトの名無しさん2008/12/23(火) 22:25:11
あのー、超絶に低レベルな質問ですが、エラーの原因が特定できない事象で困っています。
こーゆーときってtryステートメントの神様に「後は任せた！」的な処理してよろしいんでしょうか？
プロセスはアクセスできません、みたいなエラーが出るんだけど、何が原因かわかんない。（再現率がまちまちでして、特定できず。）

オブジェクトの破棄ってのも、どういうときに必要なのかよくわからず。
0039デフォルトの名無しさん2008/12/23(火) 22:30:31
1.エラーメッセージでぐぐる
2.質問するときは省略せずにそのままのエラーメッセージを見せる
0040デフォルトの名無しさん2008/12/23(火) 22:52:56
回復しなくていいエラーなら、エラーメッセージを出して終了、って手もあり。

オブジェクトの破棄は、オブジェクトが不要になったときにする。
0041デフォルトの名無しさん2008/12/23(火) 23:20:33
まず問題の切り分けをしろ。

どんなプログラムかわからんが、「プロセスはアクセスできません」ってことは
外的要因も考えられるわけで、いつか絶対起きるエラーの可能性があるわけだ。
そうなるとTry～Catchでエラーからの復帰処理を考える必要がある。

そうではなくプログラムのバグであるなら、Try～Catchよりもバグの原因を見つけたほうがいい。

＞オブジェクトの破棄ってのも、どういうときに必要なのかよくわからず。
エラーの質問と関係ある？、それとも別の質問？
その文章の書き方だと２ｃｈ以外だと相手にされないんじゃないか？
0042デフォルトの名無しさん2008/12/24(水) 09:58:57
>>16
SQL Server を「SQL」と略すな。
取り敢えず再Setupでシステム構成のチェック汁。
0043222008/12/25(木) 02:18:46
VB.NET2003の環境では、このサイト
http://support.microsoft.com/kb/832679/ja
のコードは動いているようです。
しかし、このサイトにはFTPサーバー上のファイルのタイムスタンプを取得するコードが含まれていないのですが
.NET Framework 1.1の環境でファイルのタイムスタンプを取得するにはどのようなコードを書けばいいのでしょうか？
0044デフォルトの名無しさん2008/12/25(木) 02:25:16
コードの前にFTP勉強しろ
0045デフォルトの名無しさん2008/12/25(木) 06:30:22
>>44
よく分かっていないのですが、STATを使えばいいのでしょうか？
0046デフォルトの名無しさん2008/12/25(木) 07:40:19
スレ違い
0047デフォルトの名無しさん2008/12/26(金) 21:20:18
>>39-41
助言ありがとう。　レスみるととても俺なんかついて行けないレベルなんですが、
どうしても完成させたいアプリがありまして・・・。
おそらくはファイルオープンクローズなどの目に見えない所での問題のようで。


いまから整理します。
0048デフォルトの名無しさん2008/12/26(金) 22:46:22
とても整理出来ないです。整理のヒントいただけませんか？

'■機能：ファイルを保存する
'■タイミング：メニューの保存がクリックされたときと、右下の保存ボタンがクリックされたとき
'■lvFileList（旧）、lvNewFileList（新）はリストビューコントロール
'■旧、新リストのアイテム数は共に同数。（旧が8個なら新も必ず8個。）
'■imageDirは、フォルダ名が格納されている。

Private Sub miSava_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles miSava.Click, btn_save.Click
　　’新リストのアイテム数分ループ処理
For I As Integer = 0 To lvNewFileList.Items.Count - 1
'ファイルのリネーム
'単独での旧リストと新リストとの名前比較
If lvPhotoList.Items(I).SubItems(列1).Text <> lvNewFileList.Items(I).SubItems(列2).Text Then

ここでエラー→ Microsoft.VisualBasic.FileSystem.Rename(imageDir & "\" & lvPhotoList.Items(I).SubItems(列1).Text, _
imageDir & "\" & lvNewFileList.Items(I).SubItems(列2).Text)
End If
Next I

MsgBox("ファイル更新が完了しました。")
End Sub

※※エラー内容はこのプロセスはアクセスできません。とかなんとか・・。
0049デフォルトの名無しさん2008/12/26(金) 23:57:42
見た感じ動きそうだけどな。

まず直接ファイル名指定してみてRename実行してみたらどうだ？
それで動くようなら、imageDirの内容が実は間違ってたとかいうオチだろう。

で、指摘があるように一番重要なのはエラーメッセージ。
それをコピペすりゃ原因わかるかもしれんというのに。
0050デフォルトの名無しさん2008/12/27(土) 18:52:56
>>48
＞　Microsoft.VisualBasic.FileSystem.Rename(imageDir & "\" & lvPhotoList.Items(I).SubItems(列1).Text, _
imageDir & "\" & lvNewFileList.Items(I).SubItems(列2).Text)

とりあえず、どんな内容を処理してるのか
引数をみるべきだろJK
0051デフォルトの名無しさん2008/12/27(土) 22:02:39
System.IO.IOException はハンドルされませんでした。
Message="ファイルが別のプロセスで使用されているため、プロセスはファイルにアクセスできません。"
Source="mscorlib"
StackTrace:

InnerException:
エラーメッセージはこんな感じです。imageDirは間違いないし、ソースファイル名も新規ファイル名も問題なし。
エラーの再現率がちゃんとした手順を踏んだつもりでも、100%にならずどうしてもわからないです。


0052デフォルトの名無しさん2008/12/27(土) 22:16:28
>ファイルが別のプロセスで使用されているため、プロセスはファイルにアクセスできません。
って書いてあるそのままの意味だ。ある意味プログラミング以前の話
0053デフォルトの名無しさん2008/12/27(土) 22:25:59
VB.NETからエクセルを操作してセルに「H:mm」の書式で入力されている時間を取得したいのですが、Doubleとして認識されてしまいます。
例えばこんな感じです
Dim tmp As DateTime
tmp = sheet.Cells(1,1).value 'セル(1,1)には「22:23」などと入力されているがDoubleと認識されてしまうためここでエラー
MessageBox.Show(tmp.ToString, "HH:mm")

セルに入力されている時間を取得するにはどうすればいいのでしょうか。
sheet.Cells(1,1).textだとセルの幅が狭くなっているときに「##」などが取得されてしまうのでこれ以外の方法を探しています。
0054デフォルトの名無しさん2008/12/27(土) 22:28:59
OLEオートメーション日付って奴
DateTime.FromOADateで変換
0055532008/12/27(土) 22:36:01
>>54
ありがとうございます。
こんな感じでいけるみたいです。
MessageBox.Show(DateTime.FromOADate(sheet.Cells(1,1).value).ToString("HH:mm"))

ググってもなかなか見つからなかったので助かりました。
0056デフォルトの名無しさん2008/12/27(土) 22:45:39
>51
　ファイルが別のプロセスで使用されているため、プロセスはファイルにアクセスできません。
でぐぐれ
0057デフォルトの名無しさん2008/12/27(土) 22:50:38
別のプロセスでと言いつつ自分自身のプロセスでのロックの可能性があるのが曲者だ
0058デフォルトの名無しさん2008/12/27(土) 23:31:48
>>57
ありがちだな。

せっかくだからエスパーしてやろう。
リストビューで選択された画像ファイルを、PictureBoxに表示しているだろ？
もしくは New Bitmap(ファイル名)をしているところがないか？
これだと選択されたファイルはロックがかかっていてアクセス出来ないので
リネームする時にエラーになる。

表示したかったら、ファイルを読み込んだらBitmapの複製を作る必要がある。
0059デフォルトの名無しさん2008/12/28(日) 03:18:19
VBからエクセルを操作するプログラムを書きたいんですが
いい参考書とかサイトとかある？

今はわからない事があるとぐぐってます
0060デフォルトの名無しさん2008/12/28(日) 19:36:27
聞きづらいんだが、VB.netとVB2008のどっちが勝組？？
0061デフォルトの名無しさん2008/12/28(日) 19:45:55
VB.Net はVB6以降のVBの俗称です。
VB2008は数あるVB.Netの一つのバージョンです。
つまり、比較する単位が違うのです。

例えば、「お金」と「一億円」どっちが高い？と言ってるようなもんです。
「距離」と「km」どっちが長い？と言ってｒ・・・
0062デフォルトの名無しさん2008/12/28(日) 19:47:22
俗称と言うよりは総称。
0063デフォルトの名無しさん2008/12/28(日) 19:54:18
>>59
Excelの操作はほとんどVBAと一緒なのでそっちの知識が必要だけどそれは大丈夫？

それがわかってれば
ttp://blogs.timberlandchapel.com/blogs/timberlandchapel/articles/1149.aspx
ここの最初のサンプルぐらいの知識しかいらない。

注意点はVBAと違って、COMオブジェクトは自分で開放しなきゃいけないということ。
0064デフォルトの名無しさん2008/12/28(日) 19:54:32
2005以降はVB.NETって表現はMSからはほぼ完全に消えたような……？
0065デフォルトの名無しさん2008/12/28(日) 20:00:58
>>61
そうでしたか、こりゃどうも失礼しました。
VB.NETとVB6のプログラムを両方ともやりましたが、
両者がプログラム上で微妙に違うのでVB2008はVB6の継承で
VB.NET継承なしでこのまま終わり？？と勘違いしてしまったもので
0066デフォルトの名無しさん2008/12/28(日) 20:06:32
>>61
確かに>>64の言うとおり、Visual Basic 2005とかVisual Basic 2008とかになって、
製品名称からは.Netは取れちゃったね。
0067デフォルトの名無しさん2008/12/28(日) 20:07:24
言語のバージョンで言うと，
VB.NETがVB7でVB2005がVB8でVB2008がVB9でVB2010がVB10
だよ
VB6までは，VS製品としての名前と言語の名前が一緒だった
0068デフォルトの名無しさん2008/12/28(日) 20:19:29
>>67
ありがとうございます。良く分かりました。
そろそろ新しいバージョンを買おうと思ってはいたんですが
これが中々高いんで
0069デフォルトの名無しさん2008/12/28(日) 20:24:10
いまごろそんなこと言ってる人にはExpressEditionで十分では?
0070デフォルトの名無しさん2008/12/28(日) 20:25:48
まずはExpressEditionで試してみればいいよ
別物になってて絶望すること請け合いだからw
0071デフォルトの名無しさん2008/12/28(日) 21:00:10
>>63
この盗作くん、まだ頑張ってるんだ・・・
0072デフォルトの名無しさん2008/12/30(火) 11:44:36
Try ... Catch ... Finally .. End Try
って、Finallyを使わなくて、普通にEnd Tryの次に記述するのとは、何か違い
があるのか疑問です。
0073デフォルトの名無しさん2008/12/30(火) 11:46:56
例外が発生した場合，End Tryのあとは実行されない
Finallyは例外が発生しようがTryやCatchの中でReturnしようが必ず実行される
開いたファイルを確実に閉じたりするのに使う
0074デフォルトの名無しさん2008/12/30(火) 11:49:40
たとえば、Using は Try...Finally を使って実装されてるね。
0075デフォルトの名無しさん2008/12/30(火) 12:05:37
exit の後ろに書かれているのに呼ばれるfinallyがキモい
0076デフォルトの名無しさん2008/12/30(火) 14:40:08
キモくないよ。キモちいいよ
0077デフォルトの名無しさん2008/12/30(火) 15:00:37
VB6のエラー処理に比べてずいぶん楽になったよなぁ･･･

いまさら会社でVB6で仕事してるんだが･･･
0078デフォルトの名無しさん2008/12/30(火) 15:34:46
VB6のサポートは終了している。
だから新しいPCを買うとVB6が動かせなくなる時代はすぐそこまで迫っている。そうなってからでは間に合わない。

…とでも言って上司を説得するんだ！
成功しても.netに書き換える/で作り直す作業が振ってくるだろうけどな！！
0079デフォルトの名無しさん2008/12/30(火) 15:43:02
>>78
よく言われる話だが、実はVista上でのサポートはまだ続いてたりする・・・
0080デフォルトの名無しさん2008/12/30(火) 15:50:36
>>73
Catchの中でなにもしてなければEnd Tryのあと実行されるんじゃないの？
0081デフォルトの名無しさん2008/12/30(火) 16:04:54
Exception型でのキャッチは極力行わない
どうせ対処できない例外はその場で無理にキャッチしない
が基本
0082デフォルトの名無しさん2008/12/30(火) 16:49:18
すべて闇に葬るのが俺流
0083デフォルトの名無しさん2008/12/30(火) 16:51:35
キャッチ＆スルーですね。
0084デフォルトの名無しさん2008/12/30(火) 17:16:22
掴んだ後、スルーてどゆこと？
0085デフォルトの名無しさん2008/12/30(火) 17:19:07
Catch ex As Exception
End Try
こゆこと
動けばラッキー★
0086デフォルトの名無しさん2008/12/30(火) 19:12:44
見なかった事にしよう♥
0087デフォルトの名無しさん2008/12/30(火) 19:44:30
>>84
掴んだにも関わらず、スルー、って感じ
ボケといてボケっぱなしみたいな
0088デフォルトの名無しさん2008/12/30(火) 21:00:18
Dim instance As NamedRange
と書くと、NamedRangeが定義されてませんというエラーが出ます。

参照がおかしいのでしょうか？
初心者で質問も的外れかもしれませんが、よろしくおながいします。
0089デフォルトの名無しさん2008/12/30(火) 21:31:19
>>88
参照設定が足りないか、名前空間の指定（Imports）が足りない。
0090デフォルトの名無しさん2008/12/30(火) 21:54:35
どのコンポーネントを参照すればいいのでしょうか？
0091デフォルトの名無しさん2008/12/30(火) 22:03:28
知らんよ。NamedRange ってクラスを公開してるやつだろ。
0092デフォルトの名無しさん2008/12/30(火) 22:13:14
NamedRangeクラスとかでぐぐるとかMSDN内で検索しろよ
0093デフォルトの名無しさん2008/12/30(火) 22:23:52
検索してる．．．

名前空間がMicrosoft.Office.Tools.Excelなのだが
参照のコンポーネントで同じ名前のものがないし
コードエディタで入力してもエラーになる。

Express Editionだと、ダメとかある？
0094デフォルトの名無しさん2008/12/30(火) 22:33:01
MSTO か？ なら Express じゃ無理だろ。
0095デフォルトの名無しさん2008/12/31(水) 20:52:39
画像処理で質問です()

複数の画像が一つのBMPオブジェクトに入っています。
任意の範囲を別のBMPオブジェクトに貼り付けたいのですが、
.DrawImage　では貼り付け先の座標と幅、高さを指定できますが、
その範囲に元画像が縮小や拡大されて貼り付けられてしまいます。

やりたいのは元画像の一部を転送先の好きな位置に当倍でコピーしたいのですが、
この場合、.DrawImageでパラメータの与え方を変えればよいのか、それ以外の命令があるのでしょうか？

現状のソースはこんな状態です()

Public Class Form1
Dim BmpObjMst As Bitmap = New Bitmap(My.Resources.hoge)

Private Sub PictureBox1_Paint( ～
e.Graphics.DrawImage(BmpObjPBox1, 0, 0, 400, 400)
End Sub

Private Sub Button1_Click(　～
Dim GrpObjPBox1 As Graphics = PictureBox1.CreateGraphics()
GrpObjPBox1.DrawImage(BmpObjMst, 200, 0, 400, 400) '縦/2　に縮小されて表示される
End Sub

End Class
0096デフォルトの名無しさん2008/12/31(水) 20:58:24
>>95
やり方が悪いだけだと思われ。

DrawImage(Image, Rectangle, Int32, Int32, Int32, Int32, GraphicsUnit, ImageAttributes, Graphics..::.DrawImageAbort, IntPtr)
指定した位置に指定したサイズで、指定した Image の指定した部分を描画します。

とか使えばいいんじゃね？
0097デフォルトの名無しさん2008/12/31(水) 21:01:21
とりあえずDrawImageをヘルプで調べろよと
0098デフォルトの名無しさん2008/12/31(水) 21:13:30
>>96
>>97

おぉ、パラメータ指定で出来るのですね
VisualStudioのオンラインヘルプはどうたどってよいのかすら判りませんでした
まずはヘルプの辿り方から勉強します、ありがとうございました
0099デフォルトの名無しさん2008/12/31(水) 22:18:14
スレ違いかもしれませんが、VB.netからコマンドラインを使ってVSSにチェックインされているファイルのタイムスタンプを
取得しようとしています。
ところが、ss statusなどとすると、チェックインした日時が取得できるだけで、VSSのエクスプローラに表示されている
ファイル自体のタイムスタンプを取得できません。
どうすればVSSにチェックインしたファイルのタイムスタンプを取得できるのでしょうか？
0100デフォルトの名無しさん2009/01/01(木) 02:21:04
>>99
がんばる
0101デフォルトの名無しさん2009/01/01(木) 02:32:31
取得してタイムスタンプ見てみれば？
0102デフォルトの名無しさん2009/01/01(木) 02:46:29
バージョン管理システムについて語るスレ3
http://pc11.2ch.net/test/read.cgi/tech/1228366972/

せめてこっちじゃないか？
0103デフォルトの名無しさん2009/01/01(木) 07:45:12
>>101
レスありがとうございます。
get -gtmでローカルに最新バージョンを取得して、そのファイルのタイムスタンプを取る事はできるんですが
処理がかなり重くなってしまうのです。
必要なのはタイムスタンプなので、ローカルにコピーを作らずに取得できると助かるのですが。

>>102
そうかもしれませんが、VSSの話題があまり出ていないようなので、できればここでお願いします。
0104デフォルトの名無しさん2009/01/01(木) 09:33:46
こっちでもVSSの話題があまり出ていないですが?
0105デフォルトの名無しさん2009/01/01(木) 10:28:26
>>103
そういうインターフェイスを公開してないか調べる
ss コマンドで取得できないか調べる

なければ実際にとってくるか、汚い方法を使うしかないでしょ。
0106デフォルトの名無しさん2009/01/01(木) 12:08:27
svnとvss、どっちがカッコいい？
0107デフォルトの名無しさん2009/01/01(木) 12:29:05
>>105
ありがとうございます。
ssのコマンドはヘルプ等で全て見たのですが、statusがそれらしいものの、チェックインした日時とファイルサイズしか取得できないのです。
（欲しいのはチェックインした日時ではなく、VSSのエクスプローラーに表示されているファイル自体のタイムスタンプ）
エクスプローラに表示されている以上、取得する方法はありそうな気がするのですが。
WinAPIあたりを使う事になるのでしょうか？
01081072009/01/01(木) 12:36:00
失礼。Statusはチェックアウト情報を表示するだけで、ファイルサイズとチェックインした日時を取得できるのはPropertiesでした。
一通り試して、コマンドラインからはファイル自体のタイムスタンプは取得できないような気がしているのですがもう一度調べてみます。
0109デフォルトの名無しさん2009/01/01(木) 13:14:03
ざっと見てみたけど、コマンドやらオートメーションじゃ無理っぽいね。

ssexp -P で対象のプロジェクトを起動して、ファイルの情報が表示されてるリストボックスから取る、
って手はあるけど、きれいな方法ではない罠・・・
0110デフォルトの名無しさん2009/01/01(木) 14:04:49
教えてください。
IEのキャッシュから画像データ（例えばhttp://xxx.jp/image/yyy.jpg）を取得するのに
Win32APIのGetUrlCacheEntryInfoを使用すればいいということですが、
具体的にどのように使えばいいのでしょうか？
詳しく説明あるサイトはありますか？
よろしくお願いします。
0111デフォルトの名無しさん2009/01/01(木) 14:37:37
>>109
ありがとうございます。
もう一度詳しく見直してみましたが、やはりコマンドではできないようです。
VSSのエクスプローラを一々起動するのも重そうなので、get -gtmでファイルを取得してタイムスタンプを取るしかないのかもしれません。
0112デフォルトの名無しさん2009/01/01(木) 15:01:51
>>111
そっちの方がまっとうだと思う。VSS Explorer から取れるか見てみたけど、かなーり茨の道。
0113デフォルトの名無しさん2009/01/01(木) 15:07:45
あけましておめでとうございます。

>>58は神様だわ。　まさにそのテレパシーランが原因。下記が現在のコードです。

'写真ファイル名一覧を選択すると、メインパネルに画像を表示する
Private Sub リストビュー_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles リストビュー.SelectedIndexChanged
'選択アイテムがない場合は何もしない
If リストビュー.SelectedItems.Count = 0 Then
Exit Sub
End If
Dim index As Integer
Dim pictureShow As Bitmap
pictureShow = Bitmap.FromFile(フォルダパス & "\" & リストビュー.SelectedItems(0).SubItems(リスト列1「ファイル名が入っている」).Text)
index = リストビュー.SelectedItems(0).Index '選択アイテム。
picturebox1.Image = pictureShow 'イメージを表示
End Sub


で、複製を作る、という解決策で間違いないと思われるのですが、具体的にどんなことを
すればよろしいのでしょうか？表示用のピクチャーボックスをもう一個作り、それを表示させるプログラムをする。
そして、読み込みでつかったピクチャーボックスはDisposeする必要があるってことかな？

ちなみに、変数だけbitmapを２つ宣言して、読み込んだほうをdisposeして表示しようとするとメソッド引数エラーしてだめでした。
基本が無い、プログラマでもない、ググってもよくわからない、で、申し訳なく恐縮ですが、、、、、
0114デフォルトの名無しさん2009/01/01(木) 15:12:27
>>113
バイナリでメモリストリームに読み込んでファイルを閉じる。
メモリストリームから Bitmap を生成
0115デフォルトの名無しさん2009/01/01(木) 15:13:45
>>113
ピクチャーボックスに表示する前に、そのファイルの複製を作るのが
一番簡単。
01161152009/01/01(木) 15:14:28
>>114が一番いいわｗ
0117デフォルトの名無しさん2009/01/01(木) 16:02:31
俺もまず>>114のように考えるとは思うんだけど、でもどうかなあ。
Disposeするときのことを考えると、FroFileで作成したBitmapを
別のBitmapにDrawImageする方が適切なような気もする。
0118デフォルトの名無しさん2009/01/01(木) 17:32:45
>>78-79
亀レスだが
VB6のソフトをVistaで動かしたら一部動かないコンポーネントとか出てきた
ODBC接続はめちゃくちゃ時間がかかる(実用に耐えない）
Windows７ではおそらくサポート外になると踏んでいるので
それまでに転職するｗ
0119デフォルトの名無しさん2009/01/01(木) 21:35:37
こんなんでどうだ？

' _Bitmapはグローバル変数とか、メンバ変数とかで定義

If _Bitmap IsNot Nothing Then _Bitmap.Dispose()

Dim tmpbmp As New Bitmap(path)
_Bitmap = New Bitmap(tmpbmp.Width, tmpbmp.Height, Imaging.PixelFormat.Format32bppArgb)
Dim grp As Graphics = Graphics.FromImage(_Bitmap)
grp.DrawImage(tmpbmp, 0, 0, tmpbmp.Width, tmpbmp.Height)
tmpbmp.Dispose()

で、あとは_Bitmapを好きなようにすればいい。
0120デフォルトの名無しさん2009/01/01(木) 22:00:21
なんでそんな糞な変数名にするの?
0121デフォルトの名無しさん2009/01/01(木) 22:10:41
サンプルなんてそんなもんだろ。
MSDN見たことないの？
01221132009/01/01(木) 22:48:25
>>119
あの、すいませんが私のために書いてくだすったコードですね？
ありがとうございます。
チンプンカンプンなのは、やっぱ俺が問題すぎますな。

俺的に新オブジェクトが出てきたからぐぐる。
Dim grp As Graphics = Graphics.FromImage(_Bitmap)
grp.DrawImage(tmpbmp, 0, 0, tmpbmp.Width, tmpbmp.Height)


いままでVBAしかやってなかったドカチンなので難しすぎるです。
01231132009/01/01(木) 23:07:47
このあたりに多少文献があったので参考にしてみます。
>>ttp://dobon.net/vb/dotnet/graphics/pictureboximageanddrawimage.html


しかし、プログラミング基本で聞きたいのですが、同じように動作させても
できるときとできないときがあるような、バグ修正が難しいケースってあるんでしょうかね？
今回のこのケースでは、OKな場合とダメな場合とがあって原因特定が非常に苦しかった。

また、これを解決してもまだエラーしてるとこもあるかもしれないし・・。

0124デフォルトの名無しさん2009/01/02(金) 00:22:14
>>113

簡単にやるなら、サンプルにこれ追加するだけ。

PictureBox1.SizeMode = PictureBoxSizeMode.AutoSize
PictureBox1.Image = bmp

>しかし、プログラミング基本で聞きたいのですが、同じように動作させても
>できるときとできないときがあるような、バグ修正が難しいケースってあるんでしょうかね？

プログラマーの数だけあると思うよ。

0125デフォルトの名無しさん2009/01/02(金) 01:54:56
>>123
別に揚げ足取りで言うわけじゃなく、
今回の件は、ただの君自身のライブラリの機能に対する無知に起因しているわけで、
それをまるでデバッグ技術の問題であるかのように認識するのはそもそもおかしいんじゃないのか？
0126デフォルトの名無しさん2009/01/03(土) 03:07:39
フォルダにマウントしたボリュームの情報を取得するにはどうすればよいのでしょうか？
ManagementObjectを使う方法とDriveInfoを使う方法は試したのですが、どちらもマウントポイントは解釈してくれないようでorz
LinuxのMono環境でも使えるようにしておきたいのですが、GetDiskFreeSpaceEx APIを使用するしかないのでしょうか…。

試した方法1
Dim manObj = New System.Management.ManagementObject( _
                     "Win32_LogicalDisk.DeviceID=""C:\\MountPoint""")
Dim diskSize = CULng(manObj.Properties("Size").Value)
→ パス部分の\\を\にしたり末尾に\をくっつけてみたりしたものの、動作せず
→ その場合はManagementExceptionが返り、VB2005Expressのクイックウォッチで見ても cannot obtain value の嵐orz

試した方法2
Dim drive As New IO.DriveInfo("C:\MountPoint")
Dim diskSize = drive.TotalFreeSpace
→ なぜかCドライブ自身の情報が取れた
0127デフォルトの名無しさん2009/01/03(土) 09:45:24
質問です。
以下の例

Dim result As String
Dim psi As New System.Diagnostics.ProcessStartInfo
Dim p As System.Diagnostics.Process
Dim ssPath As String = "C:\Program Files\Microsoft Visual Studio\VSS\win32\ss.exe"
Dim ssUser = "user"
Dim ssPwd = "user"

If ssPath.IndexOf(" ") > 0 AndAlso ssPath.Substring(0, 1) <> """" Then
ssPath = String.Format("""{0}""", ssPath)
End If

psi.FileName = System.Environment.GetEnvironmentVariable("ComSpec")
psi.RedirectStandardInput = False
psi.RedirectStandardOutput = True
psi.UseShellExecute = False
psi.CreateNoWindow = True
psi.Arguments = "/c " & ssPath & " help " & " -Y" & ssUser & "," & ssPwd
p = System.Diagnostics.Process.Start(psi)
result = p.StandardOutput.ReadToEnd
p.WaitForExit()

のようにVSSをコマンドラインプログラムで操作する場合に、指定したユーザー名かパスワードが間違っていると
result = p.StandardOutput.ReadToEnd
のところで固まってしまいます。
パスワードかユーザー名が間違っているときは、例外を投げるなり、一定時間経過後は処理を抜けるなりして
SS.exeを終了して固まったままになるのを避けたいのですが、その場合どのようなコードを書けばよいのでしょうか？
0128デフォルトの名無しさん2009/01/03(土) 11:31:39
>>127
別スレッドで処理して、一定時間反応なかったらAbortでも投げればいいんじゃない？
0129デフォルトの名無しさん2009/01/03(土) 11:41:32
>>128
ありがとうございます。
マルチスレッドというのはやったことがなかったのですが、この機会に調べてみようと思います。
0130デフォルトの名無しさん2009/01/03(土) 12:41:12
>>126
GetVolumeNameForVolumeMountPoint() でボリューム名を取得して、
GetVolumeInformation() とかでいいんじゃね？
0131デフォルトの名無しさん2009/01/03(土) 19:27:29
>>130
ありがとうございます。
やはりおとなしくWindows APIを使用するしかなさそうですね。。。
0132デフォルトの名無しさん2009/01/04(日) 23:24:37
.bmpの画像ファイルをPictureBoxに拡大して表示すると色の境界が
ぼやけているのですが、これをデータ通りに表示させるにはどうしたら良いですか？
0133デフォルトの名無しさん2009/01/04(日) 23:29:21
>>132
データどおり、の定義は？
人間の君が定義できんことをただがコンピュータに「よきにはからえ」というのか？
0134デフォルトの名無しさん2009/01/04(日) 23:29:21
拡大した時点でデータ通りも何もないだろ
0135デフォルトの名無しさん2009/01/04(日) 23:36:31
レスありがとうございます。
元データ通りではないというのは大きさのことではなくて
たとえば白黒２色のはずの２４ビットの画像を拡大表示すると
白、黒の境がグラデーションになってしまいます。

0136デフォルトの名無しさん2009/01/04(日) 23:49:08
ttp://www2.uploda.org/uporg1908898.jpg
このようになります
（左が元、右が拡大）
0137デフォルトの名無しさん2009/01/05(月) 00:02:36
>>135
だから、どういう結果が欲しいのか定義を示せ、と君は言われているんですが
理解してますか？
0138デフォルトの名無しさん2009/01/05(月) 00:07:19
どっちもどっちだな
0139デフォルトの名無しさん2009/01/05(月) 00:12:53
言いたいことはわかる。
というか、ぼやけてるとかグラデーションとかそれなりのキーワードは使っている。
だから、補完なしの拡大表示したいってことだろう。
このスレには意地の悪いヤツが住み着いてるからな。

だが、やり方は知らん。
0140デフォルトの名無しさん2009/01/05(月) 00:28:27
>>139
意地が悪いってどういう言い草だよ。
っていうか、君数学とか苦手なタイプ？
原理的になんらの補間なしに拡大できるのなんて整数倍の時だけなはずだが、
そんな簡単なこと理解できませんか？
0141デフォルトの名無しさん2009/01/05(月) 00:35:57
>>135
DrawImageする前に、GraphicsクラスのInterpolationModeプロパティに
Drawing2D.InterpolationMode.NearestNeighborを設定。

やりたいことはたぶんこれだろ？

0142デフォルトの名無しさん2009/01/05(月) 00:35:58
正月早々なにやってるんだよｗ
0143デフォルトの名無しさん2009/01/05(月) 00:39:03
ああ、ピクチャボックスか。
自分でPaintイベントでbitmapをDrawImageしないとだめかな。
0144デフォルトの名無しさん2009/01/05(月) 12:53:46
EventWaitHandleを使ってプロセス間通信をしようと思っています
テストとしてWaitOneする側とSetする側のコンソールアプリ(EXE)を1つずつ作りました
同じログイン状態からコマンドプロンプトを２つ起動して動かせばイベントが送れるのですが
リモートデスクトップなどを利用して、別々のセッションとしてWaitOne側、Set側を起動すると
イベントがとれないようです
こういった場合、何かを設定しないといけないのでしょうか?
0145デフォルトの名無しさん2009/01/05(月) 13:06:02
EventWaitHandleSecurityでどうにかなりそうだな
0146デフォルトの名無しさん2009/01/05(月) 20:37:30
OpenFileDialogで読み込んだファイルのパスってどうやって取得できますか？
0147デフォルトの名無しさん2009/01/05(月) 20:58:14
は?
0148デフォルトの名無しさん2009/01/05(月) 21:10:30
>>144
Global\ プレフィックスが必要とか？
0149デフォルトの名無しさん2009/01/05(月) 21:18:11
アプリケーションの発行ウィザードで作成されたファイルには
DLLとかもあるみたいだけど、知り合いとかに配ってもいいの？
0150デフォルトの名無しさん2009/01/05(月) 22:24:14
コードが長くなって見にくいので改行したいのですが、コード内での改行はどうやればいいんでしょうか？
0151デフォルトの名無しさん2009/01/05(月) 22:26:15
>>149
Redist.txt に載ってる、あるいは、自分で作ったものなら。

>>150
改行するときは、"_" を使う。

MsgBox( _
"改行")

みたいに。
01521502009/01/05(月) 22:35:35
>>151
ありがとうございます改行できました
0153デフォルトの名無しさん2009/01/05(月) 22:45:21
If Not (ooo.Image Is Nothing) Then


って日本語でいうとどういう意味？
0154デフォルトの名無しさん2009/01/05(月) 22:57:09
処理の意味が知りたいのか？
01551132009/01/05(月) 22:58:26
>>119 おかげさまでバグは減りました。ライブラリ機能はヒマを見つけて勉強してゆきます。



さて、

コードを参考になおしたんですが、未だ「ファイルにアクセス出来ません」というエラーがでる。
参考コードのbitmapはすでにファイルとは関連のない画像になっているはずで、ファイルのロックは
かかっていないという解釈ですが、何故エラーするのかイマイチわかりません。

ピクチャボックス以外で、たとえば
System.IO.Directory.GetFiles　とかでもロックかかるケースあるんでしょうか？


ピクチャ関連ってみんなも詰まったところじゃないかな？難しいよ。
0156デフォルトの名無しさん2009/01/05(月) 23:20:25
>>153
もし変数oooが参照しているオブジェクトのImageプロパティの値がNullでなければ
0157デフォルトの名無しさん2009/01/05(月) 23:23:03
いや詰らないから。煽り抜きで。
自分の勉強不足を棚にあげてよくそういう厚顔なことが言えるもんだ。

ちなみに、そりゃファイルにアクセスできないケースなんていくらでも
考えられるだろ。
0158デフォルトの名無しさん2009/01/05(月) 23:23:16
>>155
>ファイルのロックはかかっていないという解釈ですが、何故エラーするのかイマイチわかりません

その解釈が間違っているから。
0159デフォルトの名無しさん2009/01/05(月) 23:26:25
openfiles とか Process Explorer とかで確認してみればいいじゃん。
0160デフォルトの名無しさん2009/01/06(火) 00:15:40
文字の結合ってできますか？
aa + bb =aabb
みたいな
string型じゃ"+"も"&"もダメって言われてしまいます
0161デフォルトの名無しさん2009/01/06(火) 00:24:42
>>160
そういう質問はもうちょっと恥ずかしげに書けよ。
つーかこれで恥ずかしいって意識がないんだから凄いよ
0162デフォルトの名無しさん2009/01/06(火) 00:27:20
さすがに初心者サイト見て来い、って言いたくなるな。
せめてダメだったコードを晒せ
0163デフォルトの名無しさん2009/01/06(火) 01:04:44
>>155
GetFilesは掛からないと思う。
今出てる情報だとBitmapのDispose忘れぐらいしか想像付かないな。

ちなみにBitmapはヘルプにロック掛かるって書いてある。
適当に流し読みしてると見逃してしまうが。

掲示板じゃ「○○」のやり方は教えられても、バグは君が生み出したものだから
最終的に君にしか解決出来ないのだよ(バグじゃないのかもしれないが)
0164デフォルトの名無しさん2009/01/06(火) 04:02:49
すべてのアプリを終了したりWindowsを再起動するのはどう書くの?
0165デフォルトの名無しさん2009/01/06(火) 04:19:25
>>164
ggtytzks
http://www.google.co.jp/search?q=VB+%e5%86%8d%e8%b5%b7%e5%8b%95
0166デフォルトの名無しさん2009/01/06(火) 04:41:38
ggtytzks
ナニコレ
0167デフォルトの名無しさん2009/01/06(火) 05:37:39
>>166
エスパーすると「ググってやったぞカス」ってカンジじゃねーの？
01681132009/01/06(火) 21:17:21
>>163
ありがとうございます。

今早速デバッグ行っています。糞むかつく事に、家のPCではバグが発生しません。
で、会社のPCで実行するとエラーします。くやしい。

0169デフォルトの名無しさん2009/01/07(水) 00:13:46
漏れも家では動くが
会社のPCだと実行エラーが出たりする

.NETも入れてあるのに
(´･ω･｀)
0170デフォルトの名無しさん2009/01/07(水) 09:04:23
こんにちは。質問させて頂きたい事があります。
Visual Basic 2008　XP環境です。

VBでマウス・キーボードを操作し、インターネットブラウザ上で作業させたいと思っています。
マウスを指定した座標に動かす事は出来たのですが、クリックやキー入力をどう書けばいいか解りません。
インターネットブラウザは、別のFormにWebBrowserで作成したものを想定しています。

是非ご教示願います。宜しくお願いします。
0171デフォルトの名無しさん2009/01/07(水) 12:00:35
VBでマウス・キーボードを操作し、インターネットブラウザ上で作業されたくない
0172デフォルトの名無しさん2009/01/07(水) 20:32:33
DOM読みに行ったほうがいいと思います
0173デフォルトの名無しさん2009/01/08(木) 00:12:12
プログラミング初心者向けのVB.NET入門の必読書ってどのあたりですかね？
0174デフォルトの名無しさん2009/01/08(木) 08:41:51
Killだけじゃダメなん?
－－－－－－－－－－－－－－－－－－－
hProcess.Kill()
hProcess.Close()
hProcess.Dispose()
0175デフォルトの名無しさん2009/01/09(金) 10:49:04
Private Const MaxValue As Long = 10 ^ 18 - 1

999,999,999,999,999,999を定義しようとおもったのですが、
MaxValue=1000000000000000000
となってしまいます。

なんか勘違いしてそうな気がするんですが、
どうしても理由がわからないです。

何がいけないのでしょうか？
0176デフォルトの名無しさん2009/01/09(金) 11:10:42
^演算は強制的にDoubleに変換されてDoubleとして結果が返る
Doubleの有効桁数は15-17程度だから10^18-1を表現しきれない
0177デフォルトの名無しさん2009/01/09(金) 13:09:18
>>176

なるほど
そういうことですか。
15桁では正しく結果がとれたので
なんでだる？と思ってたのですが。

特に表記上の都合だけなので、式にしないて指定することにします。

どうもありがとうございました。
0178デフォルトの名無しさん2009/01/09(金) 21:53:29
いらぬツッコミかもしれないが、

Long.MaxValue

を使っちゃだめなの？（値は999,999,999,999,999,999じゃないが)
0179デフォルトの名無しさん2009/01/09(金) 22:02:50
Private Const MaxValue As Long = 1E18 - 1

じゃだめなのか？
0180デフォルトの名無しさん2009/01/09(金) 22:23:32
>>178
10^18-1を表現したいんだから全然関係ないんじゃないか
10^15-1って言ってるから10進数3桁ごとの最大値がほしいんだろう多分

>>179
E表記は非整数値、つまりDouble扱い
10^18にせよ1E18にせよCLngしてから-1しないと駄目だね
0181デフォルトの名無しさん2009/01/10(土) 00:57:23
ListViewにチェックボックスを表示しているのですが、
普通のチェックボックスのイベントのように
Checked_Changeイベントが一覧にないのですが、
そのようなイベントを受け取るにはどのような定義をすればよいですか？
0182デフォルトの名無しさん2009/01/10(土) 01:00:10
最新の.NETのバージョンはいくつ?
0183デフォルトの名無しさん2009/01/10(土) 01:04:29
>>181
1) MSDNライブラリのListViewのメンバ一覧のページを開く。
2) [CTRL] + Fを押して"check"で検索してみる
0184デフォルトの名無しさん2009/01/10(土) 02:59:27
フォームの継承は避けたほうがいいですか？ぐぐると地雷っぽいので・・・
フォームのデザイン統一するのに便利なので仕様書に画面イメージ
載せるのに使ってるのですが。コーディングはこれから
0185デフォルトの名無しさん2009/01/10(土) 09:41:01
>>182
3.5sp1
0186デフォルトの名無しさん2009/01/10(土) 12:09:06
>>184
日本語で(ry

Formクラスも単なるControlクラスを継承した
クラスにすぎないことを理解していれば問題ない

地雷っぽいとか言ってるなら止めたほうがいいかも
0187デフォルトの名無しさん2009/01/10(土) 12:14:52
フォームエディタの動作の話だろ
0188デフォルトの名無しさん2009/01/10(土) 12:58:43
デザイナで作ったフォームをさらに継承する話だろ
デザインを統一するなら共通部分だけを持たせたフォームを作って
違う部分だけユーザーコントロールとして差し替えるのが普通だよ
0189デフォルトの名無しさん2009/01/12(月) 00:31:11
Dim Do as Double
Do=99.99
この0.09を切り捨てて99.9にする方法がわからない
0190デフォルトの名無しさん2009/01/12(月) 00:47:57
>>189
算数です。
10倍して少数以下切り捨ててから10で割る
0191デフォルトの名無しさん2009/01/12(月) 00:50:15
切捨てがわかぁらああない
0192デフォルトの名無しさん2009/01/12(月) 00:52:05
Math.Round()
0193デフォルトの名無しさん2009/01/12(月) 00:57:43
電子計算機は2進数だから10進数の小数の演算は大変だな。
0194デフォルトの名無しさん2009/01/12(月) 01:00:15
StreamReaderオブジェクトを使って、Shift-JISで2バイト文字のあるファイルを開いて
読み取ると文字化けします。どうすれば解決できますか。

Private Sub TamesiCode013()
    Dim strFileName1 As String
    Dim StreamReader1 As System.IO.StreamReader
    Dim strData1 As String
    Dim VbMsgBoxStyle1 As MsgBoxStyle
    Dim VbMsgBoxResult1 As MsgBoxResult

    strFileName1 = "D:\n013\otsu.txt"
    StreamReader1 = New System.IO.StreamReader(strFileName1, System.Text.Encoding.ASCII)
    strData1 = ""
    Do Until StreamReader1.Peek = -1
        strData1 &= StreamReader1.ReadLine & vbCrLf
    Loop
    StreamReader1.Close()
    StreamReader1 = Nothing
    VbMsgBoxStyle1 = MsgBoxStyle.Information
    VbMsgBoxResult1 = MsgBox(strData1, VbMsgBoxStyle1)
End Sub
0195デフォルトの名無しさん2009/01/12(月) 01:01:34
>>194
ASCII じゃなくて、Shift_JIS を指定する。GetEncoding(932) とか。
0196デフォルトの名無しさん2009/01/12(月) 01:13:04
おかげで解決できました
0197デフォルトの名無しさん2009/01/12(月) 01:28:04
マスラウンドのいんすううがどれをえらぶのやら
0198デフォルトの名無しさん2009/01/12(月) 01:36:17
>>192
それ切り捨てじゃねーよ。

>>191
Math.Floor
0199デフォルトの名無しさん2009/01/12(月) 03:00:10
なるほろ
0200デフォルトの名無しさん2009/01/12(月) 07:05:50
便乗
>>198
整数に切り捨てる場合でも Int より Floor のがいい?
0201デフォルトの名無しさん2009/01/12(月) 11:54:35
ネタか本気で書いてるのかわからんけど、Floorだって切り捨てじゃないよ。
っていうかIntってそれひょっとしてVB6互換関数？
だったらそれって銀行丸めじゃなかったか？
0202デフォルトの名無しさん2009/01/12(月) 12:25:36
丸め部分を集めたら金持ちになれるんだな
0203デフォルトの名無しさん2009/01/12(月) 13:25:51
>>200
負数のとき 0 方向に丸めるなら Math.Truncate、
値の小さい方に丸めるなら Math.Floor、
大きい方に丸めるなら Math.Ceil、
Int や Math.Round は銀行丸め。
02042032009/01/12(月) 13:27:35
× Math.Ceil
○ Math.Ceiling
0205デフォルトの名無しさん2009/01/12(月) 13:32:46
Math.Roundが銀行丸めと言い切る奴は随分古い知識
0206デフォルトの名無しさん2009/01/12(月) 13:42:47
下らんことを得意げに突っかからないでもよろしい。
0207デフォルトの名無しさん2009/01/12(月) 14:54:20
どなたかわかる方がいましたらお願いします。
Accessで作成したクエリをストアドとしてVBから呼び出しているのですが、エラーがでます。
エラーメッセージでは「Replace関数が未定義です」みたいなことを言われます。
クエリの内容は以下です。

SELECT name, *
FROM CUSTOMER
WHERE replace(name), "　", "") Like "*" & [なまえ] & "*";

VBから呼び出す場合にはReplace関数は使えないのでしょうか？

開発環境：
WindowsXP
Visual Studio 2008 Express
Access 2003
0208デフォルトの名無しさん2009/01/12(月) 15:31:42
スレッドに関してわからないことがあります。
以下の関数を作ったのですが、直接呼び出すのと、
スレッドを立てて呼び出すので挙動が異なります。

private sub open()
Dim mop As MCI_OPEN_PARMS
Dim Result As Integer

mop.lpstrElementName = "hoge.mp3"
mop.lpstrDeviceType = "MPEGVideo"
Result = mciSendCommand(0, MCI_OPEN, MCI_OPEN_ELEMENT Or MCI_OPEN_TYPE Or MCI_WAIT, mop)
If Result <> 0 Then
'エラーメッセージを取得して表示します。
Dim Buffer As String = New String(Chr(0), 255)
Dim ErrorMessage As String

Call mciGetErrorString(Result, Buffer, Len(Buffer))

ErrorMessage = Replace(Replace(Buffer, Chr(0), ""), " ", "")
MsgBox(ErrorMessage, MsgBoxStyle.Exclamation, "Error " & Result)
End If
MsgBox(mop.wDeviceID)
mciSendCommand(mop.wDeviceID, MCI_CLOSE, MCI_WAIT, IntPtr.Zero)
end sub

02092082009/01/12(月) 15:35:48
Me.open の場合は必ずmop.wDeviceIDを取得するのですが、

Dim thread As System.Threading.Thread = New System.Threading.Thread(AddressOf play)
thread.Start()

とした場合は、一度目は失敗して「指定されたデバイスドライバの読み込み中に不明な問題が発生しました。」
とmciGetErrorStringでエラーメッセージを取得します。
二度目からはmop.wDeviceIDを取得します。

スレッドに慣れていませんので、
理由がわからないといった状況です。

どなたか分かる方教えていただけないでしょうか？
02102082009/01/12(月) 15:36:39
申し訳ございません。
スレッドを呼び出すコードは以下の間違いです。

Dim thread As System.Threading.Thread = New System.Threading.Thread(AddressOf open)
thread.Start()
0211デフォルトの名無しさん2009/01/12(月) 21:01:18
>>202
久世秀夫乙
0212デフォルトの名無しさん2009/01/13(火) 02:44:54
リッチテキストボックスで文を縦書き表示にするにはどうするんだろぅ
02132002009/01/13(火) 11:15:07
>>201-205 ぐらい
Int は VB6 互換。切捨てだから聞いたんですけど…。データ型変換の CInt と勘違いされてませんか?
http://msdn.microsoft.com/ja-jp/library/xh29swte(VS.80).aspx
http://msdn.microsoft.com/ja-jp/library/s2dy91zy(VS.80).aspx

02142032009/01/13(火) 13:45:19
>>213
まさに。嘘ついてた。すんまそん。
0215デフォルトの名無しさん2009/01/13(火) 14:16:48
CInt(-1.5)
が-1か-2かがはっきりせんでわないか
0216デフォルトの名無しさん2009/01/13(火) 15:42:52
>>215
>>213 が URL まで貼ってくれてるというのに
お前ときたら…
02172002009/01/13(火) 16:17:48
まあよくあることですから
自分の張ったURLをよく読みなおしたら、Int と Floor に差はないようです。
0218デフォルトの名無しさん2009/01/13(火) 16:48:23
>>208
良く分からんけど、mciSendCommand()ってDllImportで使ってるんだよね？
その関数の宣言ってどうなってんの？Shared Functionになってる？
あと引数に渡してる列挙型だか構造体だかの宣言も同様にShared宣言かな？
とりあえず全部Sharedにしてみるとか。んで別スレッドから呼び出すときは静的に呼び出してみる。

メインスレッドでインスタンス化したクラスのメンバ関数を別スレッドから呼び出してるのが具合悪いとかかもしれない。
全然自信ないが。。。
0219デフォルトの名無しさん2009/01/13(火) 18:09:06
>>218
> その関数の宣言ってどうなってんの？Shared Functionになってる？
> あと引数に渡してる列挙型だか構造体だかの宣言も同様にShared宣言かな？
DllImportならSharedにしないとコンパイルできないしDeclareなら自動的にShared
型の宣言にSharedも何もないし渡す構造体のメンバがSharedじゃ値を渡せない

自分とこだとOpenしてCloseするだけなら問題ないんで助言できないけど
MCIは別スレッド立てて動かす気が起きないなぁ
MCI自身を非同期で動かせるわけだし
0220デフォルトの名無しさん2009/01/13(火) 19:03:08
CIntとCFixという関数があるのかね
0221デフォルトの名無しさん2009/01/13(火) 20:34:39
CFix はないよ。CInt は CDbl とかの仲間でデータ型変換の関数。
0222デフォルトの名無しさん2009/01/13(火) 22:17:29
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim STR_PAS, STR As String
STR_PAS = ”C:\sample.txt”

Dim textFile As String = STR_PAS
Dim enc As System.Text.Encoding = System.Text.Encoding.GetEncoding(932)
Dim lines As String() = System.IO.File.ReadAllLines(textFile, enc)　　　　　　　　　　　←エラー
　　　　・
　　　　・
　　　　・
End Sub

とした際に、「←エラー」部分に
ボタン１をダブルクリックすると、System.IO.IOException　エラーとなってしまいます。
処理の後に　System.Threading.Thread.Sleep(5000)　としても、改善されません。
何とか例外処理を回避する方法はないでしょうか？
0223デフォルトの名無しさん2009/01/13(火) 22:24:42
>>222
君ってプログラマの才能ないってよく言われないかマジで？
0224デフォルトの名無しさん2009/01/13(火) 22:25:50
エラーメッセージぐらい読もうな
0225デフォルトの名無しさん2009/01/13(火) 22:41:22
一回

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
Dim STR_PAS, STR As String
STR_PAS = ”C:\sample.txt”

Dim textFile As String = STR_PAS
Dim enc As System.Text.Encoding = System.Text.Encoding.GetEncoding(932)
Dim lines As String() = System.IO.File.ReadAllLines(textFile, enc)
Catch ex As Exception
MessageBox.show(ex.GetType.ToString(),"")
End Try

End Sub
でやってみような。な？
0226デフォルトの名無しさん2009/01/13(火) 22:55:15
全然、解決になってないな。
0227デフォルトの名無しさん2009/01/13(火) 22:56:37
型表示してどうしようと・・・
0228デフォルトの名無しさん2009/01/14(水) 01:00:54
ツールボックスの中にAxWebBrowserが無くなってしまったのですが
これはどうすれば出すことができますか？
0229デフォルトの名無しさん2009/01/14(水) 01:06:52
そもそもAxWebBrowserははじめから表示されてるわけじゃないだろ
表示するときどうやったか思い出せ
0230デフォルトの名無しさん2009/01/14(水) 08:33:11
>>222
吹いたｗ
0231デフォルトの名無しさん2009/01/14(水) 10:12:19
>>225
それやるくらいなら
Try
　　dim btn as Button = DirectCast(sender, Button)
　　btn.Enabled = False
　　：
　　： 今やってる処理
　　：
Finally
　　btn.Enabled = True
End Try
の方がまだまし。
0232デフォルトの名無しさん2009/01/14(水) 14:29:00
Dim lngVal As Long

' lngVal = 1000000100
lngVal = 1000001000
If (lngVal And 1000000000) = 1000000000 Then
Label1.Text = 1
Else
Label1.Text = 0
End If

すいません、2008Expressを使用しています。
このプログラムで表示の値が0になってしまうのは何故でしょう？
コメントにしている値なら1になるのですが。
Long型の最大値も超えていないので、原因が思いつきません。
よろしくお願いします。
0233デフォルトの名無しさん2009/01/14(水) 14:38:23
両方が真のとき真だろうがボケ
0234デフォルトの名無しさん2009/01/14(水) 14:38:47
2進数って分かる？
0235デフォルトの名無しさん2009/01/14(水) 14:42:58
&H
02362322009/01/14(水) 14:48:46
>>233
1000001000と1000000000のANDは1000000000ですよね。
それのイコールだから真になるはずと思って書いたのですが、動作しませんでした。

>>234-235
確かに16進数で書いたほうが、値は見やすくなりますね。
10進数でANDは使えないのですか？
0237デフォルトの名無しさん2009/01/14(水) 14:57:17
ビット演算はビット同士の演算であって桁同士の演算じゃない
02382322009/01/14(水) 15:09:12
>>237
やっと理解できました、ありがとうございます。
他で動いていたのは偶然のような物だったのですね。
0239デフォルトの名無しさん2009/01/14(水) 15:11:42
×偶然のような物
○偶然
0240デフォルトの名無しさん2009/01/14(水) 21:23:37
他で動いてたのには &B が付いてただろ・・・？
他人のせいにするなよ
0241デフォルトの名無しさん2009/01/15(木) 00:12:19
VB.NET2003なんだけどHTMLのタグを取得したりオブジェクトの操作をする
ソース書いたけど間違ってるのかな?

Dim doc As mshtml.HTMLDocument
Dim IE As SHDocVw.InternetExplorer

IE = New SHDocVw.InternetExplorer
IE.Visible = False
str_url = "http://www.yahoo.co.jp"
IE.Navigate(str_url)

While (IE.Busy)
End While

doc = IE.Document
me.textbox1.text = doc.body.innerHTML
doc.all.item("Hoge", 0).Checked = True

うまく説明できないけど、アドレスはとりあえずyahooだけど
本当はフレームタグに文字突っ込んだり
JavaScript操作したりページ変移したりしてるんだけど
最後の1文でよくページが開けませんってエラーが出る
プログラムの組み方が間違ってるのかな?
0242デフォルトの名無しさん2009/01/15(木) 08:48:37
知らん
0243デフォルトの名無しさん2009/01/15(木) 10:49:43
先輩方お願いします！

TreeViewで3階層でノード入れて表示させてるんすけど
3階層目を非表示にする事とかってできないすかね？
0244デフォルトの名無しさん2009/01/15(木) 10:58:59
コレクションから削除する
0245デフォルトの名無しさん2009/01/16(金) 23:51:02
>>243
ttp://bull.s11.x-beat.com/src/bull77059.jpg
0246デフォルトの名無しさん2009/01/17(土) 00:00:59
コピペ君って馬鹿だな、まで読んだ。
0247デフォルトの名無しさん2009/01/17(土) 13:24:31
プログラミング素人です
VB2008で入力された文字列の先頭が数字ならOKと吐き出すプログラム作ってたんですが
数字だからな動くんですが、数字以外が入ると「Stringから型Doubleへの変換は無効です」とエラーがでます

Dim a As String = TextBox1.Text
Dim b As String = box.Chars(0)
If sen = 0 Or 1 Or 2 Or 3 Or 4 Or 5 Or 6 Or 7 Or 8 Or 9 Then
Label1.Text = "OK"
Else
Label1.Text = "NG"
End If

なぜでしょうか？
0248デフォルトの名無しさん2009/01/17(土) 13:26:35
Stringから型Doubleへの変換は無効だからです
0249デフォルトの名無しさん2009/01/17(土) 13:31:17
>>248
この場合どのようにすれば該当エラーを回避できるのでしょうか？
0250デフォルトの名無しさん2009/01/17(土) 13:35:04
Double型は数字以外入れられない。
初心者サイト読んできなさい。


つーか張ってるコードが不適切過ぎるだろ。
どれがdouble型の変数なのか書いてない、
どこでエラーが出てるのか書いてない
aもbも利用してないし
senの定義も書いてない。

プログラミング素人以前に、他人に説明する場合に何が必要なのかがわかってない。
0251デフォルトの名無しさん2009/01/17(土) 13:36:59
何がわかってないとかはいいけどよ
素人なら初心者になってから質問しろ
型もわからないようじゃ回答のしようがない
0252デフォルトの名無しさん2009/01/17(土) 13:37:14
>>250
すみません
間違って弄ってる途中の張ってました
ついでに初心者サイト読んできます

Dim a As String = TextBox1.Text
Dim b As String = a.Chars(0)
If b = 0 Or 1 Or 2 Or 3 Or 4 Or 5 Or 6 Or 7 Or 8 Or 9 Then 　←ここでエラーが出ます
Label1.Text = "OK"
Else
Label1.Text = "NG"
End If
0253デフォルトの名無しさん2009/01/17(土) 13:37:41
Char.IsDigit使え
0254デフォルトの名無しさん2009/01/17(土) 13:38:06
VB初心者サイトで基本読んで来い
基本が足りなすぎて質問するレベルじゃない
0255デフォルトの名無しさん2009/01/17(土) 13:41:27
>>252
VB.NETになってからはSelect Caseしか使えなくなった
0256デフォルトの名無しさん2009/01/17(土) 14:56:49
すいません、ほんと初心者で申し訳ないのですが、初歩の初歩でつまづいてしまったので、質問させてください。
使用環境：windowsXP（pro）、VisualBasic2008　expressEdition

とりあえず、まず使って馴れようと思い、以下のサイトを参考にしました。
ttp://homepage.mac.com/tuyano/VBTutor/VBTutor1.html
ここまではちゃんとサイトの表示どうりに動いたのですが、次の段階である、
ttp://homepage.mac.com/tuyano/VBTutor/VBTutor2.html
ここがうまくいかないのです。

テキストボックスを挿入し、指示どうりにコードを（コピペで）書き換えたのですが、
エラーが出て、実行できません。
http://joy.atbbs.jp/upup/img/4.jpg

調べてみたところ、変数宣言を強制するかしないかを設定する項目が関連しているようなのですが
環境設定欄を見ても、メニュー＞ツール＞オプションにあるはずの、［編集］項目が見つからないのです。
http://joy.atbbs.jp/upup/img/5.jpg

手書きで宣言を書けばよいのかとも思いましたが、宣言にも様々な種類があるらしく、
それらの中から適切な記述が、私にはわかりません。
どなたか、助けてはいただけませんでしょうか。
よろしくお願いいたします。
0257デフォルトの名無しさん2009/01/17(土) 15:02:27
そのサイトはVB6のサイト。
VB6以前とVB.NET以降は別物と思った方がいいです。

>>2にあるもっとまともなところで基礎から学んでください
02582562009/01/17(土) 15:11:22
あああ、そうだったのですか。
ぐぐったページしか読んでなかったので、気づきませんでした…orz
よく見たら、.NET？のページもあったようです。
ttp://homepage.mac.com/tuyano/VBNetTutor/VBNetTutor2.html
こちらのコードを入力したら、エラーは出ませんでいた。

お騒がせしてすみませんでした。
>>2も参考に、勉強したいと思います。
0259デフォルトの名無しさん2009/01/17(土) 15:25:24
そもそも参考にするページが間違ってるじゃないか。

>ttp://homepage.mac.com/tuyano/VBTutor/index.html
>Visual Basic 6.0 入門教室について
(略)
>（註――これはver. 6をベースにした入門です。VB .Netは、「Visual Basic .Net入門教室」をご利用下さい）
0260デフォルトの名無しさん2009/01/17(土) 15:26:10
激しく亀レスしたorz　ごめん
0261デフォルトの名無しさん2009/01/17(土) 23:52:13
許しましょう。
0262デフォルトの名無しさん2009/01/19(月) 01:00:14
ツリービューを使ってディスク内のファルダ、ファイルを表示する
エクスプローラみたいな奴を作ろうとしてるんだが…
XMLが必要なのか？　ツリー自体は構築できるが、ノードのパス返す部分がどうにもわからん。
0263デフォルトの名無しさん2009/01/19(月) 01:20:39
XMLなぞ使わんぞ。
TreeNode.FullPath
が使いたいのか？
0264デフォルトの名無しさん2009/01/19(月) 10:37:06
VB6は長年使ってましたが、VB.NETは初心者です。
PrintDocument使って印刷しようとしてるんですが、どうも余白の動作がおかしいです。
用紙はA4なのでPageBounds.Width=1169 PageBounds.Height=827となっています。
余白はデフォルトのままなので、上下左右1インチになっているのですが、
実際にプリンターに出力すると、左余白が3.1㍉、右余白が1.9㍉、上余白が3.2㍉、下余白が1.8㍉となってしまいます。
左右と上下それぞれの余白を合計すると5cmとなり約2インチなので合計は合うのですが、配分がおかしいです。
ちなみにPDFやプレビューに出力すると余白が均等になるようです。
原因分かる方いますか？
0265デフォルトの名無しさんNGNG?2BP(1255)
プリンタの挙動としか言いようがない
0266デフォルトの名無しさん2009/01/19(月) 12:00:11
取り敢えずは適当に余白設定してみてどんな挙動示すか調べるところからだな
02672642009/01/19(月) 17:14:24
>>265-266
ページプリンタを2台使ったり、別のPCでもいろいろ試しましたがさっぱりです。
新規プロジェクトでForm1にButton1とPrintDocument1を貼り付けて、下記のコードを実行するだけでもおかしいです。
これで他の方は普通に出力されるとするとわたしの環境のプリンターが2台ともおかしいということでしょうか。
ちなみに環境はWinXpProSp3、VisualStudio2008、Framework2.0です

Imports System.Drawing.Printing
Public Class Form1
　 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
　 　 ' 余白にそれぞれ10mmを1/100インチにした値を設定
　 　 PrintDocument1.DefaultPageSettings.Margins = New Margins(39, 39, 39, 39)
　 　 PrintDocument1.Print()
　 End Sub

　 Private Sub PrintDocument1_PrintPage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
　 　 ' 余白との境界の矩形を出力
　 　 e.Graphics.DrawRectangle(Pens.Red, e.MarginBounds)
　 　 e.HasMorePages = False
　 End Sub
End Class

0268デフォルトの名無しさん2009/01/19(月) 17:34:02
>>267
VB2005で試してみたけど
うちのプリンタじゃ右と下が切れるな
XPSファイルだと四角が表示される
やっぱプリンタの印刷可能領域だと思うが
0269デフォルトの名無しさん2009/01/19(月) 17:53:06
>>264
プリンタに設定した余白 (綴じ代) じゃね？
0270デフォルトの名無しさん2009/01/19(月) 19:54:18
>>267
プリンタのデバイス座標の原点は、用紙の左上ではなく
プリンタの物理的な印刷可能領域の左上（いわゆる「フチ」の内側）だよ。

.NET2.0からはプリンタの物理的な印刷可能領域が取得できるようになってたはずだから、
フチの部分のズレを補正する（つまり用紙の左上を原点とする座標を使う）こともできる。
0271デフォルトの名無しさん2009/01/19(月) 21:03:26
>>262
最近この手のチラシの裏的な書き方をするヤツが増えてる気がするんだが、
変なプライド持ってて質問することが出来ないタイプ？

社会出てそれだとちょっと困ったちゃんだぞ。
0272デフォルトの名無しさん2009/01/19(月) 21:13:21
確かに違和感は感じるけど、あえて突っ込むほどのことか？w
まあブログの影響なんじゃないのかな。
別に意味不明ってこともないからそういう表現法があってもいいんじゃないの別に。
0273デフォルトの名無しさん2009/01/19(月) 22:18:13
UPDATE テーブルA LEFT JOIN テーブルB ON テーブルA.CD = テーブルB.CD
SET ～を実行すると、

キーワードLEFT付近に不適切な構文があります。というエラーになりました。
UPDATE文の中に結合を組み込んではダメなのでしょうか？
同じSQL文をACCESSで実行するといけるんですが…。
どなたか教えて下さい。よろしくお願いします。
0274デフォルトの名無しさん2009/01/19(月) 23:34:44
>>273
スレ違い
0275デフォルトの名無しさん2009/01/19(月) 23:40:24
>>273
データベース板へどうぞ
0276デフォルトの名無しさん2009/01/19(月) 23:43:50
>>273
文法違い
02772732009/01/20(火) 00:47:22
スレ違いごめんなさい。
データベース板に行きます。
ありがとうございました。
0278デフォルトの名無しさん2009/01/20(火) 08:48:45
Web検索などしてみたのですが探し方が悪かったためか見つからず。ここで質問させてください

VS2005のDataGridViewでデータを表示させた後、とあるセルがユーザによって変更されたかどうかを
確認する手段はあるのでしょうか?
本来であれば、入力があった時点でのイベントを捕まえておけばよいのですが
別の理由でそれができません
Cellのプロパティーなどで後から変更があったことを見たいのですが何か手段はありませんでしょうか
0279デフォルトの名無しさん2009/01/20(火) 09:41:48
状況がよく解らん (イベントが取れない理由も含めて) が、少なくとも
DataGridView とその内包するオブジェクトでは行単位の更新状況しか取れん。
バインドされたデータがあれば、そっちが保持してるかも知れんが。
02802642009/01/20(火) 10:57:41
>>268-270
レスありがとう。
やはり印刷可能領域を考慮して自分で正しいMarginBoundsを求めないといけないようです。
まだ少しズレはありますが、大分マシにはなりました。

　 Private Sub PrintDocument1_PrintPage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
　 　 Dim newMarginBounds As Rectangle = New Rectangle(e.MarginBounds.Left - e.PageSettings.HardMarginX, _
　 　 　 e.MarginBounds.Top - e.PageSettings.HardMarginY, _
　 　 　 e.MarginBounds.Width, e.MarginBounds.Height)　 　
　 　 ' 余白との境界の矩形を出力
　 　 e.Graphics.DrawRectangle(Pens.Red, newMarginBounds)
　 　 e.HasMorePages = False
　 End Sub

せっかく引数で余白の内側渡してくれるんだからその辺は考慮しておいてくれればいいのに。
0281デフォルトの名無しさん2009/01/20(火) 11:51:52
>>278
PropertyChangedを使えばできるかもしれないけど
とりあえずそういう設計自体を見直した方が良いと思う
0282デフォルトの名無しさん2009/01/21(水) 00:59:22
アニメーションGIFのﾌｧｲﾙをPictureBoxなどで表示する際、色のトーンを
ハーフトーンにしたいのですが、どのように行なうのがよいかご指導をお願いします。
マルチTIFFやアニメーションGIFに含まれるすべてのイメージを表示する .NET Tips C#, VB.NET
http://dobon.net/vb/dotnet/graphics/selectactiveframe.html
を参考にして、フレームをめくってGetPixel（）で取った色の値をアルファ値
を入れてひとつひとつ変更しようとしましたがうまくいきません。

'FrameDimensionを取得
Dim fd As New FrameDimension(AnimationImage.FrameDimensionsList(0))
'フレーム数を取得
fd_count = AnimationImage.GetFrameCount(fd)
For i As Integer = 0 To fd_count - 1
　'フレームを選択
　Rv = AnimationImage.SelectActiveFrame(fd, i)
　If Rv = 0 Then
　　For x As Integer = 0 To AnimationImage.Width - 1
　　　For y As Integer = 0 To AnimationImage.Height - 1
　　　　pixelColor = BufImage.GetPixel(x, y)
　　　　newColor = Color.FromArgb(128, pixelColor.R, pixelColor.G, pixelColor.B)
　　　　AnimationImage.SetPixel(x, y, newColor)
　　　Next
　　Next
　End If
　'次のSelectActiveFrame()で変更が消えないように毎回保存
　AnimationImage.Save(fpathB, ImageFormat.Gif)
Next

このように処理した　AnimationImage　を使ってPictureBoxなどにImageAnimator
クラスでアニメーション表示してみましたところ、最初の1サイクルだけ、同じフレーム
をハーフトーンで表示していたかに見えるのですがそれ以降は元のトーンに戻って
いました。何卒よろしくお願いします。
0283デフォルトの名無しさん2009/01/21(水) 01:07:08
>>282
重そう…
02842822009/01/21(水) 01:49:33
一応補足します。>>282の部分は前もって処理しておいてから、その後で、
ImageAnimator.Animate()　して動かしていました。これのDOBONサイトを見て
行ないました。最初の1サイクル分ぐらいの時間は、同じフレームがハーフトーン
で表示されてアニメになっておらず、その後は元のトーンでアニメちなって表示
されていました。これはActiveフレームが正しくめくられていないのでしょうか・・・。
0285デフォルトの名無しさん2009/01/22(木) 01:32:56
ListViewでアイテムを選択してスクロールして選択したアイテムを表示の外にして
Buttonを押すとその選択されたもの（この場合10）がListViewの一番上に出て
選択されて青い状態で表示して欲しいのですが、どうしても灰色の状態になってしまいます。
どうしたら青くなるでしょうか
現在下のようなことを試してみたのですがダメでした。
よろしくお願いします。

ListView1.EnsureVisible(ListView1.Items.Count - 1)
ListView1.EnsureVisible(10)
ListView1.Items(10).Selected = True
ListView1.Select()
ListView1.Refresh()
ListView1.Focus()
Me.Activate()
Me.Refresh()
Application.DoEvents()
0286デフォルトの名無しさん2009/01/22(木) 10:18:34
>>285
ListView1.SelectedItems(0).EnsureVisible()
ListView1.Focus()
0287デフォルトの名無しさん2009/01/22(木) 10:28:14
AxWebBrowserで再生が終わったことはどうやって知ればいいのだろ
0288デフォルトの名無しさん2009/01/22(木) 10:29:43
何の再生だよ
何使って再生してんだよ
0289デフォルトの名無しさん2009/01/22(木) 10:35:38
>>288
独り言に返事しないでください
0290デフォルトの名無しさん2009/01/22(木) 10:38:33
>>288
あ、ゴメ AxWindowsMediaPlayerだった
0291デフォルトの名無しさん2009/01/22(木) 11:36:21
取り敢えずイベント全部調べてみれば
0292デフォルトの名無しさん2009/01/23(金) 11:42:49
フォームのTransparencyKeyを指定しない場合はAxWindowsMediaPlayerでの再生は
正常に行われるのだけど、一度TransparencyKeyをセットすると、TransparencyKeyに
Color.Emptyとやっても正常に再生出来なくなるのだけど、TransparencyKeyのリセット
ってどうすればいいのでしょう
0293デフォルトの名無しさん2009/01/23(金) 13:27:16
フォーム上のテキストボックスをマウスで移動させてかつ、フォームから
はみ出ないようにするにはどうすれば良いでしょうか？
Private Sub TextBox1_MouseDown(ByVal sender･･･
' 左クリックの場合
If e.Button = Windows.Forms.MouseButtons.Left Then
'移動前の位置を記録
startX = e.X
startY = e.Y
End If
End Sub
Private Sub TextBox1_MouseMove(ByVal sender･･･
If e.Button = Windows.Forms.MouseButtons.Left Then
' コントロールの取得
Dim control As Control = CType(sender, Control)
' コントロールの位置設定
If control.Left + e.X - startX + TextBox1.Size.Width < Me.Size.Width Then
control.Left = control.Left + e.X - startX
control.Top = control.Top + e.Y - startY
Else
control.Top = control.Top + e.Y - startY
End If
Me.Refresh()
End If
End Sub
移動する段階ではみ出ないようにしたいです。
よろしくお願いします。
0294デフォルトの名無しさん2009/01/23(金) 13:30:18
>293
補足で右端はできているのですが上下と左のやり方が良くわかりません。
参考にして色々考えたのですがなかなかうまくいきませんでした･･･。
0295デフォルトの名無しさん2009/01/23(金) 14:58:44
Dim FormWidth As Integer = Me.ClientSize.Width
Dim FormHeight As Integer = Me.ClientSize.Height
でロケーション領域のサイズ取得して
条件文で判断とかは？

コントロールするやつのサイズを取得して引けば右上、右下、左下はいける
0296デフォルトの名無しさん2009/01/23(金) 16:48:44
メインフォームのなかに子フォームがあって子フォームはウィンドウサイズが変えられたり最小化できたりするのはどうやるんだろう。
ふつうのアプリはフォームを開くたびにウィンドウズタスクバーにフォームアイコンが追加されていってシマフ
0297デフォルトの名無しさん2009/01/23(金) 16:52:00
MDI？
個人的には嫌いだが
0298デフォルトの名無しさん2009/01/23(金) 16:59:17
「VB.net MDI」でぐぐれば色々でてくる。
0299デフォルトの名無しさん2009/01/23(金) 19:04:45
>>295一応条件文を作ってみたのですがなかなかうまくいきませんでした。
右下にくっついてる状態だとそのまま下にはみ出てしまい思うように動きません
物分りが悪くて申し訳ないです。
If control.Left + e.X - startX + TextBox1.Size.Width < Me.Size.Width Then
If control.Top + e.Y - startY + TextBox1.Size.Height > FormHeight Then
control.Left = control.Left + e.X - startX
Else
control.Left = control.Left + e.X - startX
control.Top = control.Top + e.Y - startY
End If
Else
If control.Top + e.Y - startY + TextBox1.Size.Height > FormHeight Then
control.Left = control.Left + e.X - startX
Else
control.Top = control.Top + e.Y - startY
End If
End If
0300デフォルトの名無しさん2009/01/23(金) 21:07:59
ExcelにおけるVBAについてなのですが、
IXMLDOMで定義されたオブジェクトで、求めているキー/値にたどり着くために

item.ChildNodes(5).Attributes.Item 1.Text

このように、途中で半角のスペースの入っているところを通らなければいけません。
しかし、このまま実行するとエラーとなってしまいます。
どうすれば、うまく参照できるのでしょうか？
0301デフォルトの名無しさん2009/01/23(金) 21:16:09
VBAはすれ違い
0302デフォルトの名無しさん2009/01/23(金) 21:17:41
Attributes["item 1"]とか
0303デフォルトの名無しさん2009/01/23(金) 21:38:02
XMLの属性名に半角スペース？
0304デフォルトの名無しさん2009/01/23(金) 21:40:41
属性名ではないのですが、Excelが勝手に　Item 1 と割り振ったのです。。。
0305デフォルトの名無しさん2009/01/23(金) 23:10:33
教えてください。
ドラッグドロップについてなのですが
ドラッグ元のコントロールでドラッグの終了を検知する方法は無いでしょうか？
よろしくお願いします。
0306デフォルトの名無しさん2009/01/23(金) 23:30:27
DoDragDropから返ってくるだろ
0307デフォルトの名無しさん2009/01/23(金) 23:36:24
>>306
ありがとうございます。
DoDragDropメソッドが値を返してきたら終了したってことなんすね。
助かりました。
0308デフォルトの名無しさん2009/01/24(土) 10:30:23
Socketでファイル転送を試みています。
SocketクラスのSendFileメソッドを使ったのですが4KBずつの送信になっているようで遅くて困っています。
このメソッドはそういうものなんでしょうか？
0309デフォルトの名無しさん2009/01/24(土) 10:51:29
VB6でつかってたフォームに黒い線をひくコントロールがみつからない
0310デフォルトの名無しさん2009/01/24(土) 11:12:19
>>309
VB.NET質問スレ(Part28)
http://pc11.2ch.net/test/read.cgi/tech/1229695062/
0311デフォルトの名無しさん2009/01/24(土) 11:14:01
PowerPack でも使えば？
0312デフォルトの名無しさん2009/01/24(土) 12:06:30
フォームに黒い線をひく(笑)コントロール(笑)
0313デフォルトの名無しさん2009/01/25(日) 05:16:24
VB6では確かにLineコントロールがありましたね。
.NET 2003で確認したんですけど
確かに見あたりませんね。
0314デフォルトの名無しさん2009/01/25(日) 09:43:22
PowerPackやVisualBasic.CompatibilityはDLL配布になるからあんまり使いたくないな。
0315デフォルトの名無しさん2009/01/25(日) 09:57:09
Compatibilityは.NET標準のはずだが
DLLが嫌って観念は理解できんなぁ　regsvr32が必要とかってわけでもないのに
0316デフォルトの名無しさん2009/01/25(日) 14:06:33
嫌なら自分でユーザーコントロール作ればいい。
数分もあれば出来る内容だぞ。
0317デフォルトの名無しさん2009/01/25(日) 14:48:19
LabelコントロールのAutoSizeをfalseにして
BorderStyleをFixedSingleにすりゃいいんだけどな
んで高さを1pxとかにする
0318デフォルトの名無しさん2009/01/25(日) 14:49:50
いかにもVBらしいやり方だな
0319デフォルトの名無しさん2009/01/25(日) 14:58:38
>>318
新米プログラマ？w
VBに限らない昔からのテクニックだぞ。
0320デフォルトの名無しさん2009/01/25(日) 23:25:35
それで斜め線も描けるの？
0321デフォルトの名無しさん2009/01/25(日) 23:42:24
ユーザーコントロールで自分で描けばなんでもＯＫだよ。
背景透過してね。
0322デフォルトの名無しさん2009/01/26(月) 02:29:00
VB2008EEを使っています。

自作コントロールに自作プロパティをつけました。
このプロパティはコレクション型で(仮にプロパティ名Hoges、HogeCollection型とします)、
デザイン時にプロパティウインドウから編集できるようにUI 型エディタを実装しました。
ttp://msdn.microsoft.com/ja-jp/library/53c49eck(VS.80).aspx

ここからが質問です。
現在プロパティウインドウのHogesの値のところにはHogeCollectionと表示されています。
これをコンボボックスのImtesプロパティのように"(コレクション)"と表示したいのですが
どうすればいいのでしょうか。

よろしくお願いします
0323デフォルトの名無しさん2009/01/26(月) 09:42:42
MouseDownイベントをキャンセルする方法はないでしょうか？

e.cancel = ture
exit sub

こんな感じでできないでしょうか？
0324デフォルトの名無しさん2009/01/26(月) 10:14:11
>>323
何のクラスか知らんけど、派生させて OnMouseDown オーバーライドしといて
基底クラスの OnMouseDown を呼ばなきゃいいんじゃね？
0325デフォルトの名無しさん2009/01/26(月) 10:26:55
>>323
なるほど！
やってみます。
0326デフォルトの名無しさん2009/01/26(月) 10:43:58
KeyDownとKeyPressどっちつかうの?
0327デフォルトの名無しさん2009/01/26(月) 10:46:23
Public Class CustomControl1
Inherits DataGridView

とやってみたんですが

CustomControl1' に指定された基本クラス 'System.Windows.Forms.DataGridView' は、その他の partial 型の 1 つである基本クラス 'System.Windows.Forms.Control' と異なることはできません。

というエラーが出てしまいます。
なぜでしょうか？
0328デフォルトの名無しさん2009/01/26(月) 10:50:42
>>327
http://msdn.microsoft.com/ja-jp/library/8d17t7cd.aspx
0329デフォルトの名無しさん2009/01/26(月) 11:02:06
>>328
普通のクラスでやったらできました。
0330デフォルトの名無しさん2009/01/26(月) 11:45:21
.NET 2003を使用しています。
WebFormからMicrosoft Office Access2003へ書き込みをする方法はありません？
0331デフォルトの名無しさん2009/01/26(月) 11:53:53
あります
0332デフォルトの名無しさん2009/01/26(月) 12:42:12
>>331
あるんですか！わかりました！ありがとうございます！！！
0333デフォルトの名無しさん2009/01/26(月) 12:46:49
　 　　　*　　　　　　*
　　＊　　　　　＋　　うそです
　 　　 n ∧＿∧　n
　＋　(ﾖ（* ´∀｀）E)
　 　 　 Y 　　　 Y　　　　＊
0334デフォルトの名無しさん2009/01/26(月) 13:13:22
>>333
盛大に泣いた。
0335デフォルトの名無しさん2009/01/26(月) 15:46:53
WebFormからの意味がわからんけどADO.NETで書けるでしょ
0336デフォルトの名無しさん2009/01/26(月) 20:48:43
できないことはないけど、よく壊れるからおすすめはできない。
普通に、SQL Server にしなよ。
0337デフォルトの名無しさん2009/01/27(火) 00:49:02
http://imepita.jp/20090127/009620

分かる人おねがいします。m(_ _)m
本の通り進めてるのですが、説明されてません。
0338デフォルトの名無しさん2009/01/27(火) 01:33:31
>>337
左にある[+]をクリックしたことがないというオチだったらぶっとばす。
0339デフォルトの名無しさん2009/01/27(火) 01:43:15
>>337
使ってるのは2005または2008で参考書は2003なんじゃないの？
2005以降はその部分は別になったよ。

ttp://www.atmarkit.co.jp/fdotnet/vb2005/vb2005_03/vb2005_03_01.html
0340デフォルトの名無しさん2009/01/27(火) 15:38:29
VB6.0からの移行を考えているんですが
2005にするか2008で行くか悩んでいます
2008と2005にはそれほど大差が無いような記述が多いのですが
どうせ１から始めるなら2008でも良いのでしょうか？


0341デフォルトの名無しさん2009/01/27(火) 15:50:05
>>340
2008の方が良いのでは？
来年の年明けぐらいにVisual Studio 2010がでますよ。
0342デフォルトの名無しさん2009/01/27(火) 16:14:58
2008でも.net framework 2.0のアプリケーションが作れるからねー
0343デフォルトの名無しさん2009/01/27(火) 18:56:18
VisualBasic.5.0　で実行できたプログラムが突然実行できなくなり、実行すると以下のようなエラーメッセージ
が表示されてしまいます。

”0x77fcc7a8"の命令が”0x317e4ebb"のメモリを参照しました。メモリが”written”になることはできませんでした。

プログラムを終了するには[OK]をクリックしてください。
プログラムをデバックするには[キャンセル]をクリックしてください。

と表示されます。


これを改善するにはどのようにすればよいのでしょうか？？
0344デフォルトの名無しさん2009/01/27(火) 18:59:44
初心者板しか残ってないが移動してくれ
http://pc11.2ch.net/test/read.cgi/tech/1206835319/l50
0345デフォルトの名無しさん2009/01/27(火) 19:01:15
VB2008で作り直せというもって行きかたならここでいいじゃないか（笑
0346デフォルトの名無しさん2009/01/27(火) 19:01:24
親切にありがとうございます。
0347デフォルトの名無しさん2009/01/27(火) 19:20:27
質問してもいいですか
Visual Basic 2005　XP環境です。

ttp://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=6827&lngWId=10
これをDLしてソースを弄ろうとしたのですが、ボタンの位置や、テキストを変更するだけでもエラーが発生します

エラー名
HANDLES 句には、それを含む型または基本型の 1 つで定義された WithEvents 変数が必要です。

こんなエラーが複数でるのですが解決する方法はありませんか？
今までボタンの位置などを変えるだけで実行できないなんてことはなかったのでセキュリティとかかかってるのかなーと思いまして

ソースにこんな一文が書かれ、これかな？と思いましたけど何を弄ればいいのかわかりません
To change this template use Tools | Options | Coding | Edit Standard Headers.

スレチとかだったらごめんなさい。
0348デフォルトの名無しさん2009/01/27(火) 20:03:10
プロジェクとごとzipでうpれ
0349デフォルトの名無しさん2009/01/27(火) 20:12:22
ttp://kissho.xii.jp/1/src/1jyou62814.zip.html
これが中に入ってたすべてのファイルです
0350349=3472009/01/27(火) 20:13:19
連投ごめんなさい
0351デフォルトの名無しさん2009/01/27(火) 20:19:42
実行してもふつうに音楽が再生されるが何か
0352デフォルトの名無しさん2009/01/27(火) 20:19:57
sage
0353デフォルトの名無しさん2009/01/27(火) 20:24:25
>>347
ダウンロードしてちょっとフォーム弄っただけでビルド通らなくなるな。
原因は文字通りWithEventsがないのが原因だが、なぜ弄る前はビルド通るのだろう？

対応策は、それぞれ*.Designer.vbの最後のほうのコントロールの定義を

Private btnOK As System.Windows.Forms.Button
↓
Friend WithEvents btnOK As System.Windows.Forms.Button
こんな風に変換するだけ。

このプロジェクトはSharpDevelopで書いたようだな。
Visual Studioではそもそもちゃんと読めないのかもしれない。
0354デフォルトの名無しさん2009/01/27(火) 20:24:38
「実行して動かない」って質問じゃあないと思うんだが
0355デフォルトの名無しさん2009/01/27(火) 20:24:45
>>351
これをボタンの配置とか少しでもずらしたら変えたら使えなくなりませんか？
もしかして自分の環境がおかしんですかね？
0356デフォルトの名無しさん2009/01/27(火) 20:25:44
書くなら14秒早く書け、俺…orz
0357347=3552009/01/27(火) 20:27:33
>>353
ありがとうございます！
初心者ながら奮闘してみます！

名前付け忘れと連投すいませんでした
0358デフォルトの名無しさん2009/01/27(火) 20:37:19
>>343
エスパースレでもそれは難しいだろ。

以前実行出来てたのなら、再インストールするなり
以前とどこが環境が変わったのか整理してみたほうがいい。
0359デフォルトの名無しさん2009/01/28(水) 00:58:09
>>339
まさにそれみたいです・・・
どうしたものか・・・

何か同じことができればいいんだけどなー。
0360デフォルトの名無しさん2009/01/28(水) 01:06:08
失礼します。
VB6で動いていたdllをVB2008Expressで呼び出したところ、
「AccessViolationExceptionはハンドルされませんでした」と出てしまいました。
これは、VB2008では動かないってことでしょうか・・・？
0361デフォルトの名無しさん2009/01/28(水) 01:19:15
IntegerやLongのサイズが変更されてるからそのままのソースを持ってきてもだめだぞい。
あとデフォルトByValにかわっとる。
0362デフォルトの名無しさん2009/01/28(水) 01:36:08
そういえば、同じLongとかでも大きさが違いますね。
揃えてみます、ありがとうございました。
0363デフォルトの名無しさん2009/01/28(水) 01:41:21
DB絡みの質問で悪いんだが
.NET2005で開発してるのでここで質問させてくれ
SQLServer2005に接続してるんだが
ある長時間かかるトランザクション処理中に
他のクライアントから同じ処理（コマンドボタンで実行など）とすると
即座に「現在処理中です」ですのようなメッセージを出したい

最初コマンドのタイムアウトで実現しようとしたのだが
本来やりたい処理までタイムアウトしてしまったので
「Aクライアントがトランザクション処理中はBクライアントは即時にメッセージを出す」
ということがやりたい

お知恵をお願いする
03643222009/01/28(水) 02:00:58
自己解決しました。

TypeConverterを継承したクラスをHogesプロパティの
System.ComponentModel.TypeConverter属性に指定したらできました。
0365デフォルトの名無しさん2009/01/28(水) 07:05:49
>>363
oracleならselect * from hoge for update nowait
があるからsqlserverにも似たものがあるんじゃないかな
0366デフォルトの名無しさん2009/01/28(水) 08:36:41
下記のコードでパネルにボタンを表示してスクロールできるように
しているのですがスクロールバーの初期状態を 0,0　にしたいのですが
できません。どうすればいいでしょうか？

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Me.Width = 300
Me.Height = 300

Dim panel1 As New Panel
panel1.Width = 250
panel1.Height = 250
panel1.Left = 20
panel1.Top = 20
panel1.AutoScroll = True
Me.Controls.Add(panel1)

Dim button1 As New Button
button1.Left = 200
button1.Top = 200
button1.Width = 100
button1.Height = 100
button1.Text = "button1"

panel1.Controls.Add(button1)
0367デフォルトの名無しさん2009/01/28(水) 09:20:45
間にもう一個パネルかなんか挟む
0368デフォルトの名無しさん2009/01/28(水) 10:56:02
>>365
ありがとうございます
SQLServerにもNOWAITがありました
0369デフォルトの名無しさん2009/01/28(水) 16:05:38
ボリュームコントロールのWAVEを操作するのはVBでもできるけど
いちばん左端のつまみはどうやったらVBから動く?
03703602009/01/28(水) 17:20:35
>>361
VB6.0ではLongだったので、Integerにしてみましたがダメでした。
ByRefとByValは全て指定してあるのですが・・・。
この場合、後はどこを見れば良いのでしょうか？
よろしくお願いします。
0371デフォルトの名無しさん2009/01/28(水) 17:26:24
Cのヘッダの定義とか晒して
03723602009/01/28(水) 18:32:16
サンプルプログラムしかないのですが、ここでダウンロードしました。
ttp://www.elandigitalsystems.com/eng/software/usbwave12/usbwave12source.zip

dllファイルがUSBwave12Drvr_W32.dll
DeclareはUSBwave12Drvr_if.basとUSBwave12Drvr_if_private.basで行っています。
0373デフォルトの名無しさん2009/01/28(水) 19:08:18
>>372
こういうのが怪しいな。
 .. (ByVal channel As Long, ByRef b As Byte, ByRef l As Long) As Long

２番目のパラメータは実際はBYTEではなくてBYTE配列なんだろ？
その場合はこういう渡し方ではだめ。
0374デフォルトの名無しさん2009/01/28(水) 19:45:15
ダウンロードしようと思ったけど、ファイルでかｗ
0375デフォルトの名無しさん2009/01/28(水) 19:48:02
DLLにimportLibが付いてれば速攻でC++/CLIに逃げたいところ
0376デフォルトの名無しさん2009/01/28(水) 20:05:47
デシマルとダブルどっちがおおきんだ
0377デフォルトの名無しさん2009/01/28(水) 20:15:39
doubleは２進化浮動少数点
decimalは１０進化浮動少数点で単純比較はできないが、
double 64bit, decimal 128bitでdecimalの方が大きいのとちがうか。
0378デフォルトの名無しさん2009/01/28(水) 20:27:56
扱える値の範囲はdoubleのほうが遥かに大きい(10の数百乗倍)
0379デフォルトの名無しさん2009/01/28(水) 20:38:49
カレンシィってのもあったような
0380デフォルトの名無しさん2009/01/28(水) 20:52:32
VB7以降にはCurrency型は存在しない Decimalに移行
0381デフォルトの名無しさん2009/01/28(水) 21:17:37
πはどうするんだ
0382デフォルトの名無しさん2009/01/28(水) 21:17:55
3.1415.........
0383デフォルトの名無しさん2009/01/28(水) 21:50:51
3でいいです
0384デフォルトの名無しさん2009/01/28(水) 22:49:45
その教育方針は変更されてます
0385デフォルトの名無しさん2009/01/29(木) 15:52:51
文字変数を宣言したばかりの時は
カラ文字列とnothingとemptyの三つの状態なのかね?
0386デフォルトの名無しさん2009/01/29(木) 16:04:51
空文字列とString.Emptyはほぼ同じで長さ0の文字列への参照
Nothingは参照自体存在しない
宣言しただけの状態はNothing
0387デフォルトの名無しさん2009/01/29(木) 16:05:04
>>385
VBの比較演算子がNothingと空文字を区別しないだけ。
String.Equals(a, b) 
でなくて
Microsoft.VisualBasic.CompilerServices.Operators::CompareString(string, string, bool)
を使ってる。
0388デフォルトの名無しさん2009/01/29(木) 16:46:15
Dim Arr(10000) as String

Arr(1) = "a"
Arr(2) = "b"
Arr(3) = "c"

としたが

またふたたびすべてのArr(i)を""にするには
For i= 0 to 10000
Arr(i)=""
Next
と書くしかないわけなんかよ
0389デフォルトの名無しさん2009/01/29(木) 16:58:58
>>388
それに不満があるなら拡張メソッドでもつかっとけ
0390デフォルトの名無しさん2009/01/29(木) 17:10:06
>388
System.Array.Clear じゃダメ？
0391デフォルトの名無しさん2009/01/29(木) 17:17:03
Erace Arr は?
0392 [―{}@{}@{}-] デフォルトの名無しさん2009/01/29(木) 17:17:15
>>388
Dim Arr() as String

redim Arr(10000)

Arr(1) = "a"
Arr(2) = "b"
Arr(3) = "c"

redim Arr(10000)

なんてどうよ？
0393デフォルトの名無しさん2009/01/29(木) 17:17:22
駄目 Nothingになる
0394デフォルトの名無しさん2009/01/29(木) 19:06:38
redimなんか使うなよ
0395デフォルトの名無しさん2009/01/29(木) 19:56:59
>386
>宣言しただけの状態はNothing

と>388が矛盾してる気がするのは俺だけか
0396デフォルトの名無しさん2009/01/29(木) 20:11:48
Arr(10000) as String
と書くと配列のインスタンスが自動的に作られるのは昔のVBとの互換性のためのシンタックスシュガー
宣言だけしてるわけではない
0397デフォルトの名無しさん2009/01/29(木) 20:38:04
ArrayList使え
0398デフォルトの名無しさん2009/01/29(木) 21:22:37
デザイン時にサイズを決めるときによくつかう黄金比って何対何だっけか
0399デフォルトの名無しさん2009/01/29(木) 21:26:19
x^2 = x+1
を解くんだ
0400デフォルトの名無しさん2009/01/29(木) 22:04:28
>>398
ジョジョの奇妙な冒険にその話があるよ。
１巻から探してみてくれ。
俺は数値は覚えてない。
0401デフォルトの名無しさん2009/01/29(木) 22:12:17
http://zapanet.info/blog/flash/gold.swf
これはどう？
0402デフォルトの名無しさん2009/01/29(木) 22:51:42
>>398
1 : (1+√5)/2
0403デフォルトの名無しさん2009/01/29(木) 23:05:50
というか、ぐぐれば幾らでも出てきたんじゃないのか
0404デフォルトの名無しさん2009/01/30(金) 09:04:48
StreamReader.ReadLine メソッド
で
String = SR.ReadLine
すると
String の末端には改行コードがあるのかないのか
0405デフォルトの名無しさん2009/01/30(金) 09:21:12
ヘルプ嫁
0406 [―{}@{}@{}-] デフォルトの名無しさん2009/01/30(金) 09:25:47
>>394
あるもの使えばいいじゃない
車輪を再発明する必要ないだろ？
0407デフォルトの名無しさん2009/01/30(金) 09:34:09
dim ってdimensionのことでしょ?
なんで普通の変数宣言するのにdimensionなの? 馬鹿?
0408デフォルトの名無しさん2009/01/30(金) 09:57:15
>>407
dimension には物理量としての次元っていう意味があって、変数の意味 (長さとか質量とか) を表す。
同じように、Dim x As Integer なら、次元が整数であるような変数として x を定義するよ、って言ってるんじゃないかなあ、と。
0409デフォルトの名無しさん2009/01/30(金) 10:30:46
ところでPrivateとDimの使い分けしてる？
0410デフォルトの名無しさん2009/01/30(金) 10:32:35
してなくてもしてないなんて恥ずかしくて言えないようなことだぞw
0411デフォルトの名無しさん2009/01/30(金) 10:36:46
>>409
フォーム・クラスのメンバー変数とモジュールレベルの変数はPublic/Privateで、
ローカル変数はDimというのが推奨と記憶している。
0412デフォルトの名無しさん2009/01/30(金) 11:30:42
そういや、フォームにコントロール置いたときに
デフォルトでFriendになる糞仕様は
2008でも同じかしら？
04134042009/01/30(金) 11:44:55
ヘルプ読むひまがあるのはニートだけなんだが
さっさと教えろハゲ
0414デフォルトの名無しさん2009/01/30(金) 11:46:11
掲示板に書き込みする暇はある不思議
0415デフォルトの名無しさん2009/01/30(金) 11:53:15
動けばいいんだよ
こまかいこと気にするな
04164042009/01/30(金) 11:55:13
Right(String,1)=Vbcrlfを判定すのめんどうっちいからさっさとしろ
0417デフォルトの名無しさん2009/01/30(金) 11:58:13
つうかRight(String,1)=VbcrlfなのかRight(String,2)=Vbcrlfなのかびみょーだろうが
0418デフォルトの名無しさん2009/01/30(金) 12:03:02
>>416
改行コードがありますん
0419 [―{}@{}@{}-] デフォルトの名無しさん2009/01/30(金) 12:10:33
>>416
Vblfかもよ
0420デフォルトの名無しさん2009/01/30(金) 12:20:25
Dim SR As StreamReader = New StreamReader(TextPath, System.Text.Encoding.GetEncoding("UTF-8"))
Dim line As String
Do
line = SR.ReadLine()
Loop Until line Is Nothing
---------------------------
Loop Until line = ""
に書き換えるとどうなるよ
0421デフォルトの名無しさん2009/01/30(金) 12:55:14
ヘイトとウィドスとレンスを英語で書きなさい
↓
0422デフォルトの名無しさん2009/01/30(金) 13:06:07
hate
we dos
lens
0423デフォルトの名無しさん2009/01/30(金) 13:06:27
HEITO、WAIDESU、RENSU
0424デフォルトの名無しさん2009/01/30(金) 14:46:21
height width length
0425デフォルトの名無しさん2009/01/30(金) 15:07:39
>>421
レンスもボケてください。
0426デフォルトの名無しさん2009/01/30(金) 15:10:45
どーみてもListBoxにMoveメソッドが見当たらない件について
アイテムを上や下に移動できないじゃん
0427デフォルトの名無しさん2009/01/30(金) 15:20:52
アイテムを移動……？
0428デフォルトの名無しさん2009/01/30(金) 15:31:52
ドラッグして順番並べ替えたいって事じゃない？
0429デフォルトの名無しさん2009/01/30(金) 15:46:17
>>426
そりゃListBoxにはないだろうな。

With ListBox1.Items
  Dim obj As Object = .Item(ix)
.  Item(ix) = ListBox1.Items(ix - 1)
  .Item(ix - 1) = obj
End With
0430デフォルトの名無しさん2009/01/30(金) 23:55:33
Call はつけたほうがいいでしょうか
付けない方がいいでしょうか
0431デフォルトの名無しさん2009/01/31(土) 00:03:32
Letを忘れずに付けるのが好きならCallも付けるべき。

VB6の頃は( )の扱いが微妙だったからCallを使っていたが、
,NET以降は引数には必ず( )を付けることになったので正直いらない。
0432デフォルトの名無しさん2009/01/31(土) 00:06:18
戻り値があるかどうかなんて大きな問題じゃないし見間違えようがない
C系っぽく書くのが最近の主流
0433デフォルトの名無しさん2009/01/31(土) 00:17:37
>>431
let i = i + 5
error BC30807: 'Let' および 'Set' 代入ステートメントは、現在サポートされていません。

アッチョンブリケ
0434デフォルトの名無しさん2009/01/31(土) 00:30:00
VB6の頃はcallに意味があった。この実行結果は２になる。
結果３を期待してバグを作ることが多かったのでCallを必須のルールのプロジェクトが多かった。
Sub Hoge(ByRef i As Integer)
    Let i = i + 1
End Sub

　Dim i As Integer
　Call Hoge(i)
　Hoge i
　Hoge (i)
　Debug.Print i
0435デフォルトの名無しさん2009/01/31(土) 09:08:11
TrueとFalseを書くのは労力だからフラグ用に0と1の値だけしか使わないがそれ用の数値型はないんかい
0436デフォルトの名無しさん2009/01/31(土) 09:19:38
そのくらい書けよ
0437デフォルトの名無しさん2009/01/31(土) 09:26:53
それ用の数値型があったとしてもTrue/Falseよりタイピング回数は多くなると思う
0438デフォルトの名無しさん2009/01/31(土) 10:05:06
外部モジュールとかで
const t as boolean = true
const f as boolean = false
でどうだろう
0439デフォルトの名無しさん2009/01/31(土) 11:55:39
コード補間つかや、実質　f[tab] t[tab]だろう
0440デフォルトの名無しさん2009/01/31(土) 22:44:45
A.aspxでResponse.Redirect("A.aspx")とすると、同じページでも、初めてA.aspxを
ロードしたようになりますが、これを、初めてではない（複数回目）ようにすることは
できるのでしょうか？

0441デフォルトの名無しさん2009/01/31(土) 22:53:38
>>440
セッション変数
0442デフォルトの名無しさん2009/01/31(土) 23:18:08
>>441
ありがとうございます。

セッション変数に何回目かをセットして、それによって処理を変更するということでしょうか？
それとも、セッション変数を利用すると、IsPostBackがTrueになるようにできるのでしょうか？
すみません。説明が足りませんでしたが、IsPostBackがTrueになるようにしたいのです。
0443デフォルトの名無しさん2009/02/01(日) 00:10:06
>>442
意図がよく分からないけど、PostBackしたいならコントロールのAutoPostBackプロパティをTrueにすればいいですよ。
0444デフォルトの名無しさん2009/02/01(日) 00:20:00
誘導されて来ました。

最近VB6から.netに移行したんだけど誰か助けてくれ。

データベースの質問なんだけど、TableAdapterのUpdateメソッド使っても何をどうやっても更新できない。

1:Dim dt As New DataTable, dr As DataRow

2: dt = DataSetA.CustamerMain
3: dr = DataSetA.Tables("CustamerMain").NewRow
4: dr("得意先ID") = 1
5: dr("得意先名") = "A社"

6:DataSetA.Tables("CustamerMain").Rows.Add(dr)
7:DataGrid1.DataSource = CarrigeDataDataSet.CustamerMain
8:Me.CustamerMainTableAdapter.Update(DataSetA.CustamerMain)

データグリッドにデータセットの内容写してみるとちゃんと追加されてる。
この箇所だけでもう2週間悩んでるorz
誰か御助けを・・・
0445デフォルトの名無しさん2009/02/01(日) 02:05:18
>>>444
TableAdapterのことはよくわからないけど、
コミットは必要ないの？
0446デフォルトの名無しさん2009/02/01(日) 02:20:02
Dim S1, S2, S3 as string = ""

ができないんだけど
0447デフォルトの名無しさん2009/02/01(日) 03:00:19
>>444
別のDBを見てるってことはない？
\bin\debugにBDFかSDFがコピーされててアプリはそれを更新しているはず。
データベースエクスプローラに表示されているのはソースディレクトリにあるオリジナルのほう。
0448デフォルトの名無しさん2009/02/01(日) 03:03:54
>>446
Dim a As String = "", b As String = "", c As String = ""
型推論させるなら次の形式でもよい。
Dim a = "", b = "", c = ""
0449デフォルトの名無しさん2009/02/01(日) 09:19:41
よく2週間も悩んでる暇があるなぁｗ
0450デフォルトの名無しさん2009/02/01(日) 09:56:49
>>444
自分が以前作ったAccessもどきみたいなプログラムのソースからキーワードになりそうなのを抜粋。
参考になるかどうかはわからん。

DbDataAdapter
DbCommand

SqlClient.SqlDataAdapter

SqlClient.SqlCommandBuilder
SqlCommandBuilder.GetInsertCommand
SqlCommandBuilder.GetUpdateCommand
SqlCommandBuilder.GetDeleteCommand

DbDataAdapter.Update
0451デフォルトの名無しさん2009/02/01(日) 11:01:28
初心者質問で申し訳ないんですが、

VB2008 express SP1　インストール（SQL Server2008 Express抜き）
↓
SQL Server2008 Express SP1　インストール

これだとVB2008のサーバーエクスプローラーのデータの接続を右クリックして「新しいSQL Serverデータベースの作成」
がグレーアウトするのはデフォですか？
SQL　Serverサービスは開始しています。
0452デフォルトの名無しさん2009/02/01(日) 11:46:49
>>444
ASP.NETの場合はDataSourceを指定した後でDataBind()する必要があるが…
関係ないか。
0453デフォルトの名無しさん2009/02/01(日) 16:00:08
TableAdapterは使ったこと無いんだが
.NETはデータセットに取得してもデータベースから切断された状態だったはずだよな

04544442009/02/01(日) 18:32:47
みなさん、回答ありがとうございます。

>>445
5行目と6行目の間に
dr.EndEdit()
dt.AcceptChanges()
を記述してみたんですが、ダメでした。

>>447
両方とも更新できていませんでした。
サーバーエクスプローラから、ひとつ直接レコードを追加してみたのですが、
起動時にはそのレコードは出てきてます。
その後>>444を実行してみるとデータグリッドには直接追加したレコードと、
プログラム上で追加したレコードが表示されてます。
ということは、データセットには間違いなく追加されてるわけですよね？
でも肝心な更新が・・・orz
04554442009/02/01(日) 18:33:11
>>449
いつかはつまずくだろうと思ってましたが・・・
こんなに早い段階でハマるとは、僕もびっくりですw

>>450
DataAdapterなら出来るんですが、コードをシンプルにまとめられるTableAdapterを覚えたいと思いまして。

>>452
僕のはADO.NETなので・・・

>>453
MSDNを見るとUpdateメソッドで更新のため接続してくれるそうです。

うーん、これってもしかしてコードじゃなくてほかの原因なんでしょうか？
今日本屋に行ってきまして色々貪ってきたんですが、コード的には合ってるような気が・・・
もうわけがわかりませんo...rz

0456デフォルトの名無しさん2009/02/01(日) 18:35:40
Button1以外のところからButto1クリックプロシージャを実行する時って
Button1_Click
とかくだけだとダメな理由をのべよ
いんすうをなにかかかないとだめなんだが
0457デフォルトの名無しさん2009/02/01(日) 18:37:18
のべよ（笑）
0458デフォルトの名無しさん2009/02/01(日) 19:34:37
>>455
これで普通に動いてるな。追加なのでFiｌｌの行は有っても無くてもよい。
XSDエディタでAdapterやDataSetを自動生成するときにしくじってるとかないの？
Using custamerAdapter As New vbdb001DataSetTableAdapters.CustamerMainTableAdapter, _
        custamers As New vbdb001DataSet.CustamerMainDataTable
    'custamerAdapter.Fill(custamers)
    Dim custamer = custamers.NewCustamerMainRow()
    custamer.得意先ID = 1
    custamer.得意先名 = "A社"
    custamers.AddCustamerMainRow(custamer)
    custamerAdapter.Update(custamers)
End Using
0459デフォルトの名無しさん2009/02/01(日) 20:30:01
>>456
Button1.PerformClick()じゃだめな理由をのべよ
0460デフォルトの名無しさん2009/02/01(日) 21:08:37
5を0005に変換する関数などありましたら教えて
0461デフォルトの名無しさん2009/02/01(日) 21:12:38
すみません
できました。
Dim n As String = Format(5, "0000")
0462デフォルトの名無しさん2009/02/01(日) 22:02:10
ああ、もう堪えられないから突っ込んじゃう



"customer" な！！！！！１１
0463デフォルトの名無しさん2009/02/01(日) 22:04:38
VB.NETでVB6.0でいうDebug.Printってどうするんでしょうか。
0464デフォルトの名無しさん2009/02/01(日) 22:08:11
>>462
ふきんき見たいなものだよ。なぜか翻訳で（ｒｙ
04654552009/02/01(日) 22:12:15
>>458
おおおおお！
できました！
Usingとか初めて見るのでまだパッとしませんが、その辺はまた自分でじっくり勉強してみます。
今まで回答してくださった方、本当にありがとうございました。
本当に助かりました。
0466デフォルトの名無しさん2009/02/01(日) 22:33:49
ちと質問させてください。。。

Webページに配置したボタンを１回クリックすると、

PageLoad　→　Button_Click　→　Button_Click　って感じで、

ボタンのクリックイベントが２回連続で実行されてしまうんだけど。。。

１回で処理を終了させるにはどうしたらいいのでしょう？？
0467デフォルトの名無しさん2009/02/01(日) 23:16:19
>>463
Console.WriteLine
0468デフォルトの名無しさん2009/02/01(日) 23:38:10
System.Diagnostics.Debug.WriteLine
System.Diagnostics.Trace.WriteLine

Diagnosticsのつづりが難い
0469デフォルトの名無しさん2009/02/02(月) 08:20:38
>>468
常識
0470デフォルトの名無しさん2009/02/02(月) 18:51:31
サブプロシージャのところはByBalでなくDimでもいんだろうか
0471デフォルトの名無しさん2009/02/03(火) 00:25:01
日本g
0472デフォルトの名無しさん2009/02/03(火) 11:03:37
ヴェクターで送金しなくても使用制限無しのシェアウェアを公開して5年で1700人が使ってるんだけど
まだ入金が一回もないんだけど?
0473デフォルトの名無しさん2009/02/03(火) 11:15:47
ネタか誤爆だろうけど
ダウンロード数＝使用者数じゃないだろボケ
0474デフォルトの名無しさん2009/02/03(火) 11:26:36
本人ですら「ヴェクター」なんて表記してない
0475デフォルトの名無しさん2009/02/03(火) 12:38:34
最初はフォームにベタ貼りだったのをタブコントロールに移行しようとすると大変じゃないか?
0476デフォルトの名無しさん2009/02/03(火) 13:47:43
つ[カット＆ペースト]
0477デフォルトの名無しさん2009/02/03(火) 13:52:41
タブコントロールの中にフォームを開けば簡単だよ。
0478デフォルトの名無しさん2009/02/03(火) 14:14:22
もっと小学生でもわかるように
0479デフォルトの名無しさん2009/02/03(火) 14:16:26
http://dobon.net/vb/dotnet/form/formwithinform.html
これを応用する
0480デフォルトの名無しさん2009/02/03(火) 14:18:30
フォームのモードレスとかわけわかめ
0481デフォルトの名無しさん2009/02/03(火) 14:22:01
入門書を買って来い
0482デフォルトの名無しさん2009/02/03(火) 14:24:11
Dim f As New Form2
f.TopLevel = False
f.FormBorderStyle = Windows.Forms.FormBorderStyle.None
f.Visible = True
TabPage1.Controls.Add(f)

ほらできた
0483デフォルトの名無しさん2009/02/03(火) 14:25:37
おk
0484デフォルトの名無しさん2009/02/03(火) 14:26:15
Doeventsとかくだけならまだしも
Application.Doeventsと書くのに疲れちゃんだけど
0485デフォルトの名無しさん2009/02/03(火) 14:29:29
そんな気軽に使うなってことだよ
使う必要ないし
0486デフォルトの名無しさん2009/02/03(火) 14:32:01
DoEventsは危険すぎる
0487デフォルトの名無しさん2009/02/03(火) 14:40:14
Dim i As Integerを各プロシージャに書くのは体力が持たないので
Mojuru.なんとかかんとかみたいな標準モジュールに1回かくだけで
各プロシージャにしかスコープがない究極の変数ってないの?
0488デフォルトの名無しさん2009/02/03(火) 14:47:47
体力が持たない（笑）
0489デフォルトの名無しさん2009/02/03(火) 14:50:56
標準モジュール（笑）
0490デフォルトの名無しさん2009/02/03(火) 14:59:10
vb2008からなら、ローカルのIntegerや文字列型は推論をつかってるな。
dim i = 0, j = 0, msg = "hoge"
0491デフォルトの名無しさん2009/02/03(火) 15:07:04
ヴァリアントのことかい
0492デフォルトの名無しさん2009/02/03(火) 15:10:07
違うよ型推論だよ
VB2008でOption Infer Onにしてれば，右辺の型から型が自明な変数は型の記述を省略できる
0493デフォルトの名無しさん2009/02/03(火) 15:15:25
2005のパッチファイルでそうしてほしいわビルゲイツ
0494デフォルトの名無しさん2009/02/03(火) 15:17:43
>>490
きめぇ
0495デフォルトの名無しさん2009/02/03(火) 15:19:06
パッチで言語のバージョン変わるとかありえないから
0496デフォルトの名無しさん2009/02/03(火) 15:19:57
もう一回宣言するだけで変数が使えるように
グローバル変数だけ使うわ
これで手もつかれんだろ
0497デフォルトの名無しさん2009/02/03(火) 15:28:56
ファイルのロックを解除したいんですが、
VB.netでできませんか？

やりたいことは
あるアプリケーションの起動中に
常にロックされているファイルがあって
（安全か安全じゃないかは後で確認するとして）
それをかいくぐってファイルを差し替えたいんです。
0498デフォルトの名無しさん2009/02/03(火) 15:39:52
>>497
無理です。
0499デフォルトの名無しさん2009/02/03(火) 15:42:25
また怪しげなことを…
んな事できたらもうそれは「ロック」ちゃうやろ。
0500デフォルトの名無しさん2009/02/03(火) 15:44:29
WindowsUpdateですらファイルを差し替えるために
再起動を要求するというのに
0501デフォルトの名無しさん2009/02/03(火) 15:50:11
方法を探していろいろ検索しているうちに
「Unlocker」というフリーソフトを見つけまして
その機能の一部を再現できれば可能かと思いまして＾＾；
0502デフォルトの名無しさん2009/02/03(火) 15:53:54
そのアプリ作ってるところにファイルロックする機能無くせって文句言え
0503デフォルトの名無しさん2009/02/03(火) 15:55:23
>なお、本ソフト上で任意ファイルのロックを解除すると、そのファイルを読み込んでいるソフトが強制終了してしまうことがある。場合によってはWindowsの動作が不安定になる可能性もあるので、自己責任で利用してほしい。

こんなんでいいのかよ
0504デフォルトの名無しさん2009/02/03(火) 15:55:33
497は普通の人すぎて飛躍した事は思いつかないからあきらめろ
0505デフォルトの名無しさん2009/02/03(火) 16:05:41
>>503
＞（安全か安全じゃないかは後で確認するとして）
とは書きましたように危険は承知の上です。
使うのは自分とコアな同志のみなので。


>>498-504ありがとうございました。
ここには解はないようなので諦めます。
0506デフォルトの名無しさん2009/02/03(火) 16:09:23
ここのやつらは
自分がそれを作る必要がでてきたらできるんだ
ただいままでは作る必要がなかったからな
0507デフォルトの名無しさん2009/02/03(火) 16:15:28
上でDBの質問したものなんだが
SQLSERVERに対して
TransactionをSerializableで実行して

nowaitを付加した
UPDATE HOGETBL with (nowait) SET moge = 'ABC'
を発行したんだが

Executeした段階でタイムアウトするまでVBの実行が止まってしまう

これはSerializableのトランザクションだと「nowait」は無視されてしまうと言うことなんだろうか？

ちなみにReadComittedでトランザクションかけた場合は即時にロックエラーが出た
0508デフォルトの名無しさん2009/02/03(火) 17:39:18
升
0509デフォルトの名無しさん2009/02/03(火) 17:46:30
Serializableなんて使ったことないよ
0510デフォルトの名無しさん2009/02/03(火) 21:49:10
VBで専ブラみたいなの出来ます?
応用してみたいんですが
0511デフォルトの名無しさん2009/02/03(火) 21:52:17
C# で作られてる専ブラってなかったっけ？ C# でできることはほぼ可能。
0512デフォルトの名無しさん2009/02/03(火) 22:24:04
プラットフォーム呼び出しでStringの配列をDLLに渡して、
戻ってきた文字の文字コードがなぜかANSIのまま

なぜか文字化けしとるんよ・・・
0513デフォルトの名無しさん2009/02/03(火) 22:26:49
>>512
きちっとマーシャリングしてる？
0514デフォルトの名無しさん2009/02/03(火) 22:54:27
CharSetは適切?
0515デフォルトの名無しさん2009/02/03(火) 22:55:19
テキストボックスに文字（改行含めて）入力していくごとにそのテキストボックスのサイズを
ちょうど入力されている文字を表示できるサイズに変更していく方法ってないですかね？
0516デフォルトの名無しさん2009/02/03(火) 22:56:39
>>515
そんなUI本当に使いたいと思う？
っていうか、君以外にそんなことやってるアプリ見たことある？
0517デフォルトの名無しさん2009/02/03(火) 22:59:04
Web の UI でないこともないけどな。
0518デフォルトの名無しさん2009/02/03(火) 22:59:24
センドキーってのはあるフォームの特定のコントロールにおくれないの?
0519デフォルトの名無しさん2009/02/03(火) 23:11:48
>>515
TextChangedイベント見て
Graphics.MeasureString等で計測して幅広げりゃいいんじゃね?
0520デフォルトの名無しさん2009/02/03(火) 23:13:06
>>518
SendMessageなら送れるんじゃない
0521デフォルトの名無しさん2009/02/03(火) 23:16:42
むぅ
0522デフォルトの名無しさん2009/02/03(火) 23:17:01
>>519
なるほど。
やってみます。
ありがとうございます。
0523デフォルトの名無しさん2009/02/03(火) 23:17:45
>>513
>>514
現在、下記のように定義しています
何か不足しているのでしょうか？

Declare Ansi Function MyFunc Lib "hoge.dll" Alias "hoge" ( _
<[In](), Out(),MarshalAs(UnmanagedType.SafeArray, SafeArraySubType:=VarEnum.VT_BSTR)> _
ByRef Array(,) As String) As Integer
0524デフォルトの名無しさん2009/02/03(火) 23:21:03
C#のコードだけどw

private void textBox1_TextChanged( object sender, EventArgs e )
{
    string s = this.textBox1.Text;

    using( Graphics g = this.CreateGraphics() )
    {
        using( StringFormat sf = new StringFormat() )
        {
            sf.LineAlignment = StringAlignment.Near;
            
            SizeF size = g.MeasureString( s, this.textBox1.Font );
            
            this.textBox1.Width = (int)size.Width + 16;
            this.Width = this.textBox1.Width + 32;
        }
    }
}
0525デフォルトの名無しさん2009/02/03(火) 23:22:28
>>523
hoge.dllのもとのシグニチャはどうなってんの?
BSTRってCOM関係だよね
0526デフォルトの名無しさん2009/02/03(火) 23:27:59
A-Z0-9のような普通の文字は化けてますか？
それともマルチバイト系の文字だけですか？
0527デフォルトの名無しさん2009/02/03(火) 23:31:53
つかBSTRはUNICODEだが
0528デフォルトの名無しさん2009/02/03(火) 23:32:25
>>525
int (中略) hoge(LPSAFEARRAY FAR * psa);
です。

0529デフォルトの名無しさん2009/02/03(火) 23:33:51
>>516
これも俺へのレスでした。気づきませんで申しわけない。
ペイントみたいな描画ソフト作っててその中で文字入力をするときに使う予定です。
と言っても入力、編集時だけのダミーな感じですが。
ダミーなんで見たことあるのかどうかよくわかりません。
0530デフォルトの名無しさん2009/02/03(火) 23:45:13
>>524
ちらっと見かけたんですが、
using( Graphics g = this.CreateGraphics() )
{
using( StringFormat sf = new StringFormat() )

この２ステップって
using( Graphics g = this.CreateGraphics() )
using( StringFormat sf = new StringFormat() )
{
}
こういう文法でも等価ですよね？
0531デフォルトの名無しさん2009/02/03(火) 23:48:48
>>530
いっしょ。
VB的にはこうかな。>>458 のような書き方になる。
05325302009/02/03(火) 23:52:03
>>531
ありがとうございます。
0533デフォルトの名無しさん2009/02/04(水) 00:11:45
On Error Resume Next
はいっぱい使った方がいい?
0534デフォルトの名無しさん2009/02/04(水) 00:19:47
ILDasmで調べてみると分かるけど変なコードを生成してるよ。
0535デフォルトの名無しさん2009/02/04(水) 00:25:18
うわぁぁぁぁぁ
中括弧でじんましんがぁぁぁぁぁ
05365152009/02/04(水) 00:40:16
>>524
これも俺へのレスのような気がするｗ

ありがとうございます。
ＨｅｉｇｈｔはMeasureString（）.Height×行数で合うんすかね？
0537デフォルトの名無しさん2009/02/04(水) 03:38:09
.jpgをエクスプローラから開くと
VBアプリが起動してその画像を表示する
というアプリはどうつくるんだろう
0538デフォルトの名無しさん2009/02/04(水) 04:05:04
VB 関連付け、でぐぐれば幾らでも出てくると思うが
0539デフォルトの名無しさん2009/02/04(水) 10:54:48
エクスプローラの編集→元に戻す
っていうのは具体的な戻す内容がわからないので
もっといいやつのつくりかたきぼんぬ
0540デフォルトの名無しさん2009/02/04(水) 11:06:44
>>539
ステータスバーに戻す内容が表示されてないか
0541デフォルトの名無しさん2009/02/04(水) 11:27:56
なるほろ
0542デフォルトの名無しさん2009/02/04(水) 11:35:31
VBに組み込めるお勧めのテキストエディタコントロール
教えてください。
0543デフォルトの名無しさん2009/02/04(水) 11:40:24
C:\>assoc .jpg
.jpg=jpegfile

C:\>ftype jpegfile
jpegfile=rundll32.exe C:\WINDOWS\system32\shimgvw.dll,ImageView_Fullscreen %1

C:\>
0544デフォルトの名無しさん2009/02/04(水) 20:24:41
Dim App As Application
App.DoEvents()

これでエラーなのはなぜだろう
0545デフォルトの名無しさん2009/02/04(水) 20:27:16
エラーメッセージを見てもわからない？
0546デフォルトの名無しさん2009/02/04(水) 20:27:45
ぬるぽ！（ぬるれ？）
エラーメッセ見ればわかるだろ！
0547デフォルトの名無しさん2009/02/04(水) 20:29:13
エラーメッセージが抽象的な文すぎてわからんわ
0548デフォルトの名無しさん2009/02/04(水) 20:31:18
これでわからないようなら止めた方がいいんじゃない？ 向いてないよ。
0549デフォルトの名無しさん2009/02/04(水) 20:31:25
好きなだけ堪能してきていいよ。
http://pc11.2ch.net/test/read.cgi/tech/1203689674/l50

定義はSharedだな。
Public Shared Sub DoEvents
0550デフォルトの名無しさん2009/02/04(水) 20:32:47
Dimを書き換えたら

Public Shared App As Application


ますますおかしくなったぞ
0551デフォルトの名無しさん2009/02/04(水) 20:34:25
趣味のプログラミングで世の中には迷惑かけんのでさっさと正解かけこの世の中を良くできないおまえたちどもめおまえたちは人間が求める究極のものをさっさとつくりやがれ
0552デフォルトの名無しさん2009/02/04(水) 20:35:30
つーかこれ、例外出ないのな。知らなかったｗ
0553デフォルトの名無しさん2009/02/04(水) 20:37:55
Shared
宣言された 1 つ以上のプログラミング要素が、クラス全体または構造体全体に関連付けられ、クラスまたは構造体の特定のインスタンスに関連付けられないことを指定します。
－－－－－－－－－－－－－－－－－－－－－－－
で、結局どうすれば
Appの3文字書くだけですむようになるんだ
0554デフォルトの名無しさん2009/02/04(水) 20:41:11
>>553
Imports App = System.Windows.Forms.Application
0555デフォルトの名無しさん2009/02/04(水) 20:42:21
ApplicationをAppと省略したくなるほどDoEventsがあふれたコードは見たくないな
0556デフォルトの名無しさん2009/02/04(水) 20:43:07
そんなんとっくにためしてるんだぜ
そもそも
Imports VB=
ぐらいよくつかわ
0557デフォルトの名無しさん2009/02/04(水) 20:43:34
ぐらいよくつかうわ
0558デフォルトの名無しさん2009/02/04(水) 20:44:53
しかもちゃんとApp.Eventsの間は各コントロールをenable falseしとるからおまえらの心配にはおよばんは
0559デフォルトの名無しさん2009/02/04(水) 20:46:37
趣味のはんいでこれだから仕事してたらおまえらなんかとっくにこえてたわけだおまえらよかったな
0560デフォルトの名無しさん2009/02/04(水) 20:48:43
はぁ。ム板にも ID 導入してほすぃ・・・
0561デフォルトの名無しさん2009/02/04(水) 21:22:41
VB関係のスレは特にキチガイが紛れ込みやすいから仕方ないね
0562デフォルトの名無しさん2009/02/04(水) 21:28:28
APIスレより酷いもんな
0563デフォルトの名無しさん2009/02/04(水) 22:30:13
MsgboxのいんすうにMsgboxのLetとTop座標をしていする項目が無い件について
0564デフォルトの名無しさん2009/02/04(水) 22:33:22
場所指定して出すもんじゃないから。
0565デフォルトの名無しさん2009/02/04(水) 23:15:44
い・・・引数
0566デフォルトの名無しさん2009/02/04(水) 23:20:17
ウィドゥスくらい指定できてもよさそうなのにな。
0567デフォルトの名無しさん2009/02/04(水) 23:59:00
引数分解ｗ
0568デフォルトの名無しさん2009/02/04(水) 23:59:53
KeyPressイベントのKeyCharに対応する表のようなものってMSDNの中にあるのでしょうか？
VB6.0で言うKeyCodeの表みたいな感じです。
0569デフォルトの名無しさん2009/02/05(木) 00:02:38
イベントハンドラにほにゃららEventArgsというのがあるからそれを調べてみて
0570デフォルトの名無しさん2009/02/05(木) 00:03:24
KeysですよKey"s"
0571デフォルトの名無しさん2009/02/05(木) 00:03:35
KeyCharはChar型なんだから対応も何も無いもんだ
0572デフォルトの名無しさん2009/02/05(木) 06:07:47
VS2005でスマートデバイス向けのソフトを作る練習をしています。
手始めにCSV形式のファイルを読込んでDBファイルに追加するプログラムを作ろうとしました。
単純に「,区切りで取り出せばいいや」と考えていたんですが、""で囲まれた,を含む
項目を正しく切り分けられません。どう対処すればいいですか？
今のコードは概ねこんな感じです。
Using txtReader as IO.TextReader = new IO.StreamReader(FILENAME, System.Text.Encoding.GetEncoding("shift-jis"))
Dim columns as String = txtReader.ReadLine().Split(",")
While columns IsNot Nothing
myModule.SetRowToDBFile(colomns)
columns = txtReader.ReadLine().Split(",")
End While
End Using
0573デフォルトの名無しさん2009/02/05(木) 07:15:37
>>572
CSV を直接読むことってできなかったっけ?
0574デフォルトの名無しさん2009/02/05(木) 07:23:15
>>572
ちゃんと1文字ずつ見ていって”がきたらフラグを立てる
とかしていけばいい
0575デフォルトの名無しさん2009/02/05(木) 08:55:07
というか、それしか手はないな。
クォーテーション中の改行を許す仕様だと
またちょっと面倒だけど。

>>573
PCだと Microsoft.VisualBasic.FileIO.TextFieldParser で
一発なんだけどね。
0576デフォルトの名無しさん2009/02/05(木) 08:57:31
ADOは使えないのかな
0577デフォルトの名無しさん2009/02/05(木) 10:04:58
>>573
.NET CFでは不必要な機能として省略されてるみたいなんです。

>>574-575
えーと、その、それって速度的には大丈夫でしょうか？
処理するつもりのデータが10000件前後あるので、ちょっと心配なんですが。
0578デフォルトの名無しさん2009/02/05(木) 10:08:02
>>577
しらねーよ
やってみろよｗ
0579デフォルトの名無しさん2009/02/05(木) 10:16:23
StreamReader.ReadLineも一文字ずつ調べてって改行を探してるんだが
0580デフォルトの名無しさん2009/02/05(木) 11:23:18
>>579
あっはっは、フレームワーク内部でそんな事してるわけｎ

…やっとる！しかも二重の Do ～ Loop While ループで！
0581デフォルトの名無しさん2009/02/05(木) 11:25:31
Microsoft.VisualBasic.FileIO.TextFieldParser の実装を Reflector で確認すればいいんだな。
0582 [―{}@{}@{}-] デフォルトの名無しさん2009/02/05(木) 11:44:51
>>581
VS2008なら.NET内部にステップインできなかったっけ？？
0583デフォルトの名無しさん2009/02/05(木) 11:59:09
えー？中身そんなだったんですか？(;´д｀)
素直に1文字づつ調べていくコード書いてみます。
ありがとうございました。
0584デフォルトの名無しさん2009/02/05(木) 12:01:37
System.Transanctionsについて詳しくかいてあるHPとかないかな？
ググっても参考になりそうなサンプルがなかなか出てこない

サンプル見るとUsingで囲ってあるんだが
このスコープ範囲でないとトランザクション処理は出来ないのかな？

出来ればフォーム変数単位でトランザクションかけたいんだが
0585デフォルトの名無しさん2009/02/05(木) 12:18:47
コンピュータがひとつづつ見ていく単調作業のくりかえし
なのは言語やってるかどうか以前の常識というか生れつき理解していなければならないことなんだが
0586575=5802009/02/05(木) 12:24:48
>>585
それがまさかCILレベルで書かれたループだとは思わなかった、
という話をしてたつもりなんだが。
0587デフォルトの名無しさん2009/02/05(木) 12:55:30
>579-580
超勇気出た。質問した本人と無関係だけどありが㌧
0588デフォルトの名無しさん2009/02/05(木) 12:58:28
そういえば、正規表現のエンジンもものすごく地道な処理してるよね
0589デフォルトの名無しさん2009/02/05(木) 12:58:59
>>587
ひょっとしたらおまいのループはもっといい解決法があるかもしれないぞｗ
0590デフォルトの名無しさん2009/02/05(木) 13:07:45
>589
いや、やることはCSVファイルの区切り記号違い版を読み込むみたいな感じなんだｗ
0591デフォルトの名無しさん2009/02/05(木) 13:14:04
string自体がcharの配列だからな
.NET CFってStringBuilderって使えないのか？
調べるつもりは全くない
0592デフォルトの名無しさん2009/02/05(木) 13:25:07
壊れてるCSVが作成されちゃうようなソフトを作ってるのはおまえらか
0593デフォルトの名無しさん2009/02/05(木) 14:01:22
CSVなんてもともといい加減な書式だが？
たぶん共通してるだろうと思われるのは1レコード1行ということぐらいだ
それすらどうにでも変えられるが
0594デフォルトの名無しさん2009/02/05(木) 14:05:28
>593
ttp://tools.ietf.org/html/rfc4180
0595デフォルトの名無しさん2009/02/05(木) 14:17:35
RFCなんて守られてたら現場が苦労しないってｗ
0596デフォルトの名無しさん2009/02/05(木) 14:26:04
2005年に作られた超後付け仕様じゃなー
0597デフォルトの名無しさん2009/02/05(木) 14:34:58
まあ、使ってると拡張したくなる場面はたくさんあるしねえ
代わりになりそうなXMLはMSのせいでクダグダだしｗ
なんか新しい汎用テキストフォーマット作ってくれないだろうか
0598デフォルトの名無しさん2009/02/05(木) 15:06:30
XMLってグダグダなの？
0599デフォルトの名無しさん2009/02/05(木) 15:09:11
ODF/OOXMLのことじゃね
0600デフォルトの名無しさん2009/02/05(木) 15:11:05
SQLサーバーを無料にすればすべて解決
0601デフォルトの名無しさん2009/02/05(木) 15:20:39
>>600
つ[Express Edition]
0602デフォルトの名無しさん2009/02/05(木) 15:22:00
System.Drawing.Pens.RedなどのPensネームスペースで用意されているPenオブジェクト(クラス)と
自分でNewしたPenとでは何が違うのでしょうか。
p = Pens.Red
とした場合、p.Dispose()をするとエラーが出ますが
p = New Pen(Color.Red)
とした場合は、p.Dispose()はエラーなく行えます。
感覚的にライブラリで提供されているものだからというのは理解できるのですが
両者が具体的に何が違うのかがいまいち理解ができないでいます。
0603デフォルトの名無しさん2009/02/05(木) 15:27:20
インスタンス作らないんじゃDisposeしようがない
0604デフォルトの名無しさん2009/02/05(木) 15:43:08
インスタンスが作られていないのですね。了解しました。
0605デフォルトの名無しさん2009/02/05(木) 17:39:07
インスタンスは作られているけど、おおもとはWindowsちゃんが作ったの。
勝手に解放すると怒られるのね
0606デフォルトの名無しさん2009/02/05(木) 18:38:44
ちょい質問
FormLoadで
    Private Sub frm1Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Call 処理１
        Call 処理２
　　End Sub
----------------------------------------------------------
   Private Sub 処理1()
        if なんかの条件 = true
　　　　    Me.Close
        end if
   End

ってやると
処理１を抜けた後に処理２を実行してしまうんだけど
処理2を飛ばしてそのままフォームを閉じることはできないんだっけ？


0607デフォルトの名無しさん2009/02/05(木) 18:45:31
.NETでCallを書いてるのがバグの原因
0608デフォルトの名無しさん2009/02/05(木) 18:57:20
LoadイベントでCloseしちゃ駄目
0609デフォルトの名無しさん2009/02/05(木) 19:05:13
Exit
0610デフォルトの名無しさん2009/02/05(木) 19:05:49
おもしろいからそのままでいいよ
06116062009/02/05(木) 20:56:53
ﾄﾝｸｽ
解決しました
0612デフォルトの名無しさん2009/02/05(木) 23:23:52
VB完全初心者です。
プログラムを起動させて、そのプログラムのウインドウにファイルをドラッグアンドドロップすることで
そのファイルの決められた位置の文字列をそのファイルのファイル名に書き込むような
プログラムを作りたいのですが、
ドラッグアンドドロップすることで、勝手にファイルを読み込んでくれるようにするにはどうしたら良いのでしょうか？
全く分かりません。
どなたかよろしくお願い致します。
0613デフォルトの名無しさん2009/02/05(木) 23:31:37
>>612
>>2-5 質問の範囲が広いから、まずテンプレの適当なサイトをあたって
0614デフォルトの名無しさん2009/02/05(木) 23:32:25
Formがドロップを受け付けるようにする。AllowDrop プロパティをtrueにしましょう
↓
ドロップイベントの実装。MSDNのControl.AllowDrop プロパティのところ見ろハゲ
↓
ファイル名が取得できるから、FileStreamでもつかって読みましょう
↓
System.IO.Fileうんちゃらあたりにリネームする機能があるから探せハゲ
0615デフォルトの名無しさん2009/02/05(木) 23:36:52
VB初心者以前にネット初心者だな。
VBとかドラッグアンドドロップとかそういう関連しそうなキーワード組み合わせてぐぐりまくれ
わけわからなかったら小一ヶ月初心者サイト一通り読んで試して慣れてからどうぞ


…と書こうしたらすでに614のレスが付いていた件
0616デフォルトの名無しさん2009/02/05(木) 23:51:00
>615
お前が一番痛い。。
0617デフォルトの名無しさん2009/02/05(木) 23:56:08
VBは中学校に誘導してやれ
0618デフォルトの名無しさん2009/02/06(金) 01:15:54
VB.NETでシングルタスクのFileSystemObjectやADOをつかうのがチョーぜいたくでおぬぬめ
0619デフォルトの名無しさん2009/02/06(金) 02:16:18
テキストファイル内に行が何行あるか調べる方法を教えさせてやる
0620デフォルトの名無しさん2009/02/06(金) 02:18:23
上から数える
0621デフォルトの名無しさん2009/02/06(金) 02:43:04
解決した

Do Until sr.Peek() = -1
count += 1
sr.ReadLine()
Loop
0622デフォルトの名無しさん2009/02/06(金) 03:03:23
ListViewにたくさんのデータを登録する速いやり方を教えろ
0623デフォルトの名無しさん2009/02/06(金) 03:29:40
円高の時は輸出と輸入どっちが便利?
0624デフォルトの名無しさん2009/02/06(金) 06:36:44
>>622
仮想リストビューがおすすめ
0625デフォルトの名無しさん2009/02/06(金) 09:18:27
BeginUpdate/EndUpdate
0626デフォルトの名無しさん2009/02/06(金) 10:01:25
>>623
どっちが便利、とか訊かれてもｗ
0627デフォルトの名無しさん2009/02/06(金) 10:02:28
うわあああああああああああああああああああああ
0628デフォルトの名無しさん2009/02/06(金) 10:04:07
VBって下位互換性はありますか？
6で使ったファイルを.NET2003や2008で読み込ませることは可能なのでしょうか？
0629デフォルトの名無しさん2009/02/06(金) 10:08:20
ソースレベルのは無いな
プロジェクトを読み込ますとVSが超頑張って変換してくれる
精度は今一らしいが
DLLレベルなら一応COM参照は可能だ
0630デフォルトの名無しさん2009/02/06(金) 10:09:58
.NETは後方互換
6.0→.NETは互換性なし
変換できるけど動く保証はない
0631デフォルトの名無しさん2009/02/06(金) 10:15:53
知識の互換性も無いので注意
つまり別物
0632デフォルトの名無しさん2009/02/06(金) 11:03:44
>>630
>変換できるけど動く保証はない
「変換できませんでした」が数100個出力され
エラーメッセージを頼りにひとつひとつ手で修正し
ようやくエラーなしになったのでためしに動かしてみたら
びっくりする挙動をとる、というのがお約束です。
0633デフォルトの名無しさん2009/02/06(金) 11:56:01
VB.Net 2003なんだけど、付属のCrystalReportsのパッチを探してるんだけど
なんだかビジネスオブジェクツのサイト、知らない間にかなり模様替えされててorz
で、そこには2005か2008のものしかなかったよ。
2003用のパッチ、どこかに残ってない？
0634デフォルトの名無しさん2009/02/06(金) 13:22:38
ググれ…じゃないな、えーと…とにかく検索しろよ。
ttp://www.microsoft.com/downloads/results.aspx?pocId=&freetext=2003%20crystal%20reports&DisplayLang=ja
0635デフォルトの名無しさん2009/02/06(金) 14:13:57
横からだがMSも自前でパッチ出してたのか
SAPになってて俺もどうしようかと思ってた
0636デフォルトの名無しさん2009/02/06(金) 14:34:53
ExpressEditionのどこにクリレポがあるんだ?
0637 [―{}@{}@{}-] デフォルトの名無しさん2009/02/06(金) 14:39:05
>>636
そう書かれると、なんかえろいなｗ
0638デフォルトの名無しさん2009/02/06(金) 21:46:34
>>624
具体的に教えろ
0639デフォルトの名無しさん2009/02/06(金) 21:53:11
　ﾊ,,ﾊ
（ ﾟωﾟ )
0640デフォルトの名無しさん2009/02/06(金) 21:56:36
　　　　　　ﾊ,,ﾊ
　　　　　（ ﾟωﾟ )　　お断りします
　　　　／　　 　＼
　 ((⊂ 　） 　 ﾉ＼つ))
　　　　　（＿⌒ヽ
　　　　　　ヽ　ﾍ　}
　ε≡Ξ　ﾉノ ｀J
0641デフォルトの名無しさん2009/02/06(金) 23:02:03
すみません。
教えてください
ks
0642デフォルトの名無しさん2009/02/06(金) 23:28:41
mp3を再生するときに周波数の音量でグラフが
出るやつよくあるじゃないですか？
ああいうのってVB.NETで作れますか？
もし作れるならヒントください！
0643デフォルトの名無しさん2009/02/07(土) 00:12:52
RTB1.Text = Replace(RTB1.Text, "ABC" & vbCrLf & "DEF", "")
間違いを見つけよ (早稲田理工2009)
0644デフォルトの名無しさん2009/02/07(土) 00:14:20
>>643
VBを使ってること自体ま（ｒｙ
0645デフォルトの名無しさん2009/02/07(土) 01:07:19
それなりに大きいテキストファイルの行末に
VbCrとVbLfとVbCrLf
が混ざっていて各行末は三つのうちどれかひとつなわけだが
すべてをVbCrLfにするコードは?
0646デフォルトの名無しさん2009/02/07(土) 03:02:27
ReadLineしてWriteLineすりゃいいんじゃねーの
ﾎｼﾞﾎｼﾞ
0647デフォルトの名無しさん2009/02/07(土) 08:53:20
>>643
早稲田に利口はいn(ry
0648デフォルトの名無しさん2009/02/07(土) 09:05:45
ドラッグパネルについての質問です。

ドラッグして動かしてリロードしても、位置が戻らない方法を教えて下さい。

@ITのプロファイル機能を利用するページを試したのですが、あのページ通りに行っても、位置は戻ってしまいました。

クッキーを用いたやり方を検討中で試していますが、座標値の取得方法などが分かりません。

参考サイトでもいいので、もしよければ教えて下さい。お願い致します。
0649デフォルトの名無しさん2009/02/07(土) 10:04:21
Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
VB6にはなかったsenderとかeとはなんなのかね
0650デフォルトの名無しさん2009/02/07(土) 10:30:56
ぐぐる
デバグ中に式をウォッチして中身を確認する
入門書買って来る
0651デフォルトの名無しさん2009/02/07(土) 10:36:12
そんなんじゃここで聞く意味がないだろ
0652デフォルトの名無しさん2009/02/07(土) 10:59:42
　　　　　　ﾊ,,ﾊ
　　　　　（ ﾟωﾟ )
0653デフォルトの名無しさん2009/02/07(土) 11:17:22
ヒントレスが付いてるじゃん
ぐぐったらレス待つよりも早く見つかるよ
0654デフォルトの名無しさん2009/02/07(土) 11:37:22
>>404
>>622
>>638
>>649
0655デフォルトの名無しさん2009/02/07(土) 12:39:49
VBマガジンとかVB.NETマガジンが本屋のなかったんだけどどうした?
0656デフォルトの名無しさん2009/02/07(土) 12:58:34
ggrks
0657デフォルトの名無しさん2009/02/07(土) 21:47:26
はいっ
VisualBasic2005　と　VisualBasic2008　って具体的にどこが違うんですか？

これからvb.net学んでみようかと思ってるんですけど、
春から入社する会社がvb2005を使っているらしいんです
んで、それなら同じ2005を使っとけって感じな話ですけど、

新しいもの好きのわたしとしては完全に互換性があって、2008でできることは2005でできるのならば
2008を入れたいわけなんですよｗ

そこらへんどうなんでしょか？
0658デフォルトの名無しさん2009/02/07(土) 21:51:22
ハードディスク
M:
の空き容量を得る方法がわからない
0659デフォルトの名無しさん2009/02/07(土) 21:59:09
普通にDriveInfo.TotalFreeSpaceじゃいかんの？
こんなの知らないし使ったことなかったが、System.IO名前空間の一覧から
これに辿り着くまでに30秒とかからなかったぞ
0660デフォルトの名無しさん2009/02/07(土) 22:01:00
VB2005は.NETFramework2.0だが、
VB2008（3.5がデフォ）なので、2.0対応のを作ろうとするとイチイチめんどくさい。

あとはVB2008の宣伝文に2005からの変更･改良点とか書いてあるだろうからまずはそこから見てくれば？

0661デフォルトの名無しさん2009/02/07(土) 22:07:41
>>660
ほむほむ、.NETFrameworkのバージョンによってソースの書き方がちがうのかな？
みたいなかんじがあるのですかー
正直.netって以外と不便そうですね＾＾；
0662デフォルトの名無しさん2009/02/07(土) 22:07:59
通常のアルファベット(Ａ～Ｚ、ａ～ｚ)と、日本語や他言語とを区別したい場合にはどう判定するのが良いんでしょうか。
0663デフォルトの名無しさん2009/02/07(土) 22:14:08
9ケタ固定の数字にカンマつけるのは
String = Format( 123456789, "###,###,###")
と書けるけど
ケタすうがつねにかわる数字の場合はどうするんだ?
0664デフォルトの名無しさん2009/02/07(土) 22:19:36
String = Format( 123456789, "#,###")
だけで全桁対応だろｗ
0665デフォルトの名無しさん2009/02/07(土) 22:20:46
　 　 　 　 　 　 　 　 ／. : : : /. : : : : /. : : : : : : : : : :i: : : : : :｀ヽ
　 　 　 　 　 　 　 ／. : : : : /／.:./ :/.: : : :/. : : : : /;ﾊ: : : : : : : :',
　 　 　 　 　 　 　 　.:/_＿／. : :/ :/.:＼／ :／.: .://　!: :i: : : : : : :
　 　 　 　 　 　 　 .:./. :｀7. : : .:.:ｉ:,ｲ:.:／i｀Ｘ´/ :／/　｜.:|:.: :i : : ､i
　 　 　 　 　 　 　 /.: :/厶ィ7／||丁下ヌヽ/Ｘ´ /　　 !_厶: :|: : : :＼
　 　 　 　 　 　 　 . .:/⌒ヽＹ.: :.:lj八.弋:.:ﾉｿ｀　　　 ≦リ|:.:ﾉﾉ.: :/丁｀ヽ ﾋﾟｷｰﾝ!!
＿＿＿＿＿＿＿. :{{　　ゝ|: : : l|　　 ー '　　　　　丁下ﾇｲ.: :/!:/ ＿＿人,､＿＿＿＿＿ ＿_＿＿＿_＿＿＿
￣￣￣￣￣￣￣: :ヾ､　ヽ|: : : l|　　 　 　 　 　 　 弋ﾂﾉ/|／ ,ﾘ ￣￣｀＾'｀￣￣￣￣￣￣￣￣￣￣￣￣￣
　 　 　 　 　 　 　 : : : :｀ｰ‐|: : : l|　 　 　 　 　 　 ' 　 ¨　{:.|　　　　　ほむほむ？
0666デフォルトの名無しさん2009/02/07(土) 22:21:36
そんなんどこにも乗ってないんだから
###.##
####.#####
とか毎日何年もかけてみつけたんか
0667デフォルトの名無しさん2009/02/07(土) 22:22:25
そもそもVB6互換関数を使うなと
String.FormatかToStringを使ってくれよw
0668デフォルトの名無しさん2009/02/07(土) 22:23:13
>>666
　　　∧_∧　　　　／￣￣￣￣￣
　 　 (ω・　)ゝ　＜　なんだって？
　 ノ/　 /　　　　　＼＿＿＿＿＿
　　ノ￣ゝ
0669デフォルトの名無しさん2009/02/07(土) 22:27:28
そもそも###,###,###に疑問を持たないのかね
最近のゆとり世代はｗ
0670デフォルトの名無しさん2009/02/07(土) 22:28:48
書いてある。
http://msdn.microsoft.com/ja-jp/library/4fb56f4y.aspx
突き詰めるとこれでいい
Format(1234567, "#,0")
.NET的にはこうか
String.Format("{0:N0}", 1234567)
0671デフォルトの名無しさん2009/02/07(土) 22:29:45
>>404
>>622
>>638
>>649
>>663
0672デフォルトの名無しさん2009/02/07(土) 22:32:23
VB4みたいにデスクトップのアニメを見ながら開発するのはどうするんだ?
0673デフォルトの名無しさん2009/02/07(土) 22:34:07
>>672
VB４をインストールする
0674デフォルトの名無しさん2009/02/07(土) 22:35:09
>>669
何かというと「ゆとり」だの何だのとラベリングしたがる奴が
一番頭悪げ（というか実際悪いだろう恐らく）に見えるぞ。
0675デフォルトの名無しさん2009/02/07(土) 22:36:32
VB4 : 壁紙みながらプログラミン
http://www.ssuet.edu.pk/taimoor/books/0-672-30837-1/06vbu03.gif
0676デフォルトの名無しさん2009/02/07(土) 22:37:08
だってよw
0677デフォルトの名無しさん2009/02/07(土) 22:37:18
4桁カンマとかもできるの?
0678デフォルトの名無しさん2009/02/07(土) 22:42:37
ずぼしだったかｗ
0679デフォルトの名無しさん2009/02/07(土) 22:50:02
Intervalは1分なのに

Sub Timer_Tick
10分かかる処理
End Sub

だったらどうなってしまうんだろぅ
0680デフォルトの名無しさん2009/02/07(土) 22:53:49
Sub Timer_Tick
Thread.Sleep( 600000 )
End Sub

ってやってみれば
0681デフォルトの名無しさん2009/02/07(土) 23:07:46
Windows.Forms.Timer
Timers.Timer
Threading.Timer
で動作が異なるとこだね。
0682デフォルトの名無しさん2009/02/07(土) 23:07:59
この場合スレッドで処理が行われているのとSleep()で寝てるのは
恐らく等価じゃないと思うけどね。

恐らくSleep寝てる場合はタイマのイベントハンドラが（再び）呼ばれるんじゃないの？
0683デフォルトの名無しさん2009/02/07(土) 23:10:54
>662
Char.IsLetter
0684デフォルトの名無しさん2009/02/07(土) 23:17:20
>>682
>呼ばれるんじゃないの
じゃねーよ。やってみてからレスしてください。ウザいだけです。
0685デフォルトの名無しさん2009/02/07(土) 23:21:06
>>684
2chで他人に絡むことしかできない悲しいガキだなお前さん。
0686デフォルトの名無しさん2009/02/07(土) 23:23:27
ということにしたいわけですね
0687６２２2009/02/07(土) 23:56:38
oserks
0688デフォルトの名無しさん2009/02/08(日) 07:45:28
System.IOが返した777888666ByteをGByteにしてユーザーに表示するのは1000で割るのか1024なのかがわからない
0689デフォルトの名無しさん2009/02/08(日) 07:47:03
Windows的には1024
HDDメーカー的には1000
0690デフォルトの名無しさん2009/02/08(日) 10:03:31
GB   1000
GiB  1024
だっけ？最近はややこしいね。
0691デフォルトの名無しさん2009/02/08(日) 10:31:21
>>688
名前空間は何も返さないぞ。

っていうか、別に感謝しろとは言わんが、低レベルな質問を投げるだけ投げて
回答に対するコメントは一切なしなの？
0692デフォルトの名無しさん2009/02/08(日) 10:53:42
わからないと独り言しただけで質問はしてませんが
0693デフォルトの名無しさん2009/02/08(日) 10:55:02
回答者だって
あとで忘れたための自分メモとして書いてるわけなんだから
ITなんてボケたらすぐクビ
0694デフォルトの名無しさん2009/02/08(日) 10:58:53
691はアフォ
0695デフォルトの名無しさん2009/02/08(日) 11:05:25
"あ" < "ん"
はASKI文字コードを比較して真偽を返してくれるのかしら
0696デフォルトの名無しさん2009/02/08(日) 11:11:52
XP + VB2005で開発してます。
Windowsのテーマをクラシックにした場合に、テキストボックスは
TextBox1.BorderStyle = Fixed3D
が設定されていると、窪んだ3Dの表示になりますが、
XPのテーマ（Luna）を適用すると、このような表示になりません。

プロジェクト全体でXP Visualスタイルを無効にすれば良いのはわかっていますが、
テキストボックスのみに適用する方法はないでしょうか？
それっぽく見えるカスタムコントロールを作成するしか手はありませんか？
0697デフォルトの名無しさん2009/02/08(日) 11:31:54
将来パチンコをつくって何十万台も売りたいのでVB.NETのパチンコサンプルきぼんぬ
0698デフォルトの名無しさん2009/02/08(日) 11:32:34
人や動物を狙って打たないでくださいね
0699デフォルトの名無しさん2009/02/08(日) 11:38:40
>>695
うん。

>>696
少なくとも、.NET の機能じゃ無理っぽい。
0700デフォルトの名無しさん2009/02/08(日) 12:52:15
2009/02/08 NHK杯
羽生勝ち
▲７六歩 △３四歩 ▲２六歩 △５四歩 ▲２五歩 △５二飛 ▲５八金右 △６二玉
▲４八銀 △３三角 ▲同角成 △同　桂 ▲６八玉 △２二飛 ▲７八玉 △４二銀
▲４六歩 △７二玉 ▲４七銀 △８二玉 ▲８八玉 △５三銀 ▲７八金 △２一飛
▲９八香 △４二金 ▲９九玉 △９四歩 ▲８八銀 △９五歩 ▲１六歩 △７二銀
▲１五歩 △６四銀 ▲６八金右 △５五銀 ▲３六歩 △４四歩 ▲５六歩 △６四銀
▲３五歩 △同　歩 ▲３八飛 △２五桂 ▲３五飛 △２四歩 ▲４五歩 △２六角
▲３六飛 △４八角成 ▲５八銀 △４五歩 ▲４三歩 △４一金 ▲３三飛成 △３一飛
▲２二龍 △３八飛成 ▲６九銀 △５三銀 ▲１七桂 △同桂成 ▲同　香 △８四桂
▲５五歩 △７六桂 ▲５四歩 △６四銀 ▲４二歩成 △８八桂成 ▲同　金 △７九銀
▲４一と △８八銀不成 ▲同　玉 △５七金 ▲７八金打 △５九馬 ▲７九銀 △３九龍
▲４九歩 △５六歩 ▲４二と △９三玉 ▲５二と △４九龍 ▲６一と △６九馬
▲同　金 △同　龍 ▲８五金 △８四歩 ▲７一角

NHK杯将棋トーナメント　Part206
http://anchorage.2ch.net/test/read.cgi/bgame/1234058400/l50
0701デフォルトの名無しさん2009/02/08(日) 13:17:29
コピペ君って馬鹿だな、まで読んだ。
07026962009/02/08(日) 14:12:10
>>699
そんな気はしてましたけど、やっぱりそうですか。
労力かける価値があるか判断して実装するか考えます。
ReadOnlyのテキストボックスだけをFixedSingleにするようなUIにしたかったんですけどね。
0703デフォルトの名無しさん2009/02/08(日) 17:11:36
数値型や文字列方をいっぱいつかうばあいの変数名は
Dim i,i1,i2,i3 as integer
Dim S,S1,S2,S3 as string
でいい?
0704デフォルトの名無しさん2009/02/08(日) 17:16:58
おｋ
0705デフォルトの名無しさん2009/02/08(日) 17:17:55
これって VB.NET から大丈夫になったんだっけ？
0706デフォルトの名無しさん2009/02/08(日) 17:19:34
For i=1 to 100
Dim S & i.tostring as String
Next
みたいに変数を100個宣言したいんだけどなんでエラーになるん
0707デフォルトの名無しさん2009/02/08(日) 17:23:06
>>706
脳みそ膿んでる発想だな。

変数名はコンパイル時に確定している必要がある。
仮にそんな宣言ができるとして、それで宣言した変数にどうやってアクセスするつもりか？
0708デフォルトの名無しさん2009/02/08(日) 17:23:49
>>706
それは無理
配列を使えば出来る
Dim S(100) as string
0709デフォルトの名無しさん2009/02/08(日) 18:19:28
>>706 は秀逸ｗ
0710デフォルトの名無しさん2009/02/08(日) 19:07:14
TestString = Space(10)
は10個のスペース "　　　　　　　　　　　" だが
スペース以外のもじはわざわざ
S &= "-----------------------------" & vbcrlf
と書かないとたくさんの同一文字列を作れないんだな
0711デフォルトの名無しさん2009/02/08(日) 19:18:04
New String(Char c)
0712デフォルトの名無しさん2009/02/08(日) 19:55:23
ここ数日間しつもんしまくったせいで
インターネットのドキュメントを自動保存するソフトが完成した

個別にはレスはせんが

この作業報告がおまえたちへの最大級の「返信」ということになるだろう

ttp://nyannyan3.minidns.net/up/up002/2009_02_08-CG001.png

ようするに、オレたちはファイルのリンク切れですでに見れなくなるのに毎日なやまされてるわけよ
だからタイマー巡回とか寝ている間巡回が必要だ
0713デフォルトの名無しさん2009/02/08(日) 20:01:37
2chねるをまるごと取り込むソフトもつくったが
ハードディスクがすぐいっぱになっちゃったから
まるごと機能は停止中
0714デフォルトの名無しさん2009/02/08(日) 20:19:51
こうして車輪の再発明が・・・
0715デフォルトの名無しさん2009/02/08(日) 20:31:05
「コマンドラインでファイル操作するソフト作ったよ」とか言う奴出てきたらおもろいなｗ
0716デフォルトの名無しさん2009/02/08(日) 20:50:45
俺使ったこと無いから良く知らないけど、
こういうのってダウンローダっていう部類のソフトじゃないの？
0717デフォルトの名無しさん2009/02/08(日) 20:53:10
wgetで全部出来ました。
0718デフォルトの名無しさん2009/02/08(日) 22:00:39
とうとう京都大学霊長類研究所のアイちゃんもVBアプリを作るようになったか
0719デフォルトの名無しさん2009/02/09(月) 15:46:38
複数の文字列をＡ４用紙にそれぞれ自由に配置して印刷したいのですが
どんな方法でやれば良いでしょうか？
0720デフォルトの名無しさん2009/02/09(月) 16:29:12
Wordを立ち上げます。
0721デフォルトの名無しさん2009/02/09(月) 16:59:12
服を脱いで、System.Drawing.Printing 名前空間にある PrintDocument を作成します。
0722デフォルトの名無しさん2009/02/09(月) 18:21:22
VB2005でサービスアプリケーションを作成しています。

microsoftのサイトのチュートリアルを参考に簡単なサンプルを作成しました。
そして次のステップとして、タスクトレイにNotifyIconを表示したり、それに
ContextMenuをくっつけて設定画面を表示したりしてみようと思ったのですが
タスクトレイにNotifyIconが表示されません。

サービスの OnStart プロシージャでFormをNewしています。
そのFormのNewプロシージャでNotifyIcon1.Visible=Trueにしたり、FormをHide
したりしています。

FormのNewプロシージャの最後にイベントログを吐き出して確認してみたのですが、
NotifyIcon1.Visible=Trueになっています。

何か根本的に間違っているのでしょうか？
サービスアプリケーションでNotigyIconを表示する一般的な方法ってありますか？
07237222009/02/09(月) 18:32:52
×　NotigyIcon
○　NotifyIcon
です...
0724デフォルトの名無しさん2009/02/09(月) 18:45:26
サービスにユーザインタフェースはむりぽ。

ttp://msdn.microsoft.com/ja-jp/library/d56de412(VS.80).aspx
| .NET Framework でサポートされている Windows サービスのクラスは、
| 対話型ステーション、つまりログオンユーザーとの対話をサポートしていません。
| また、.NET Framework には、ステーションおよびデスクトップを表すクラスが
| 含まれていません。Windows サービスが他のステーションと対話する必要が
| ある場合は、アンマネージ Windows API にアクセスする必要があります。
| 詳細については、プラットフォーム SDK の「Window Stations」および
| 「Desktops」を参照してください。
0725デフォルトの名無しさん2009/02/09(月) 18:48:39
サービスはディスクトップとは違うアカウントで動いているから無理じゃねーかな。
ディスクトップとの対話をサービスに許可を入れてもだめだったらあきらめる。
通常のやり方だとSQLServer2Kに付いてたサービスマネージャのやり方で、
サービスと会話するディスクトップアプリを動かして、そいつがNotifyIconを表示する。
07267222009/02/09(月) 18:57:11
レスありがとうございます。

>724
今ちょうどそのあたりを読んでいました。
説明を見て、そりゃそうか、と思いましたorz

>725
まさにSQLServer2000のサービスマネージャみたいにしようと思っていました。
あれって、デスクトップアプリがサービスとやりとりしていたんですね。
作成しようとしていたサービスアプリのちょっとした設定変更やサービスの
再起動や停止をすべて1つのサービスアプリ内で済ませようとしていました。


少し実装方法を検討したいと思います。
ありがとうございました。
0727デフォルトの名無しさん2009/02/09(月) 19:02:28
>>720
義務感なのかなんなのか知らんが無理してレスしなくていいから
寒い

>>721
ありがとう
0728デフォルトの名無しさん2009/02/09(月) 20:39:05
パワーパックをつかったばやいは
ユーザーにはどのファイルをどこに置かせるのかがわからない
0729デフォルトの名無しさん2009/02/10(火) 01:05:59
Form_Loadで読む環境設定ファイルをテキストファイルとして同封した場合どんな書式で書いてるかい?
-----------------------
C:\abc\リストボックス1に読み込ませる.txt
フォームのLeft
フォームのTop
0730デフォルトの名無しさん2009/02/10(火) 03:25:24
If e.KeyCode = Keys.Tab Then
Button1.Focus()
End If

テキストボックスKeyDoweでTab押しても Button1にフォーカスが移動しない
0731デフォルトの名無しさん2009/02/10(火) 11:22:33
>>729
内容を公開しないなら好きに書けばいい

公開するならテキストとだと可読性が下がる
XMLもしくはINIファイルの方がマシ
0732デフォルトの名無しさん2009/02/10(火) 11:39:06
>>728-730 は日本に来て何ヶ月か知らんが
まず日本語から習得しなさい。
0733デフォルトの名無しさん2009/02/10(火) 17:21:43
SQLSERVER2005に接続して
CommandBuiderを使いUPDATEとDELETEのコマンドを自動生成したいのですがうまくいきません

        strSQL = "SELECT * FROM ほげほげ"

        Dim ad As New SqlClient.SqlDataAdapter(strSQL, dbcon)
        Dim cb As New SqlClient.SqlCommandBuilder(ad)

ほげほげテーブルには主キーが設定されてあります

デバッグモードで確認すると.SelectCommandにはコマンドが生成されていますが
DELETE、UPDATE、INSERTは生成されてません

何か足りない設定があるのでしょうか？
（そもそも使い方を間違ってるのでしょうか？）
0734デフォルトの名無しさん2009/02/10(火) 17:45:41
>>733
MSDNを見れば目に入らないかな？
GetDeleteCommand 
GetInsertCommand
GetUpdateCommand
テーブルが変動するとか動的に生成する特別な理由が無いなら、
ウイザードで事前にDataSetやAdapterを生成しておくのをすすめる。
0735デフォルトの名無しさん2009/02/10(火) 18:01:37
>>734
ありがとうございます
cb.Get～でコマンドが生成されているのが確認できました
自動的にそれらのコマンドがDataAdapterに設定される物だと思い込んでました
0736デフォルトの名無しさん2009/02/10(火) 20:27:35
データベースつかえばXML一生使わないと思うんだけどどうだろうか?
0737デフォルトの名無しさん2009/02/10(火) 20:41:25
ねーよｗ
0738デフォルトの名無しさん2009/02/10(火) 23:07:29
ちょっとおしえて
１つのピクチャーボックスに２つの画像を表示したいのですが、
２枚目の画像は白黒２値の画像（文字）です。
白を透明色に指定して１枚目の画像の上に出したいのですが
どうやったら良いでしょうか
instance.MakeTransparent(Color.White)
この方法で指定して表示させたら下の画像が消えてしまいました。
0739デフォルトの名無しさん2009/02/10(火) 23:14:29
ImageAttributesのオブジェクトを作ってSetColorKey
ImageAttributesを引数に取るGraphics.DrawImageのオーバーロードを使って描画
0740デフォルトの名無しさん2009/02/10(火) 23:38:51
出来ました。
ありがとうございます。
0741デフォルトの名無しさん2009/02/11(水) 01:42:57
秀丸とかのテキストエディタについている
テキストエディタなのにハイパーリンクを貼る機能とかVBで可能でしょうか？
0742デフォルトの名無しさん2009/02/11(水) 02:17:01
>>728
ttp://msdn.microsoft.com/ja-jp/library/cc488314.aspx

>>730
PreviewKeyDownイベント
0743デフォルトの名無しさん2009/02/11(水) 03:04:20
whay?
0744デフォルトの名無しさん2009/02/11(水) 03:05:08
what is previewkeydown
0745デフォルトの名無しさん2009/02/11(水) 03:42:21
>>743
発音と意味プリーズ
0746デフォルトの名無しさん2009/02/11(水) 09:49:17
>>745
http://www.therapy-whay.com/
0747デフォルトの名無しさん2009/02/11(水) 09:51:52
>>746
なるほど、「うぁい」ね、納得。
0748デフォルトの名無しさん2009/02/11(水) 11:34:07
tabキーはkeyをはなすまえのおしっぱなしのときにフォーカスがいどうしちゃうのケ？
0749デフォルトの名無しさん2009/02/11(水) 12:17:26
やってみりゃいいじゃん
0750デフォルトの名無しさん2009/02/11(水) 12:47:00
仕様書に書かれていることなら証明になるけど
体験的に得た結果を使って何か起こっても客に賠償しなくてもよいってこと?
0751デフォルトの名無しさん2009/02/11(水) 18:25:03
現在フリーソフト.net1.1で作っているのだけど、そろそろ2にしてもいいだろうか
XPのおまけに付いてたのって1.1だけだったっけ？
プリインストで2入ってたのってあるのかな
0752デフォルトの名無しさん2009/02/11(水) 18:52:38
>>751
それを考える必要ってあるの？
フレームワークが必要なら入れるだけだろ。

別に複数のフレームワークが共存できないわけで互換性を気にする必要も無いんだからさ。
必要なバージョンが無ければ動かない。
動かしたければインストールする。
インストールしたからといって他に影響は無い。

これが.NETFrameworkの強みの1つだろ？ｗ
0753デフォルトの名無しさん2009/02/11(水) 18:55:29
不景気な日本では古いパソコンばかりで.NETは普及してないんだから結局dll配布してたころと手間が変わらんじゃん
0754デフォルトの名無しさん2009/02/11(水) 19:20:49
2000を対応OSに含めるなら2.0までな
3.0から2000は非対応
0755デフォルトの名無しさん2009/02/11(水) 19:22:32
ちなみに俺もクライアントが2000なのでVS2008なのに
未だに2.0で開発してる
LINQも使えねえwww
0756デフォルトの名無しさん2009/02/11(水) 19:24:41
>>755
それは開発者と言えるのか？ｗｗｗ


つうか、さっさとASP.NETとかSilverLightにすれば良いと思うんだ。
配布の手間とかユーザのクライアントＯＳバージョンとか考えるだけ面倒。
0757デフォルトの名無しさん2009/02/11(水) 19:34:44
.NET1.1が動いて.NET2.0が動かないOSはNT4だけなんだよね。
0758デフォルトの名無しさん2009/02/11(水) 19:38:17
>>756
2000入りの低スペックでSilverLihtが快適に動作するマシンがどれくらいあるだろうな
0759デフォルトの名無しさん2009/02/11(水) 20:30:08
もしかして: SilverLight
0760デフォルトの名無しさん2009/02/11(水) 20:32:26
Lも小文字が正しい
0761デフォルトの名無しさん2009/02/11(水) 22:07:31
細かいことが気になってしまうのが僕の悪い癖ですね、わかります。
0762デフォルトの名無しさん2009/02/11(水) 23:24:21
VBならいいけど
C++やC#とかやってたら大文字小文字気にして当然だろ！
0763デフォルトの名無しさん2009/02/11(水) 23:48:44
そういやVB6までは、大文字/小文字を *時々* 勝手に書き換える
糞仕様だったな。
0764デフォルトの名無しさん2009/02/12(木) 00:49:32
DateAdd(Minute、30、TimeOfDay)
で日付をまたぐと00:00:00じゃないはずなのに00:00:00が返ってきちゃうのでなおしてくれ
0765デフォルトの名無しさん2009/02/12(木) 00:50:01
23:40:00とかに30ぷんたすとなっちゃう
0766デフォルトの名無しさん2009/02/12(木) 01:33:49
ならないな。具体的なコードを挙げてみて。
0767デフォルトの名無しさん2009/02/12(木) 01:55:06
夏にカミナリおちてからパソコン挙動不審だからフォーマットしてみる
0768デフォルトの名無しさん2009/02/12(木) 17:32:31
VB.NETってコマンドラインアプリは作成可能ですか？
0769 [―{}@{}@{}-] デフォルトの名無しさん2009/02/12(木) 17:36:21
>>768
普通に作れる
0770デフォルトの名無しさん2009/02/12(木) 21:09:09
普通にＩＤＥ起動してプロジェクト作ろうとすれば、コンソールアプリってあるんだから、
気付いても良さそうなんだが・・・
0771デフォルトの名無しさん2009/02/12(木) 21:14:38
まだEEインスコしてないに一票
0772デフォルトの名無しさん2009/02/13(金) 11:13:13
「コンソールアプリ」が何だか解らなかった、という可能性も。
0773デフォルトの名無しさん2009/02/13(金) 18:28:28
AutoScroll = True にしたコントロールで
スクロール量の最小値（ScrollBar.SmallChange）を設定するにはどうすればいいでしょうか？
0774デフォルトの名無しさん2009/02/13(金) 19:27:11
WebBrowserコントロールにkeyDownイベントがない・・・
0775デフォルトの名無しさん2009/02/13(金) 19:43:27
JavaScript で取ればOK
0776デフォルトの名無しさん2009/02/13(金) 22:28:28
VB2008 WEBでドロップダウンリストボックスコントロールには、ボタンコントロールのように
クライアントサイドスクリプトが設定できないの？
0777デフォルトの名無しさん2009/02/13(金) 22:42:39
>>776
微妙に質問がわかりづらい・・・が。たぶんで答えておくと、
OnClientClickの様にすべてのイベントが用意されているわけではない。
標準にないものを追加する場合はAttributesプロパティを使って追加する。

ってのでいいか？
0778デフォルトの名無しさん2009/02/13(金) 23:04:17
>>777
即レス、ありがとうございます。
Attributesの追加ですね。調べてみます。
0779デフォルトの名無しさん2009/02/14(土) 00:06:14
またおしえて
Dim t As New Threading.Thread(AddressOf nurupoThread)
t.Start()

で
Sub nurupoThread()

を実行するのですが、
本当は

Sub nurupoThread(ByVal str As String)

というプロシージャを実行したいのですが、
Dim t As New Threading.Thread(AddressOf nurupoThread(str))
とするとエラーになってしまいます。

現在は共有できる変数を宣言してそれを参照して目的の
動きをしていますが、引数を指定してスレッドを実行するには
本当はどんな方法でやればよいでしょうか。

おねがいします。
0780デフォルトの名無しさん2009/02/14(土) 00:09:17
デリゲートのBeginInvokeでも使え
0781デフォルトの名無しさん2009/02/14(土) 00:13:33
スレッドの開始時にパラメータを渡すには？［2.0のみ、C#、VB］
http://www.atmarkit.co.jp/fdotnet/dotnettips/434paramthread/paramthread.html
0782デフォルトの名無しさん2009/02/14(土) 00:22:25
レスありがとうございます。
BeginInvokeとClassを使う方法で見比べてどちらかにしたいと思います。
ありがとうござました。
0783デフォルトの名無しさん2009/02/14(土) 04:59:47
vb2008の質問いいですか？
0784デフォルトの名無しさん2009/02/14(土) 05:23:40
こんな感じで総合点数を元にしてＤＥＳＣで並べ替えをしたいんですが
何をやっても変わりません。
テーブルに書き込んだ順番にしかならないです。
エラーも出ないので困っています。
Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
Dim Value As String
' Dim Cn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\kimura\Desktop\keibayosou.mdb")
Dim SQLdesc As OleDbCommand = Cn.CreateCommand
SQLdesc.CommandText = "SELECT * FROM keibayosou ORDER BY 総合点数 DESC"

Cn.Open()
SQLdesc.ExecuteNonQuery()
'MsgBox("並べ替えしました")
Cn.Close()

'Cn.Open()
'SQLCm.CommandText = "SELECT 馬名 FROM keibayosou"
' Value = SQLCm.ExecuteScalar
'Cn.Close()

'Label38.Text = (Value)
0785デフォルトの名無しさん2009/02/14(土) 05:30:31
>>784
RDBのテーブルに順番という概念は無い。
SELECT の ODRDER BYは読み出した結果を並べ替えるもの。
ExecuteNonQuery() を使うのはまったくのナンセンス。
結果セットは並び変わってるからそれを使う。
0786デフォルトの名無しさん2009/02/14(土) 07:49:23
>>784
なるほどＲＤＢテーブルに順番という概念はないんですね
少しわかった気がします　ありがとうございました。
もう一回やってみます
0787デフォルトの名無しさん2009/02/14(土) 07:58:30
783ですけど
接続したデータベースからvbにひとまずデータソース（?）を落として
そこで並べ替えなり処理をしてそのデータをデータベースに戻す。という流れで
いいんですか？　かなり意味不明なところがあると思いますけど
よろしくお願いします。
0788デフォルトの名無しさん2009/02/14(土) 08:35:46
>>787
DBはデータが格納されているだけで、どのような順番でとかは意識しない。

順番を意識する（並び替えをする）のは、データを取り出す（検索する）ときに
ユーザ側がテーブルの特定の項目を指定して行う。

並び替えしてデータを更新しても、次に検索したときにソート条件をつけなければ
順番はばらばらになるかもしれない。
現在、並び替えのための項目がないなら、並び替え用の項目を追加したら？

ちなみに、この内容はVBではなく、RDBの話。
RDBについて勉強した方が良いよ。
0789デフォルトの名無しさん2009/02/14(土) 10:06:44
VB.netを使ってCSVファイルをACCESSのMDBファイルに読み込みたいんです。
完成したexeはACCESSがインストールされてないＰＣでも動くように
したいんで、ACCESS固有の機能を使わないで実装したいんですが、
どうしたらいいのかわかりません。
単純化した奴でいいんでコードのサンプルを教えていただけると幸いです。
0790デフォルトの名無しさん2009/02/14(土) 10:16:02
UNIX TIMEを得る方法を教えてください。
0791デフォルトの名無しさん2009/02/14(土) 10:17:18
WebBrowserでログインした時のセッションクッキーを破棄したいのですが、
WebBrowser.Document.Cookieプロパティを左にして代入設定してもプロパティ値に変化がなく、
動的コントロールとしてnewとdisposeを使ってもセッションを受け継いでしまいます。
InternetSetCookie(LoginURL, "kesitai", String.Empty)としても
kesitai; kesitai=loginsinfo;
というようになり、不正なクッキーを作ってしまいます。

何かいい方法ないでしょうか？
0792デフォルトの名無しさん2009/02/14(土) 10:37:07
>>791
InternetSetCookie API で、Expire を設定する
0793デフォルトの名無しさん2009/02/14(土) 10:41:31
何度もすいません783です
>>788さん　ありがとうございます。ＲＤＢについて調べました。
いろいろな制約？があるんですね。
たぶんこの話はＶＢになると思いますが
'Dim Cn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\kimura\Desktop\keibayosou.mdb")
Dim SQLdesc As OleDbCommand = Cn.CreateCommand
SQLdesc.CommandText = "SELECT * FROM keibayosou ORDER BY 総合点数 DESC"
Dim Table As DataTable = DirectCast(DataGridView1.DataSource, DataTable)
「Table = SQLdesc?」
やりたいことは自分の中ではデータベースをdatagridviewに読み込んで
datagridviewの中でソートしてデータベースに更新保存するっていうことを
やるつもりですが最後の行のプログラム式をどうしようか悩んでいます。
プログラム初心者なので説明が分かりにくいかもしれませんがよろしくお願いします。
0794デフォルトの名無しさん2009/02/14(土) 10:42:43
DataView.Sort ってあるだろ？
0795デフォルトの名無しさん2009/02/14(土) 10:43:18
>>791
http://msdn.microsoft.com/ja-jp/library/ms178195.aspx
参考になるか？
0796デフォルトの名無しさん2009/02/14(土) 10:44:40
>>790
C#/DateTimeをUNIX時間に変換
http://www.shise.net/wiki/wiki.cgi?page=C%23%2FDateTime%A4%F2UNIX%BB%FE%B4%D6%A4%CB%CA%D1%B4%B9
0797デフォルトの名無しさん2009/02/14(土) 10:46:38
>>789
CSV の読み込みは VB 側でやって、登録処理は ADO.NET でやれば OK。
0798デフォルトの名無しさん2009/02/14(土) 10:53:29
>>793
RDBにレコードの順番はないよ。書いた順に表示されてるように見えるのは気のせいか偶然。
そういうものに頼ったらいけない。
順番がほしいなら、順番というフォールドを追加してそれに番号振っとけ。
07997912009/02/14(土) 13:20:44
>>795
リンク先の
＞ユーザーが次回 Cookie を設定したドメインまたはパス内のページを要求すると、
＞ブラウザは Cookie が期限切れであることを確認して削除します。

この動作が確認できません…
Navigateは「ページを要求する」ということにならないのでしょうか？
何か間違っているでしょうか？

InternetSetCookie(LoginURL, "expires", "Tue, 25 Dec 2005 07:00:00 GMT")
'wbのクッキーの確認　ちゃんとexpiresの値は追加されていた。
Debug.Print(wb.Document.Cookie)
'開放
wb.Dispose()
'new
Me.wb = New WebBrowser()
Me.wb.Name = "wb"
Me.wb.Visible = False
AddHandler Me.wb.DocumentCompleted, AddressOf WebBrowser_DocumentCompleted
Me.Controls.Add(Me.wb)
'ページを要求？
wb.Navigate(LoginURL)


Private Sub WebBrowser_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs)
　'クッキーの確認。expiresの値が追加されたままのクッキーが読み込まれてしまう。
　Debug.Print(wb.Document.Cookie)
End Sub
0800デフォルトの名無しさん2009/02/14(土) 13:23:00
もう一度リクエストして、クッキーが有効かどうか確認してみれば？
0801デフォルトの名無しさん2009/02/14(土) 13:35:39
あ～ごめんなさい。
ブラウザコントロールか。ASP.Netのネタかと思った。
0802デフォルトの名無しさん2009/02/14(土) 14:08:15
Private Sub Button18_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Button18.KeyDown
If e.KeyCode = Keys.V And Keys.Control Then
MsgBox("")
End If
End Sub

Ctrlを押さないでVだけを押しても実行されてしまうのはなじぇだろう
0803デフォルトの名無しさん2009/02/14(土) 14:15:29
>>802
KeyCode定数の値がCtrl+Vでどうなるのか知らんが、
If e.KeyCode = Keys.V And Keys.Control Then
この比較だと
If (e.KeyCode = Keys.V) And Keys.Control Then
となるので、Keys.Controlは1以上だろうから、Vを押しただけで実行される。
0804デフォルトの名無しさん2009/02/14(土) 14:20:35
Crtl+Vのみ動くようになおしてクレヨン
0805デフォルトの名無しさん2009/02/14(土) 14:22:51
>>804
http://www.atmarkit.co.jp/bbs/phpBB/viewtopic.php?topic=38967&forum=7
0806デフォルトの名無しさん2009/02/14(土) 14:26:34
If e.KeyCode = (Keys.V And Keys.Control) Then
で良くないか？
0807デフォルトの名無しさん2009/02/14(土) 14:30:37
=とAndの優先順位が同じだというのははつみみだが
0808デフォルトの名無しさん2009/02/14(土) 14:31:16
>>806
KeyCodeには検地できないみたいだね
e.KeyCode = Keys.V And e.Controlでいい
0809デフォルトの名無しさん2009/02/14(土) 14:35:03
指定したURLのweb画面を印刷するには、どうしたらいいですか？
0810デフォルトの名無しさん2009/02/14(土) 14:45:33
CSVをMDBに取り込みたがってる789ですが、

ADO.NETでCSVをDataGridに読み込んでみました。
その後、別のボタンでDataGridからMDBにテーブルを登録しようと
してるんですが、うまくいきません。
OleDBDataAdapterのUpdateを使うといいのかと思ったのですが、
TableMappings['Table']またはTableData 'Table'が見つかりませんでした、というようなエラーが
でてしまっています。

何がまずいんでしょうか
0811デフォルトの名無しさん2009/02/14(土) 14:52:19
MDB への単純な登録はできたの？
0812デフォルトの名無しさん2009/02/14(土) 15:20:03
insertで単純なレコードを挿入するぐらいならできました。
0813デフォルトの名無しさん2009/02/14(土) 15:34:36
じゃ、読み込んだCSVの内容を Insert していけばいいじゃん。
0814デフォルトの名無しさん2009/02/14(土) 15:37:18
OleDBDataAdapterのUpdateとかを使えば一発で
ゴソッと全部登録できるんかなと思ったんですができないですか
0815デフォルトの名無しさん2009/02/14(土) 15:42:18
一発でごそっと登録するためには、データセットにしこしこ突っ込む必要があるよ。
0816赤西仁2009/02/14(土) 16:28:27
２年間悩んでます。お力をお貸しください。

PSのアークザラッドⅡというタイトルのゲームの、ゲーム画像（歩行画像など）を抽出したいのですが、
かれこれ１年ほど経ちますが、なかなかうまくいきません。
＊もちろん抽出した画像は個人範囲内で利用するつもりです。

◆試してダメだったこと

　ネット上からダウンロードできる、ありとあらゆる抽出系ツールを試した。
　（ちなみに他のゲームはほとんど抽出可能）

◆教わったこと

　・アークザラッドⅡは独自の画像形式を使っているから抽出できない。
　・PS上で表示されてるということは絶対に摘出はできるはず。
　・ttp://www.gradius2.com/index.php?UID=1174775153

◆抽出は不可能ではないということを知ったとき

　２ちゃんねるで質問したところ、
　ある方が実際にキャラクターの歩行画像を抽出して
　私が立てたスレにアップしてくださいました。

スクリーンショットじゃダメなんです。どうか皆さん、お力をお貸しください。お礼は絶対にします。
0817デフォルトの名無しさん2009/02/14(土) 16:32:38
コピペ君って馬鹿だな、まで読んだ。
0818デフォルトの名無しさん2009/02/14(土) 16:58:38
＞８１５

どうやって？
0819デフォルトの名無しさん2009/02/14(土) 17:06:48
DataTable.Rows.Add()
0820デフォルトの名無しさん2009/02/14(土) 17:16:33
ADO.NETになってから
rs.EOFの書き忘れで無限ループしなくなってさみしんだけどどうしたらいんだ
0821デフォルトの名無しさん2009/02/14(土) 17:20:51
>819

for eachで頭からケツまでRowをAddしなおせばいいの？
なんかうまくいかないんだけど
簡単なサンプルコードを書いていただけると幸い
0822デフォルトの名無しさん2009/02/14(土) 17:39:23
これだけキーワードが出ててわからない、つーのは、向いてないんだと思うよ。
あっさりあきらめれば？
0823 [―{}@{}@{}-] デフォルトの名無しさん2009/02/14(土) 17:53:09
>>821
そもそもCSVをDatatableに入れて、
それをBindしてGridに表示してるの？

Datatableに入ってるなら、
それをそのままinsertすりゃいいんだけど・・・
0824デフォルトの名無しさん2009/02/14(土) 17:56:03
Text 用 ODBC ドライバが使えるなら、クエリ一発だな・・・
0825デフォルトの名無しさん2009/02/14(土) 18:04:48
Datatableをどうやってそのままinsertできるのか分からんな
0826デフォルトの名無しさん2009/02/14(土) 19:11:02
Dim dt As DataTable = oDataSet.Tables(0)
Dim dt2 As New DataTable()

Dim i As Integer = 0

For i = 0 To dt.Rows.Count - 1
dt2.Rows.Add(dt.Rows(i))
Next

とやると、この行はすでに別のテーブルに属しています、とエラーになってしまいました。
何が問題なんでしょうか
0827デフォルトの名無しさん2009/02/14(土) 19:18:38
Dim dt2 As New DataTable
と
Dim dt2 As Datatable = New DataTable
はちがうんか?
0828デフォルトの名無しさん2009/02/14(土) 19:47:04
>>807
ごめん、なんか間違えてた？
=の優先度が高いって意味で括弧作ったんだけど…
0829デフォルトの名無しさん2009/02/14(土) 20:08:45
CSVとMDBに同時に接続するってことは可能なんですかね？
そうしないとクエリ一発って無理だと思うんですけど
0830デフォルトの名無しさん2009/02/14(土) 21:01:13
VBからアクセスのコマンド叩いてインポートした方がよさげ
0831デフォルトの名無しさん2009/02/14(土) 21:01:44
zおーだーがないから糞
0832デフォルトの名無しさん2009/02/14(土) 21:12:23
マウスムーブとマウスホヴァーの両方にプログラムを書くと問題が起こらないか?
0833デフォルトの名無しさん2009/02/14(土) 21:13:37
>>826
dt2 は先に mdb のテーブルに接続しとく必要がある

>>829
接続は mdb に。Jet の機能で、クエリ中、外部データベース（ODBC） にも接続できる。

>>830
それだと、Access が必要だろ？
0834デフォルトの名無しさん2009/02/14(土) 21:15:48
クエリ中の外部データベースへの接続は、↓みたいなやつね

IN 句（SQL 文）
http://www.f3.dion.ne.jp/~element/msaccess/AcTipsGnrlHowToAttachExternalMdb.html#IN
08357992009/02/14(土) 21:46:15
>>799
これわかる人いますか？

無理そうなら諦めて、プログラム自体はそんなに大きくはないので
起動引数から値を受け取るようにしてプログラム自体を再起動しようかと思いますが…
0836デフォルトの名無しさん2009/02/14(土) 21:49:37
>>835
クッキーはリクエストされてるの？
08377992009/02/14(土) 22:02:29
>>836
勉強不足でどういう事を聞かれているのかわからないです
ごめんなさい！どうやってリクエストされてるのかわかるのでしょうか
カンではリクエストされてると思います

全体の流れを述べると、
ログインページ→(ログイン実行)→ログイン後ページ(ログインページと同じURL)
→(>>799のソース実行)→ログインページに行きたいのにログイン後ページが表示されてしまう
クッキーを確認すると先のログイン後ページに有効期限が追加されてあるだけで削除されない
0838デフォルトの名無しさん2009/02/14(土) 22:04:19
ログイン後ページが表示される、ってことは、リクエストされてるね・・・。
Dispose() しないで、Navigate() 前に実行しても同じ？
08397992009/02/14(土) 22:15:07
>>838
＞ログイン後ページが表示される、ってことは、リクエストされてるね・・・。
なるほど…感じは掴めました、ありがとうございます

＞Dispose() しないで、Navigate() 前に実行しても同じ？
同じようです
問題の切り離しができてなくてすいません
0840デフォルトの名無しさん2009/02/14(土) 22:51:23
ちなみに、javascript で削除(Expire 指定)してもだめ？

http://d.hatena.ne.jp/cobodo/20081223/1230023305
0841デフォルトの名無しさん2009/02/14(土) 23:42:54
>>826

ImportRowかMergeを使うんだ
RowStateをどう継承するのか忘れたけど、
Setaddedだっけ？でRowStateをadded？に変えられるから。
後はupdateでシコシコとインサートしてもらうと。

つーか、DB使うならTableAdapter,Dataset,DataTableとか関連項目を
しっかりと押さえておいた方が良いと思うよ。
LINQでinsertが使えるようになれば良いんだけどねぇ

実環境じゃないから適当に読み替えてくれ
08427992009/02/14(土) 23:45:34
>>840
1行コードはURLに貼り付けて決定したら機能するのが前提ですよね？
試しに使ってみましたけどログイン状態が解消されません
何か勘違いしてますか？
08437992009/02/14(土) 23:47:15
>>842
訂正
URLに貼り付けて→アドレスバーに貼り付けて
これはWebBrowserではなくIEで試しました
0844デフォルトの名無しさん2009/02/14(土) 23:59:28
ってことはサーバー側の問題？

HttpWebRequest なら、クッキーを設定しなきゃ送らずにすむよ。
08457992009/02/15(日) 00:05:50
>>844
ニコニコ動画でもログアウトはできないみたいです
たまにでるキャッシュのエラーのみに対応しているっぽい？

HttpWebRequest、調べてみます
0846デフォルトの名無しさん2009/02/15(日) 00:20:19
小さいソフトをちまちま作ってて気づいたんだけど
アプリケーション・アーキテクチャって重要だな。

これに則っていれば、依頼された要件で
部分毎に予想工数を推測しやすい。

で、ここにアプリケーション・アーキテクチャに詳しい人いる？
0847デフォルトの名無しさん2009/02/15(日) 00:27:04
スレ違いだな。
0848デフォルトの名無しさん2009/02/15(日) 09:50:57
アプリケーション・アーキテクチャについて話したいのだけど
どのスレいったらよい？
0849デフォルトの名無しさん2009/02/15(日) 12:57:33
WebBrowser1.Print()で印刷時のドキュメント名？を変更するにはどうしたらいいですか？
URLがドキュメント名になってしまうので・・・
0850デフォルトの名無しさん2009/02/15(日) 13:12:31
Textboxで一番下までスクロールさせるにはどうすればよいでしょうか？
0851デフォルトの名無しさん2009/02/15(日) 17:49:56
ACCESSの入ってないＰＣでmdbにアクセスするVBプログラムを起動したら
なんとかかんとかOleDBPermissionとやらでアクセス権限の取得に失敗しました、
みたいなエラーがでますた。
ACCESSはいってるＰＣではエラーにならないんだが、
やっぱりmdbつつくにはACCESSいれる意外方法ないんですか
0852デフォルトの名無しさん2009/02/15(日) 17:51:31
Jet 用の OLEDB プロバイダが必要。
0853デフォルトの名無しさん2009/02/15(日) 18:34:30
>852

なにそれ
0854デフォルトの名無しさん2009/02/15(日) 18:35:05
調べろよﾊｹﾞ
0855デフォルトの名無しさん2009/02/15(日) 18:46:56
mdac入れればおｋ
0856デフォルトの名無しさん2009/02/15(日) 19:49:07
MDAC2.8いれようとしたらお使いのＯＳと互換性がないみたいなことでてたぞ
0857デフォルトの名無しさん2009/02/15(日) 19:50:09
気にするな
0858デフォルトの名無しさん2009/02/15(日) 19:52:43
環境も書かずに・・・
0859デフォルトの名無しさん2009/02/16(月) 01:46:18
for i as integer = 0 to 9
for j as integer = 0 to 9
console.writeline(????)
next
next

これで出力に０～８１を順に出るように
変数はiとｊだけを使った????の部分の式を教えてください
0860デフォルトの名無しさん2009/02/16(月) 01:59:33
合計100回実行されるのに出力は82回(?)とはこれ如何に
0861デフォルトの名無しさん2009/02/16(月) 02:15:08
>>860
０に重複があるわけだ。　i * j 
0862デフォルトの名無しさん2009/02/16(月) 02:17:35
すみません間違えました
出したいのは０～８１じゃなくて０～１００です。
0863デフォルトの名無しさん2009/02/16(月) 02:23:57
i * 10 + j
０～９９までしか出せなかった
0864デフォルトの名無しさん2009/02/16(月) 02:39:19
Dim i as integer
Dim S as string
Dim T as Boolean

がいてい値を述べなさい
0865デフォルトの名無しさん2009/02/16(月) 02:47:48
がいてい・・・なんかふいんき（なぜか変換がｒｙ）がおかしい

クマ～
0866デフォルトの名無しさん2009/02/16(月) 09:14:52
なんでBooleanがTなんだろう
0867デフォルトの名無しさん2009/02/16(月) 17:22:59
Threadを使って、フォームをShowDialogすると、それぞれのスレッド別にモーダルで表示されるけど、
1個のダイアログを全スレッドでモーダルする方法ってありますか？
0868デフォルトの名無しさん2009/02/16(月) 19:09:51
そもそもUIを複数のスレッドで扱うのは地雷原
08698672009/02/16(月) 20:31:50
>>868
それはそれで、使わざるを得ない理由があるので…
08708672009/02/16(月) 20:48:50
では、質問を変えて、
操作フォームが２つあり、片側がモーダル表示でも、
もう一方を操作する方法はあるでしょうか？

867の質問の内容とこれを同じアプリケーションで実現する必要があります。
0871デフォルトの名無しさん2009/02/16(月) 20:54:40
>>870
http://dobon.net/vb/dotnet/form/accessanotherformdata.html
0872デフォルトの名無しさん2009/02/16(月) 21:15:44
上のコピペ君もアホだが、そもそも>>867はモーダルって意味分かって言ってるのか。
0873デフォルトの名無しさん2009/02/16(月) 21:25:42
わかってようがいまいが、答えないお前には関係ないだろ？
0874デフォルトの名無しさん2009/02/16(月) 21:31:39
>>867
ない。

>>870
スレッド
0875デフォルトの名無しさん2009/02/16(月) 21:51:05
>>873
馬鹿はこれだから困るが、そもそも「質問として成立してない」と言ってるんだよ。
成立してない質問に答えようがあるかよ。
0876デフォルトの名無しさん2009/02/16(月) 21:59:00
>>863
またまちがえました
0-99です
それでいいです。できました
ありがとう

0877デフォルトの名無しさん2009/02/16(月) 22:00:41
ワシがエスパーしちゃる。

何らかの並列処理を行っていて、あるダイアログが表示されている間はすべての処理を止め、
あるダイアログが表示されている間は止めない、と

そういうことかいのう？
0878デフォルトの名無しさん2009/02/16(月) 22:00:45
>>875
答えなきゃ良いじゃねえか？なんで切れてるん？
08798672009/02/16(月) 22:10:26
モーダルって他の操作をできなくすることじゃなかったでしたっけ？
てっきり>>868さんのことばで、スレッドを分けないでもできるというのを匂わしているのかと思いました。

>>877
その通りです。
あるダイアログでは全ての処理を止めるけど、
あるダイアログでは、一方の処理しか止めない方法が知りたいです。
0880デフォルトの名無しさん2009/02/16(月) 22:12:32
なんか考え方がおかしい。

モーダルは、処理が止まるのが常態。なので、止めないイレギュラーな処理に関して、
スレッドを使えばいい。

お勧めはしないけどね。
0881デフォルトの名無しさん2009/02/16(月) 22:13:24
>あるダイアログでは全ての処理を止めるけど、

システムモーダルか…
0882デフォルトの名無しさん2009/02/16(月) 22:16:55
>>880
ありがとうございました。
スレッドを使えば、片方のフォームは処理を続行して、
片方の処理は止めれるのですね。
ちょっと試してからまた来ます。
0883デフォルトの名無しさん2009/02/16(月) 22:18:55
おとなしくBackGroundWoker使っといた方が・・・
0884デフォルトの名無しさん2009/02/16(月) 22:22:54
つーか処理続行とか意味分からん　処理とUIとは本質的に無関係だろ
操作の制限ならモーダルよりむしろEnabledで制御すべきだし
0885デフォルトの名無しさん2009/02/16(月) 22:25:20
なんか勘違いしてる予感・・・
0886デフォルトの名無しさん2009/02/16(月) 22:29:46
スレッド理解できてないのにモーダルだモードレスだ言っても無理だろ
08878672009/02/16(月) 22:37:44
例えば、シングルスレッドでフォームを２つ開いて、メッセージボックスを出せば、2つともメッセージボックスの制御待ちになります。
マルチスレッドにしてそれぞれのスレッドでフォームを開いて、メッセージボックスを出せば、メッセージボックスを出したスレッドだけメッセージボックスの制御待ちになり、
もう一方は操作可能です。

要は、場合によってこの両方を使い分けたいのです。
0888デフォルトの名無しさん2009/02/16(月) 22:37:49
>>867
>>877の言うとおりなら、単にUIの応答を止めたい側を親にして
新しいFormを表示するだけ。
http://msdn.microsoft.com/ja-jp/library/szcefbbd(VS.80).aspx

しかし、UIがユーザーの操作に反応することを「処理」とか呼ぶ
いい加減な言葉遣いはどうか。

少なくとも、自分の知識や表現力に自信がないのなら無理に知ったかぶりするんじゃなくて、
同じ事を2通りの書き方で説明するとか、表現方法を工夫しなきゃ。
0889デフォルトの名無しさん2009/02/16(月) 22:42:46
だから、何のために？ ってのが素朴な疑問。
0890デフォルトの名無しさん2009/02/16(月) 22:47:22
すまん>>888はリンクミス
↓が正解
http://msdn.microsoft.com/ja-jp/library/w61zzfwe(VS.80).aspx
08918672009/02/16(月) 22:48:46
>>889
要望・・・ですね。
0892デフォルトの名無しさん2009/02/16(月) 22:50:37
俺なら、基本モードレスで必要なとこだけモーダルでやるな。

説明を聞く限り、それでいけそうだし。
0893デフォルトの名無しさん2009/02/16(月) 22:52:52
>>892
メッセージボックスだしても、一方のフォームは操作できます？
0894デフォルトの名無しさん2009/02/16(月) 22:55:25
メッセージボックス相当のフォームをモードレスで出せばOK
0895デフォルトの名無しさん2009/02/16(月) 23:01:13
>>894
モードレスのときは、その呼び出しフォームの操作はダイアログみたいに止まりますか？
フォームの操作をEnableとかで止めた場合も、
下のフォームをクリックしたときにキャプションバーの点滅って起こります？
0896デフォルトの名無しさん2009/02/16(月) 23:02:12
やってみろよ
0897デフォルトの名無しさん2009/02/16(月) 23:04:50
>>896
できないですね
0898デフォルトの名無しさん2009/02/16(月) 23:13:00
ふーん。俺の環境ではできてるみたいだけどな。
0899デフォルトの名無しさん2009/02/16(月) 23:25:25
自分で考える気はないのかｗ

つうか>>871のリンク先読んでればForm関係なら大概のことはできるよ
FormをEnabledにしたくないならClickイベント拾ってFormが開いてる間だけ
操作をキャンセルするとか、やろうと思えばいくらでもできる
UIを分けたいから外にスレッド作るなんて普通はやらない
スレッド作ったって操作できるのは一つずつなんだから
0900デフォルトの名無しさん2009/02/16(月) 23:26:50
ここにもID表示が必要だな…
0901デフォルトの名無しさん2009/02/17(火) 13:48:58
Webのテキストボックスでファイルパスの￥が/になるときがあるのはなんで?

例
C:/ProguramuFilse/Exprorar.exe
0902デフォルトの名無しさん2009/02/17(火) 14:35:46
>>901
フォントってご存じですか？
0903デフォルトの名無しさん2009/02/17(火) 14:49:25
>>901
よーく見てみようね
本当に '/' ?
0904デフォルトの名無しさん2009/02/17(火) 20:34:43
フォントに '/' ?
0905デフォルトの名無しさん2009/02/17(火) 20:47:28
>>904
【審議中】

　　　　　　　　 　 ∧,,∧　 ∧,,∧
　　　　　 ∧,,∧ (´・ω・) (・ω・｀). ∧,,∧
　　　　　( ´・ω).(O┬O) (O┬O) (ω・｀ )
　　　　　(　O┬O　∧,,∧.　∧,,∧)┬O　)
　 　 　 ◎-Ｊ┴◎(　　´・) (・｀　　)┴し-◎
　　　　　　　　　　 (　.__　l) (l　__　)
　　　 　 　 　 　 　 `ｕﾛｕ'.　`ｕﾛu'
0906デフォルトの名無しさん2009/02/17(火) 21:01:08
なぁ、>>901って釣りだよな
綴りがあからさまに…
0907デフォルトの名無しさん2009/02/17(火) 21:30:11
>>904
【採用】
　　　　　　　　　　ﾟ･　*:　 :　*･
　　　　　　*･　゜ﾟ･　*　:　　.｡.　.｡.:　　*゜
　　　*　･゜　ﾟ･　*:　.　.｡.:　*･　゜ﾟ　　･　*　　:..
　｡.　･　･*:.｡ ∧,,∧ 　.∧,,∧　　　.:*　･゜　　　　　
　　　 ∧∧(´・ω・｀)(´・ω・｀)∧∧
　　　(´・ω・｀).∧∧) (∧∧(´・ω・｀)　　
　　　｜　Ｕ (´・ω・｀)(´・ω・｀) と ﾉ
　　　　ｕ-ｕ　（l 　　 ) ( 　　　ﾉ u-ｕ
　　　　　　　　 `ｕ-ｕ'　`ｕ-u'
0908デフォルトの名無しさん2009/02/17(火) 22:45:22
ホントにズラ？
0909デフォルトの名無しさん2009/02/17(火) 23:13:58
>>908
【審議終了】

　　　 ∧,,∧　 ∧,,∧
　∧ (　´・ω) (；・ω・)　　　
(　´・ω)　Ｕ) ( つと ﾉ∧,,∧　　
｜　Ｕ (　　´・) ｕ-u (´・ω・)　ロッククライミングをさせてあげよう
　ｕ-ｕ （l 　　 ) 　　　(　　　ﾉ
　_,,..-―`ｕ-ｕ'―.゛゛゛`ｕ-っ≡　ｹﾞｼｹﾞｼ
゛~,,,....-=-‐√"゛゛Ｔ"~￣::∩::"゛
Ｔ　　|　　 l,＿,,/＼　,,/l (ω；｀　)
,.-r '"l＼,,j　　/　 |/　 L,,(　　　⊃
,,/|,／＼,/　_,|＼_,i_,,,/ ／`ｕ-u'
_V＼　,,/＼,| 　,,∧,,|_/
0910デフォルトの名無しさん2009/02/18(水) 00:58:24
教えてください。

今、vb2005.net のWebBrowserコントロールをフォームに配置しています。
そのコントロール（ブラウザ）からユーザーがページを遷移させたとき（POST）、移動先のURLとPOSTデータを得たいのですが、どうやったらできるのでしょうか？
URLだけであれば、Navigatingイベントで取得できると思いますが、POSTデータの取得方法が分かりません。

VB6時代のWebBrowserであれば、BeforeNavigate2で取得できたと思うのですが、同様の方法はないのでしょうか？

よろしくお願いいたします。
0911デフォルトの名無しさん2009/02/18(水) 04:59:49
スレッドとWebBrowserと聞いてピンときたのですが、
もしかして、M***のツール製作ですか？
0912デフォルトの名無しさん2009/02/18(水) 09:55:15
.netアプリをスタートメニューのスタートアップに登録しておいて
その.netアプリが動いている状態でOSをログオフやシャットダウン
できないのって仕様？

アプリ：.net2.0
OS：2003Server
0913デフォルトの名無しさん2009/02/18(水) 09:58:37
常識的に考えてそんなわけないだろ
0914デフォルトの名無しさん2009/02/18(水) 10:05:48
>>912
ねーよｗ
09159122009/02/18(水) 10:51:24
オレもそう思ってたよ。

いやね、実際にそうなってて困ってるのでググってみたりしたんだけど
この件に関する記載が見つからなくて。

すごく簡単なwindowsアプリを作成。
このアプリはタスクトレイにアイコン格納していて、タイマーで時間を
監視して所定の時刻にとあるフォルダの中にあるファイルを削除している
だけなんだけど、こいつがスタートアップから起動しているとOSを
シャットダウンや再起動、ログオフもできないんだよ。

このアプリを終了しておけば問題なくOSはシャットダウンできるから
何か制約あるのかなと思って。
0916デフォルトの名無しさん2009/02/18(水) 10:55:03
>>915
サービスにすれ
09179122009/02/18(水) 11:04:59
というわけでサービス版も作成しているところです。

でサービス版は完成したけど、こいつを管理する、たとえばSQLServer2000のサービスマネージャ
みたいにサービスをコントロールするフォームを持ちたい、と考えるとサービスマネージャは
サービスではなくwindowsアプリにする必要があるワケで、こいつをスタートアップに登録すると
またOSがシャットダウンできなくなるというループに陥ってしまうから悩んでるんだorz
0918デフォルトの名無しさん2009/02/18(水) 11:06:49
サービスがフォームを持てばいいんじゃない？
0919デフォルトの名無しさん2009/02/18(水) 11:07:24
Windows アプリとして作ってんなら
FormClosing イベントで Cancel メンバをセットしない限り
ふつーに終了させられるだろ。

>タイマーで時間を
>監視して
イベントループ回ってなくね？
09209122009/02/18(水) 11:07:50
タスクに登録する、ってのも考えてみたんだけどいろいろとややこしくて。

スタートアップに登録するのはセットアッププロジェクトで簡単にできるから
楽で良かったんだけどなぁ。
0921デフォルトの名無しさん2009/02/18(水) 11:08:42
>>918
>>724
09229122009/02/18(水) 11:09:46
>>918 サービスはフォームは作成できても表示できないっしょ。

>>919 ちゃんと処理は走ってるんだけどなぁ。
0923デフォルトの名無しさん2009/02/18(水) 11:14:06
http://www.atmarkit.co.jp/bbs/phpBB/viewtopic.php?topic=5892&forum=7
これじゃだめなのー？
0924 [―{}@{}@{}-] デフォルトの名無しさん2009/02/18(水) 11:14:44
>>922
SystemEvents.SessionEnding イベントを自前で
ハンドリングしてみるとかどうよ？
0925デフォルトの名無しさん2009/02/18(水) 11:20:55
プロセス間通信でサービスとフォームアプリケーションで情報やりとりできないかね？
0926デフォルトの名無しさん2009/02/18(水) 11:23:37
っていうかシャットダウンできないわけねー
09279122009/02/18(水) 11:29:19
>>923 なるほどね。
　　　でも、これだとインストーラで設定できなくね？できんのかな？

>>924 これもなるほど。
　　　この線を検討してみるよ。
0928デフォルトの名無しさん2009/02/18(水) 11:34:16
そもそもシャットダウンできないつくりがおかしいって
2003serverだからなの？
0929デフォルトの名無しさん2009/02/18(水) 11:38:34
一定時間にファイル削除するだけだったら
タスクにＤＯＳコマのバッチでも登録しておいたらどうだろう？
09309122009/02/18(水) 12:01:12
>>928 今テストしてみたらVistaだとシャットダウンやログオフできるんだけど、
　　　2003Serverだとできないんだよ。実機やVirtualPCでも試した。
　　　>>924 で強制的に自己終了する方向でやってみるよ。

>>929 セットアッププログラムで簡単にインストールできるようにしたいから
　　　タスクは今は考えてないよ。
　　　また他にも機能を追加してみようかななんて思っているからbatファイルだと厳しいし。
0931デフォルトの名無しさん2009/02/18(水) 14:00:00
VB.netでグラフをリアルタイムで表示したいのですが、どこを探してもそれらしいものが全く見つかりません。

どうすればいいでしょうか...？

ちなみに、使用している環境は
Visual Basic 2008 Express Editionです。
0932 [―{}@{}@{}-] デフォルトの名無しさん2009/02/18(水) 14:07:52
>>931
グラフの描き方ならいくらでも出てくるが？

それをリアルタイムで処理できるかはあなたの技量次第
0933デフォルトの名無しさん2009/02/18(水) 14:11:49
ZedGraphなんか使いやすかった
0934デフォルトの名無しさん2009/02/18(水) 14:19:30
VB2008Expressを使用しています。

プログラム上でテキストボックスのKeyDownイベントにEnterキーを入力した状態を発生させるには、どのようにしたら良いのでしょうか？
ボタンならPerformClickなどを使えば良いのでしょうが・・・。
すいませんが、よろしくお願いします。
0935デフォルトの名無しさん2009/02/18(水) 14:21:12
ZedGraphも試してみましたのですが、イメージと違って....

タスクマネージャの"CPU使用率の履歴"みたいなものが理想形です。
0936デフォルトの名無しさん2009/02/18(水) 16:28:44
>>934
KeyDown を呼びたいなら適切な引数を渡して読んであげればいい。
0937デフォルトの名無しさん2009/02/18(水) 17:18:27
>>936
KeyDownのイベントがこれですが・・・
Private Sub textbox_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles textbox.KeyDown

System.Windows.Forms.KeyEventArgs型には値を入れることができないので、それで悩んでいます。
この型にはどのように引数を入れれば良いのでしょうか？
0938デフォルトの名無しさん2009/02/18(水) 17:20:53
TextBox1に"あいうえお"と入力する場合は

Sub Form_Load
TextBox1_Keydown(sender,e.keysA)
TextBox1_Keydown(sender,e.keysI)
TextBox1_Keydown(sender,e.keysU)
TextBox1_Keydown(sender,e.keysE)
TextBox1_Keydown(sender,e.keysO)
End Sub

だとAIUEOになっちゃうからどうするんだろう
0939デフォルトの名無しさん2009/02/18(水) 18:28:38
IMEをON
0940デフォルトの名無しさん2009/02/18(水) 18:44:39
>>912
もう一個プログラム組んでそっちから指定のアプリを起動するようにしたら？
起動プログラムはすぐ終了
0941デフォルトの名無しさん2009/02/18(水) 22:13:56
>>912
RunDLL32.EXE Shell32.DLL,ShellExec_RunDLL 指定のアプリ「引数...」
で>>940
0942デフォルトの名無しさん2009/02/18(水) 22:40:04
なんでVBは最強のラッパーなのにわざわざAPIとかいじらんとならんのだ
0943デフォルトの名無しさん2009/02/18(水) 22:41:53
ラップとヒップホップとレゲエの区別がつかん
09449122009/02/19(木) 17:50:48
>>941
そんなテク知らなかった。
でも >>924 の強制的に自己終了でなんとかなってるから
また何かの時に使わせてもらうよ。
ありがとう。
09459122009/02/19(木) 17:52:51
>>940 もありがとう！
　　　その方法は思いつかなかったよw
0946デフォルトの名無しさん2009/02/19(木) 18:24:54
初歩的な質問
変数の寿命について何だけど

for each hoge in hoges

    dim dt as new data.datatable
    以下いろんな処理

next

でくるくる回すときに
dtのインスタンスってのは回した回数だけ増えていく物？
それともnextを拾った時点で消滅する？

nextの外の処理では参照できないのは分かってるんだけど
ループの数だけ作られてたらメモリを圧迫するのかと思って

0947デフォルトの名無しさん2009/02/19(木) 18:28:21
勉強だと思ってやってみれば？
0948デフォルトの名無しさん2009/02/19(木) 18:32:48
キーワードはGC：ガベージコレクタ
0949デフォルトの名無しさん2009/02/19(木) 18:50:39
作成したインスタンスが消滅するタイミングは「気が向いたら」が基本。
ループ中かどうかは関係ない。
0950デフォルトの名無しさん2009/02/19(木) 18:55:05
VB6と違う部分だよね。VB6の場合は
dim dt as new data.datatable 
と
dim dt as data.datatabl
set dt = new data.datatabl
で動作が異なる。
0951 [―{}@{}@{}-] デフォルトの名無しさん2009/02/19(木) 19:01:14
気になるならDisposeしとけ
0952デフォルトの名無しさん2009/02/19(木) 19:19:31
using使えば？
09539462009/02/19(木) 21:41:01
GCの項目を改めて読み直しました
いつ解放されるか分からないって事ですね
とりあえずきにしないで使うことにしてみます
ありがとうございました
0954デフォルトの名無しさん2009/02/20(金) 00:24:17
FTPの
キープアライブ
アスキーモード
パッスィブモード
てなんだ?
ググル気は無い
0955デフォルトの名無しさん2009/02/20(金) 00:29:51
ググル気は無い、まで読んだ。
0956デフォルトの名無しさん2009/02/20(金) 00:51:10


process.start　と　WorkingDirectory　を使い、C\～～\～～\のようなパスから
作業ディレクトリと対象のexeファイルを指定して起動することはできたんですが

ＶＢのプログラムからの相対パスで、たとえば
"sample\sample.exe"
のような形で作業ディレクトリとファイル指定するにはどうすればいいでしょうか

curdir使えばいいのかと思ったりしましたが、なかなかうまくいきません


仕様環境はVisual Basic 2008 Express Editionです
ご教示お願いします
0957デフォルトの名無しさん2009/02/20(金) 00:53:27
教えてください。

AというdllとBというdllがそれぞれCというdllを参照しています。
ＣにClass hogeがあり、そのhogeがShared変数を持っています。

A.dllをアプリケーションドメイン1がロードしhogeのShared変数に値を設定します。
その後B.dllをアプリケーションドメイン2がロードしたときアプリケーションドメイン1で設定した
hogeのShared変数を参照したいのですがこれは可能でしょうか？
0958デフォルトの名無しさん2009/02/20(金) 00:56:05
>>956
Application.StartupPathとPath.Combine
0959デフォルトの名無しさん2009/02/20(金) 02:10:50
Fomr1からForm2.TextBox1.Textにアクセスするからなんとかｼﾙ
0960デフォルトの名無しさん2009/02/20(金) 02:35:24
微妙にスレ違いかもしれないけど、上でZedGraphの話題が出てたので便乗して質問です。

リアルタイムに変化する値をZedGraphでモニターしようと思ったのですが、タイマーの中に入れると描画してくれません。
Form1_Loadに入れれば最初に描画されますが、そこからグラフが変化しません。
この場合、どうしたらよろしいのでしょうか？


Imports ZedGraph

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
' CreateGraph_GradientByZBars(ZedGraphControl1) ' グラフ描画
Timer1.Enabled = True
Timer1.Interval = 500
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
' ZedGraphControl1.GraphPane.CurveList.Clear()
' ZedGraphControl1.GraphPane.GraphObjList.Clear()
CreateGraph_GradientByZBars(ZedGraphControl1) ' グラフ描画
End Sub

Private Sub CreateGraph_GradientByZBars(ByVal z1 As ZedGraphControl)
' 中身は
'http://www.atmarkit.co.jp/fdotnet/vblab/extcompo_02/zedgraph_02.html
'と同じ物を使用しています。（Randomなので成功すればグラフがグネグネ動くはず・・・）
End Sub
End Class
09619602009/02/20(金) 02:48:41
使用ソフトは
VisualBasic 2008 Express
Zedgraphは5.15です
09629602009/02/20(金) 10:20:59
自己解決しました
z1.AxisChange()　の後に
z1.Invalidate()　を実行することで、毎回描画されるようになりました。
0963デフォルトの名無しさん2009/02/20(金) 12:39:20
folder.existsと書いてもエラーがでるのでたすけて
0964デフォルトの名無しさん2009/02/20(金) 13:50:17
超能力者カモ～ン！
0965デフォルトの名無しさん2009/02/20(金) 13:53:37
>>964
スルーしる！
0966デフォルトの名無しさん2009/02/20(金) 14:14:15
965は部下を育てる力がないのでクビ
0967デフォルトの名無しさん2009/02/20(金) 14:17:49
本当の部下ならちゃんと育てるよ
0968デフォルトの名無しさん2009/02/20(金) 14:19:27
まずまともに質問する能力のない963をクビにすべきだろｗｗｗ
0969デフォルトの名無しさん2009/02/20(金) 14:20:54
いい人しか育てられない人も安月給で十分
0970デフォルトの名無しさん2009/02/20(金) 14:22:01
965と968は自分の子供が就職に苦しんではじめてわかるだろう
0971デフォルトの名無しさん2009/02/20(金) 14:23:28
>>970
生涯童貞だから一生わからないと思うよ
0972デフォルトの名無しさん2009/02/20(金) 15:40:08
>>966
バカ育てるよりまともなの雇った方がいいのは言うまでもないだろ。

>>967
やめとけ。

>>970
口だけじゃなく、てめぇが教えてやれよ。
0973デフォルトの名無しさん2009/02/20(金) 15:48:07
VB2008を使っています。コントロールの動的なコピーって出来ないでしょうか。

例えば、フォームにラベルを1つ作っておき、これを実行時に縦横にコピーし、グリッドのようなものを作りたいのです。

単純に new Label をフォームに登録し、Left/Top/Width/Height を変更しても、BorderStyle等も元のLabelと
同じものを設定しなければ見た目が変わってしまいます。

元のLabelと、Left/Top以外がまったく同じLabelを作成するにはどの様にすればよいのか教えてもらえないでしょうか。
0974デフォルトの名無しさん2009/02/20(金) 15:58:06
じゃぁ今の政治家は実力がないのになんで議員を続けてるんだ?
0975デフォルトの名無しさん2009/02/20(金) 16:08:11
>973
単純に、BorderStyle等も元のと同じに設定すれば？

めんどくさいって話ならスマン
0976デフォルトの名無しさん2009/02/20(金) 16:13:36
>>973
>グリッドのようなものを作りたいのです。
DataGridView ではあかんの？
09779732009/02/20(金) 16:26:17
>>975
突き詰めて言えば「めんどくさい」に分類されると思います・・・

>>976
だめな部分があるので・・・

単純な方法はなさそうなので、*.Designer.vb で設定されているプロパティをコピーするようにします。
ありがとうございました。
0978デフォルトの名無しさん2009/02/20(金) 16:30:50
メモ帳でプログラミングしたことないんだろこのカンジじゃ
0979デフォルトの名無しさん2009/02/20(金) 23:59:24
vb2005です

OpenTextFieldParse　と　TextFieldParse　の違いが分かりません

実際使用して見ましたが、
OpenTextFieldParse⇒漢字や仮名などの2バイト文字が文字化けする
TextFieldParse⇒同上だが、シフトJISでエンコード可能で、文字化けが回避できる

くらいしか差が発見できません・・・
読み込み時などのパフォーマンスなど、他に違いはあるのでしょうか・・・
0980デフォルトの名無しさん2009/02/21(土) 00:10:02
違いってw
OpenTextFieldParserはメソッド
TextFieldParserはクラス
ガソリンとガソリンスタンドの違いを聞いてるようなものだぞw
0981デフォルトの名無しさん2009/02/21(土) 00:22:15
>>980
ガソリンを使ったらガソリンスタンドが生成されるってこと？
0982デフォルトの名無しさん2009/02/21(土) 00:24:32
>>981
バカでもなきゃ違いを聞いたりしないってことさ
0983デフォルトの名無しさん2009/02/21(土) 00:35:11
>>982
わかってるなら教えてあげればいいのに。
0984デフォルトの名無しさん2009/02/21(土) 00:36:47
そもそも次元が違う
比べるものじゃない
0985デフォルトの名無しさん2009/02/21(土) 00:46:47
メソッドとクラスの違いを聞いてるわけじゃないと思うけど。

OpenTextFieldParserで生成したTextFieldParserオブジェクトと
TextFieldParserをnewして生成したオブジェクトの動作が違うって言ってるんでしょ
0986デフォルトの名無しさん2009/02/21(土) 00:55:02
型は一緒なんだから設定の違いだろ
OpenTextFieldParserが勝手にストリームのエンコーディングなどを設定してるだけ
0987デフォルトの名無しさん2009/02/21(土) 01:04:32
>>986
>>979はエンコーディングの他に設定の違いはないか聞いてるんだろ。
0988デフォルトの名無しさん2009/02/21(土) 01:12:39
いやエンコーディングの違いも無さそう
TextFieldParserのString1つだけのコンストラクタを使ったのとまったく同じ
デリミタやフィールド幅を指定するオーバーロードを使った場合は文字通りそれらが設定されるだけ
0989デフォルトの名無しさん2009/02/21(土) 04:20:53
VB2005です

VB2008ってどうして推奨スペックがあんなに高いんですか。
2004年モデルのPCを使ってますが、スペックが足りず
VB2008使うには10万の費用がかかります。
0990デフォルトの名無しさん2009/02/21(土) 04:46:37
＞2004年モデルのPCを使ってますが
メモリさえ増やせば問題ない。メモリは今安いよ。
0991デフォルトの名無しさん2009/02/21(土) 12:59:09
初心者の質問です。
EXCELでは現在使っているワークシートを残しておきながら、現在のワークシートを改造する場合「名前を付けて保存」で別の名前で保存すれば
名前が違うだけで内容が同じワークシートが作成できます。
VB2008でそういうことをしたいのですが、やり方がわかりません。
どうしたらよいのでしょうか？
0992デフォルトの名無しさん2009/02/21(土) 13:00:15
普通に名前変えて保存するだけ
0993デフォルトの名無しさん2009/02/21(土) 13:33:58
htmlファイルからタグをはずして通常のテキストファイルに変換する方法はありますか？
0994デフォルトの名無しさん2009/02/21(土) 13:43:13
>>993
InnerText
0995デフォルトの名無しさん2009/02/21(土) 14:07:05
タグだけ削除してもそれは通常のテキストファイルではないような気がしないでもない
0996デフォルトの名無しさん2009/02/21(土) 14:48:47
>>994 995
さっそくのアドバイスありがとうございます
Inner Textを調べてみます

後でテキストは編集するのでとりあえずタグが外れたらいいのです
0997デフォルトの名無しさん2009/02/21(土) 16:09:24
次スレどこー?
0998デフォルトの名無しさん2009/02/21(土) 16:23:58
>997
ｵﾏｴが建てれ
0999デフォルトの名無しさん2009/02/21(土) 17:10:00
しょっぷきゅっきゅ９９９
1000デフォルトの名無しさん2009/02/21(土) 17:45:05
1000 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
1001１００１Over 1000Thread
このスレッドは１０００を超えました。
もう書けないので、新しいスレッドを立ててくださいです。。。
レス数が1000を超えています。これ以上書き込みはできません。