tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^3: ツリービュー ノードの修正
投稿日: 2010/09/27(Mon) 18:02
投稿者魔界の仮面弁士
> 実現したいことは…
> 子フォームで取得した内容で、
> 親フォームの選択ノードを書き換えたいということです。
> 置き換え作業は、親フォーム自身でと考えております。

やりたい事はわかりました。
で、肝心の質問内容は何でしょうか?

わからない点を具体的に書いてもらわないと、
こちらとしても答えようがありません。(^^;


とりあえず…子フォームを「InputBox」で置き換えた場合、親フォーム側の処理は

 s = InputBox("新しい値を指定してください")   '入力値を受け取る
 If s <> "" Then
  Exit Sub  'キャンセル時は何もしない
 End If
 TreeView1.SelectedItem.Text = s 'ノードのテキストを書き換える

のようになるかと思います。ここまでは宜しいでしょうか?
(実際には Text だけでなく Key も変更するのでしょうけれども)



あるいは子フォームを「コモンダイアログ」で置き換えれば、

 CommonDialog1.CancelError = True
 On Error Resume Next
 CommonDialog1.ShowOpen 'ダイアログを表示
 If Err.Number = cdlCancel Then
  Exit Sub 'キャンセル時は何もしない
 End If
 On Error GoTo 0
 TreeView1.SelectedItem.Text = CommonDialog1.FileName 'テキストを書き換える

のように書けるでしょう。
多少コードは変わりますが、先ほどのコードと基本的には変わりませんよね。


上記 InputBox や CommonDialog の呼出部分を、
自作のモーダルフォームに置き換えた場合も、
同様のコードになるかと思います。

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。