2001年04月20日更新

菱太産業

 
先頭ページ 賃貸情報 白醤油 料理
菱太産業 太田屋守山工場 その他 リンク
 
16進数変換(RGB)
企画・プレゼント
企画・プレゼント
料理レシピーの募集
 
その他−1
JavaScriptサンプル集
顔文字、絵文字
 
 
その他−2
醤油味噌の訪問者数
懸賞企画の統計データ
 
 
その他−3
サイトの履歴
 
 
 
   
絵文字 顔文字 テーブルアート 文字、記号

赤、青、青に0から255の整数を入力して、「変換」ボタンを押して下さい。16進数に変換されます。


赤:
緑:
青:


16進数

赤: 緑: 青:
注)VBScriptで処理しています。VBScript対応ブラウウザでご使用下さい。
VBScriptのソース

<SCRIPT LANGUAGE="VBScript">
Public r0,g0,b0
r0 = 0
g0 = 0
b0 = 0
Sub Button1_OnClick
    if rr.value = "" then
        r0 = 0
    else
        if (IsNumeric(rr.value)) then
            r0 = hex(int(abs(rr.value mod 256)))
        else
            MsgBox "数字以外が入力されています(赤色) " + rr.value
            r0 = ""
       end if
    end if
    if gg.value = "" then
        g0 = 0
    else
        if (IsNumeric(gg.value)) then
            g0 = hex(int(abs(gg.value mod 256)))
        else
            MsgBox "数字以外が入力されています(緑色) " + gg.value
            g0 = ""
        end if
    end if 
    if bb.value = "" then
        b0 = 0
    else
        if (IsNumeric(bb.value)) then
            b0 = hex(int(abs(bb.value mod 256)))
        else
           MsgBox "数字以外が入力されています(青色) " + bb.value
           b0 = ""
        end if
    end if
    rr1.value = r0 
    gg1.value = g0 
    bb1.value = b0 
End Sub
</SCRIPT>