tstsst
سه شنبه 16 اسفند 1390, 20:56 عصر
سلام
این کد در موقعی که چرخ موس رو به سمت پایین می چرخونم درست عمل میکنه ولی عکسش رو که انجام میدم خراب میشه هم پایین هم بالا ...
If delt = 0 And e.Delta > 0 Then
Exit Sub
End If
If e.Delta < 0 Then
ListView1.Items(delt).Selected = True
delt = delt + 1
End If
If e.Delta > 0 Then
ListView1.Items(delt).Selected = True
delt = delt - 1
End If
متشکر.
این کد در موقعی که چرخ موس رو به سمت پایین می چرخونم درست عمل میکنه ولی عکسش رو که انجام میدم خراب میشه هم پایین هم بالا ...
If delt = 0 And e.Delta > 0 Then
Exit Sub
End If
If e.Delta < 0 Then
ListView1.Items(delt).Selected = True
delt = delt + 1
End If
If e.Delta > 0 Then
ListView1.Items(delt).Selected = True
delt = delt - 1
End If
متشکر.