ben bunu vb 4 e uyarlamıştım bulursam atayım