C# と VB.NET の質問掲示板

taka さん、こんにちは
ダッチです。

どのようにして砂時計に設定したのでしょうか？

マウスカーソルは通常フォームやコントロールに対してを設定します。
もしマウスカーソルを砂時計にしたのにもかかわらず変化がないのであれば、
何もフォームが表示されていないか、フォームの上にマウスカーソルがない状態だと思います。

たとえば、このコードでは Form1 が表示されるまでの間
マウスカーソルが砂時計になります。
砂時計になることが確認できるのは Button1 が配置されているフォームや
同じアプリケーションのそれ以外のフォームの上にマウスカーソルがある場合です。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    System.Windows.Forms.Cursor.Current = Cursors.WaitCursor
    Dim f As New Form1
    Threading.Thread.Sleep(3000) ' わかりやすいようにスリープを入れています。
    f.Show()
    System.Windows.Forms.Cursor.Current = Cursors.Default
End Sub

参考になるページがありましたので紹介します。
    フォーム（またはコントロール）のマウスポインタ（カーソル）を待機状態にする
    http://dobon.net/vb/dotnet/form/cursorcurrent.html