VB.NET質問スレ(Part25)at TECH
VB.NET質問スレ(Part25) - 暇つぶし2ch599:デフォルトの名無しさん
08/04/22 02:37:58
>>597
そうそう。君はそうやって人の言うことを聞いとくべきだよ。
中学生とは思えないほど稚拙な文章だったけど、面白かったよ。

600:デフォルトの名無しさん
08/04/22 19:58:44
どこへの誤爆だw

601:デフォルトの名無しさん
08/04/23 10:42:35
ウインドウを持たないシステムトレイに常駐する外部アプリを、一定の条件で終了させて再度起動させたいのですが、
強制終了(Kill)させると、システムトレイのアイコンが残ったままになります。

マウスポインタを当てれば消えるのですが、放っておくとアイコンがどんどん増えていきます。
なんとかいい対処法はないでしょうか?

よろしくお願いします。



602:デフォルトの名無しさん
08/04/23 11:51:25

これは重大ニュースです!!

3.29リチャード・コシミズ東京講演会7/19
URLリンク(video.google.com)

ここで興味深い事実が述べられている。イラクに行った自衛隊の隊員から35人が
死んでいた事実を知っていましたか?この35人のうち12人が「原因不明」とのこと!
原因不明なのでしょうね? さらに、イラクから戻ってきて死んだのが、なんと自殺と
交通事故さらに精神障害で、なんと100人が死んでいるということでした!

これは一体全体、なんなのだろう!みなさんが真実を知ることを望んでいます!!


603:デフォルトの名無しさん
08/04/23 12:27:12
コピペ君って馬鹿だな、まで読んだ。

604:デフォルトの名無しさん
08/04/23 13:38:30
FlexGrid.netでセルに改行が入力できないようにするには
どうしたらいいですか?

605:デフォルトの名無しさん
08/04/23 14:20:29
>>604
TextChangedかValueChangedのイベントで改行を削除するようにするとか

606:デフォルトの名無しさん
08/04/24 11:42:13
VB.netでアプリケーションの一覧を取得するPGを作成しています。

URLリンク(www.microsoft.com)
で以下のVBSのコードを発見したのですがこれを.net用で動くように変換したいのですが、、
知恵を貸してください。


strHost = "."
Const HKLM = &H80000002
Set objReg = GetObject("winmgmts://" & strHost & _
"/root/default:StdRegProv")
Const strBaseKey = _
"Software\Microsoft\Windows\CurrentVersion\Uninstall\"
objReg.EnumKey HKLM, strBaseKey, arrSubKeys

For Each strSubKey In arrSubKeys
intRet = objReg.GetStringValue(HKLM, strBaseKey & strSubKey, _
"DisplayName", strValue)
If intRet <> 0 Then
intRet = objReg.GetStringValue(HKLM, strBaseKey & strSubKey, _
"QuietDisplayName", strValue)
End If
If (strValue <> "") and (intRet = 0) Then
WScript.Echo strValue
End If
Next

607:デフォルトの名無しさん
08/04/24 12:41:48
URLリンク(bbs.wankuma.com)
俺の目には全く同一の質問に見えるぜ

608:デフォルトの名無しさん
08/04/24 13:12:36
うむ。同じだな。
まぁ、向こうの方がオレらより知識は上だし、
向こうで解決しなかった問題を
ここの住人が答えられると思ったのか?

609:デフォルトの名無しさん
08/04/24 13:44:45
いや、単なるレジストリの値を取得するだけのことなんだが
Dim rkey As Microsoft.Win32.RegistryKey = Microsoft.Win32.Registry.LocalMachine.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Uninstall", False)
For Each subkeyName As String In rkey.GetSubKeyNames
Dim srkey As Microsoft.Win32.RegistryKey = rkey.OpenSubKey(subkeyName, False)
Dim objRet = srkey.GetValue("DisplayName")
If objRet Is Nothing Then
objRet = srkey.GetValue("QuietDisplayName")
End If
If Not IsNothing(objRet) Then
Console.WriteLine(objRet.ToString())
End If
Next

610:デフォルトの名無しさん
08/04/24 13:48:16
>>606は自分で考えようと言うつもりは全くないだろ
お前ら良く答えるな

611:デフォルトの名無しさん
08/04/24 14:04:29
意味不明・・・

612:デフォルトの名無しさん
08/04/24 14:09:08
知恵を貸してくれもなにも
どこまで解釈していて、何が出来ないから解決するのに知恵を貸してくれってならわかるが
この質問じゃ解答できるのエスパーくらいじゃないか?

613:デフォルトの名無しさん
08/04/24 17:53:13
まったく別のプロジェクトどうしで同じファイル(自分で作成した設定ファイル)を
参照したいのですが、VSで項目追加すると勝手にそれぞれのプロジェクトの
フォルダにコピーしてきてしまいますよね?そうすると、結局別々のファイルを
参照してることになってしまうのですが、
VB6.0のときのように、プロジェクト直下に無いファイルでもそのまま参照して
使用できるように

614:デフォルトの名無しさん
08/04/24 17:54:18
ならないでしょうか?


すみません、途中で書き込みしてしまいました。

615:デフォルトの名無しさん
08/04/24 19:24:37
>>613
「設定ファイル」なんかを参照設定する必要がどこにあるのか理解できません。

616:デフォルトの名無しさん
08/04/24 19:33:59
>>613
> まったく別のプロジェクトどうしで同じファイル(自分で作成した設定ファイル)を
> 参照したいのですが、VSで項目追加すると勝手にそれぞれのプロジェクトの
> フォルダにコピーしてきてしまいますよね?そうすると、結局別々のファイルを
> 参照してることになってしまうのですが、
> VB6.0のときのように、プロジェクト直下に無いファイルでもそのまま参照して
> 使用できるように
馬鹿じゃない?

617:613
08/04/24 22:18:13
参照設定という書き方がまずかったですね。
具体的に言うと、App.configファイル内の接続文字列の設定を外部ファイルに
外出ししてるんですが、アプリケーションのプロジェクトとそのテストプロジェクトで
この外部ファイルを共有して参照したいんですけど、
何かいい方法ないですかね。

618:デフォルトの名無しさん
08/04/25 00:51:30
そのファイルがプロジェクトに属さないといけない理由がわからない

619:デフォルトの名無しさん
08/04/25 01:20:36
>613
[プロジェクト]-[既存項目の追加]-[リンクとして追加]のこと?

既存ファイルを選ぶダイアログボックスの追加ボタンが
コンボボックスみたいになっててそこで選べる


最新レス表示
レスジャンプ
類似スレ一覧
スレッドの検索
話題のニュース
おまかせリスト
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch