VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日： 2006/11/22(Wed) 12:03
投稿者： たけ
Ｅメール：
ＵＲＬ：
タイトル： Re^3: 選択した色で背景色を変更

> ありがとうございます。
> 上手くいきました。
>
> 本当は、赤、緑、青の３色組み合わせ使用して細かく設定したかったのですが、
> 16進や10進でやりたかったのですが。


まずは、スクロールを使用してやってみました。

Private Sub HScroll1_Change()
    BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
End Sub

Private Sub HScroll2_Change()
    BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
End Sub

Private Sub HScroll3_Change()
    BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
End Sub

- 関連一覧ツリー （★ をクリックするとツリー全体を一括表示します）
- 返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

- VBレスキュー(花ちゃん) - - Web Forum -