タイトル : カラー(赤 緑 青) 投稿日 : 2009/06/11(Thu) 10:06 投稿者 : VB
VB2008 WinXp ---------------------------------------------------------------------- ' 初期選択する色を設定する CommonDialog1Color.Color = Text1.BackColor ' ダイアログを表示する If CommonDialog1Color.ShowDialog = DialogResult.OK Then Text1.ForeColor = CommonDialog1Color.Color End If ---------------------------------------------------------------------- 上記のように、色の選択画面であるテキストボックスの色を変えているのですが。 このプログラムの後に、指定した色の[赤] [緑] [青]を数値で取得したいのですが。 どのように書けば、それぞれの値が取得できるのでしょうか?(0〜255の数値) '???・・・取得した値 Red.text = CStr(???) Green.text = CStr(???) Blue.text = CStr(???) |