类型“游标”的值不能转换为“短”

Question

我已将VB6迁移到点网，并且得到：

  

“游标”类型的值不能转换为“短”

这是我的代码：

Dim intSavePointer As Short ' Save off the MousePointer

' Change the mouse pointer to clue in user of update

intSavePointer = **MyBase.Cursor**(this is the error line of code)

' Change the mouse pointer back

 **MyBase.Cursor** = intSavePointer

该如何解决？

Answer 1

将Dim intSavePointer As Short更改为Dim savedCursor As Cursor。

Cursor不是int。我不知道为什么它在VB6中起作用，但是我从未使用过它。