wheres my type mismatched??

I am finding a replacing with the following code:

Sub test()

Dim runs As Integer, result As String
If runs = 0 Then result = "0"
runs = Range("D17").Value
End Sub

I am getting the type mismatch error, no matter what I do. im sure it something soooo simple, but its beyond me lol.

thanks for your help with this dumb minor, annoying problem

thanks