簡単法を実行するには？
ボタンを押して画像を読み込み、その画像をカウントするプログラムを考えたのですが、画像の絶対パスを取得するために毎回変更する部分ができてしまいました；；
誰か、どんな画像でも読み込める工夫を知ってる人がいたら教えてください。プログラムは↓
Function CountNumColor(ByRef DotWW As Long, ByRef DotHH As Long, ByRef CHECK_C As Long) As Integer
Dim Form1 As Object
Dim NumEQ As Double
Dim NumNot As Long
Dim x, y As Long
Dim ChkColor As Color = Color.FromArgb(0)
Dim myBitmap As New Bitmap("E:\2005\画像処理システム\無題.bmp")
NumEQ = 0
NumNot = 0
System.Windows.Forms.Application.DoEvents()
For x = 0 To DotHH - 1
For y = 0 To DotWW - 1
System.Windows.Forms.Application.DoEvents()
ChkColor = myBitmap.GetPixel(x, y)
If ChkColor.R = 0 And ChkColor.G = 0 And ChkColor.B = 0 Then
NumEQ = NumEQ + 1
Else
NumNot = NumNot + 1
Debug.Write("x,y,Val(Bitmap.GetPixel(x, y)")
End If
Next y
Next x
CountNumColor = NumEQ
End Function
このプログラムの”E:\2005\画像処理システム\無題.bmp”の部分を工夫してどんな画像でも読み込むことができることができるようにできないでしょうか？
わかる人の知恵を貸してください＞＜
#まず初めにマルチポストはやめた方がいいと思います。
http://oshiete1.goo.ne.jp/kotaeru.php3?q=1798395
どんな画像でもというのは、bmp以外でも。ということでしょうか。
それともbmpのみで、どこのフォルダでも。ということでしょうか。
後者ならば、引数にファイル名渡してから
宣言部ではなく、あとから指定するようにする。とか。
#前者だと知識不足でなんとも|=_=;
>>このプログラムの”E:\2005\画像処理システム\無題.bmp”の部分を工夫して(以下略)
この場合の「工夫」とは、単にファイル名を直接指定するのではなく、文字列変数に入れてそれを読み込ませる、ということでは・・・
| ツイート |  |