魔界先生の場合、いろいろアドバイスがつくので、解決率も100パーセントだし。
・・・
さくら先生のコードで解決しました。
 Dim rotatepoint As New PointF(100 + CInt(kyara(3).Width / 2), 100 + CInt(kyara(3).Height / 2))
クルクル回ってます。ありがと（＾＾）