Dim instance As ClientHwnd Dim c As System.Drawing.Color Dim returnValue As Integer returnValue = instance.Color2Int(c)
'ClientHwndクラス Color2Intメソッド Imports System.Windows.Forms Public Class AddIn Private chw As ClientHwnd Public Sub New() chw = New ClientHwnd() Dim result As Integer = chw.Color2Int(System.Drawing.Color.Red) MessageBox.Show(result.ToString & " = &H" & result.ToString("X6")) End Sub End Class
このページのQRコード
便利ウェブサイト
便利 Android アプリ
便利 iOS(iPhone,iPad) アプリ