GAPVelocity.ai
CustomCursor is not supported in the same way that it was on VB6.
To create a custom cursor use the Cursor Class.
PublicSub CustomCursor()
Command1.MousePointer = 99
Command1.MousePointer = VBRUN.MousePointerConstants.vbCustom
Command1.MousePointer = vbCustom
Command1.MouseIcon = LoadPicture("C:\Picture.cur")
EndSub
PublicSub CustomCursor()
'UPGRADE_ISSUE: (2036) CommandButton property Command1.MousePointer does not support custom mousepointers.
Command1.Cursor = vbCustom
'UPGRADE_ISSUE: (2064) CommandButton property Command1.MouseIcon was not upgraded.
Command1.MouseIcon = Image.FromFile("CursorFile")
EndSub
PublicSub CustomCursor()
Command1.Cursor = New Cursor("CursorFile")
EndSub
publicvoid CustomCursor()
{
//UPGRADE_ISSUE: (2036) CommandButton property Command1.MousePointer does not support custom mousepointers.
Command1.Cursor = vbCustom;
//UPGRADE_ISSUE: (2036) CommandButton property Command1.MousePointer does not support custom mousepointers.
Command1.Cursor = vbCustom;
//UPGRADE_ISSUE: (2036) CommandButton property Command1.MousePointer does not support custom mousepointers.
Command1.Cursor = vbCustom;
}
publicvoid CustomCursor()
{
Command1.Cursor =New Cursor("CursorFile");
}