我刚学了一点：
Private Sub command1_click()
Dim r As Long, g As Long, b As Long, st As Long, gray As Long
Private Sub command1_click()
Dim r As Long, g As Long, b As Long, st As Long, gray As Long
阅读背景：
将JPG转灰度然后二值化，速度，显示和打印的问题
来源：互联网
分享到：
