千家信息网

vb Screen.MousePointer 属性

发表于:2025-01-25 作者:千家信息网编辑
千家信息网最后更新 2025年01月25日,Private Sub Command1_Click()Dim i As IntegerFor i = 1 To 15Screen.MousePointer = iMsgBox "Screen.Mou
千家信息网最后更新 2025年01月25日vb Screen.MousePointer 属性

Private Sub Command1_Click()

Dim i As Integer

For i = 1 To 15

Screen.MousePointer = i

MsgBox "Screen.MousePointer =" & i

Next

End Sub


0