VB2005を使用しています。
自分でボタンとなる画像を用意してピクチャーボックスに表示してボタンとしたいと思って
います。
例えば1枚の画像ファイルに各50x20ピクセルのボタンイメージを通常・押したとき・マウスオーバー時と横に並べて保存したとします。（合計150x20ピクセル）

Dim img = New Bitmap("C:\image1.jpg")
Dim g As Graphics = PictureBox1.CreateGraphics()
Dim rect As New Rectangle(0, 0, 50, 20)
g.DrawImage(img, 0, 0, rect, GraphicsUnit.Pixel)
g.Dispose()

動作アクションで切り取り先の座標を変えてこのようにやっているんですが、
他にいい方法はないでしょうか？

Formロード時にピクチャーボックスに画像を読み込ませているんですが、
読み込ませる分だけ宣言しなきゃいけないので大変なんです…。

回答ではありません、何方からもレスがないようなので。

> 自分でボタンとなる画像を用意してピクチャーボックスに表示してボタンとしたいと思って
> います。
> 例えば1枚の画像ファイルに各50x20ピクセルのボタンイメージを通常・押したとき・マウスオーバー時と横に並べて保存したとします。（合計150x20ピクセル）
>
> Dim img = New Bitmap("C:\image1.jpg")
> Dim g As Graphics = PictureBox1.CreateGraphics()
> Dim rect As New Rectangle(0, 0, 50, 20)
> g.DrawImage(img, 0, 0, rect, GraphicsUnit.Pixel)
> g.Dispose()
>
> 動作アクションで切り取り先の座標を変えてこのようにやっているんですが、
> 他にいい方法はないでしょうか？

上記は、何か(最終的な目的)をする為に貴方が考えた手段の説明に過ぎないかと思います。
従って、他にいい方法はと言われても一体何がしたいのか解りません。

> Formロード時にピクチャーボックスに画像を読み込ませているんですが、
> 読み込ませる分だけ宣言しなきゃいけないので大変なんです…。
どう大変なのか上記の説明では他の人に解りません。
読み込ませる分の個数が多い(どの位の個数か明記していない)からかコードが複雑だから
なのかとか。
現在はどのように書いているのかとか？

このような事を一々確認してまで答えたくないと思って静観されている方が私を含め
殆どかと思います。

ここの［初めにお読み下さい］の中の上手な質問の仕方（投稿文の書き方）等を参考に
ご自分の投稿を見直して見て下さい。
http://hanatyan.sakura.ne.jp/hazimeni.htm#keijiban