Private Declare Function GetPixel Lib \"gdi32\" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long) As Long
Private Declare Function GetDC Lib \"user32\" (ByVal hwnd As Long) As Long
Private Sub Command1_Click()
Dim hju As Long
Dim sss As Long
Dim ccc `为什么不能写成 dim ccc as long 或者 dim ccc as string
sss = GetDC(0)
hju = GetPixel(sss, 200, 200)
ccc = Hex(hju)
MsgBox ccc
End Sub
上面一段中如果写成dim ccc as long dim ccc as string都会提示不匹配...
为什么变量ccc不能定义为long 和string..vb中16进制数字是用哪种类型的变量保存的？
感激了
