Visual Basic 中学校 掲示板 投稿の管理
タグのない投稿を抽出
統計
RSS
Visual Basic 中学校
投稿一覧
画像のマルチページの処理
この投稿へのリンク
https://keijiban.umayadia.com/ThreadDetail.aspx?ThreadId=30395#CommentId83508
この投稿の削除
削除パスワード
削除する
コメント本文
投稿者
allgreen
 (社会人)
投稿日時
2019/4/17 17:15:31
ほかのところにあったサンプルで申し訳ないのですが
名前空間の宣言方法というかが、わかっていないのが問題なのではないかと考えています
次のサンプルの場合
たぶん、最初の3行が名前空間の追加に必要なのではと思いますが
System.Drawing と System.Windows.Forms は、追加されているようなのでが
System.Drawing.Imaging は、追加された参照というところにでてきません
これが原因なのかは、わかりませんが
「FrameDimensionの宣言がありません」となります
何かをダウンロードするなりして、追加しなくてはいけないのでしょうか?
'Imports System.Drawing
'Imports System.Drawing.Imaging
'Imports System.Windows.Forms
'画像ファイルのパス
Dim filePath As String = "C:\test.gif"
'描画先とするImageオブジェクトを作成する
Dim canvas As New Bitmap(PictureBox1.Width, PictureBox1.Height)
'ImageオブジェクトのGraphicsオブジェクトを作成する
Dim g As Graphics = Graphics.FromImage(canvas)
'画像を読み込む
Dim img As Image = Image.FromFile(filePath)
'FrameDimensionを取得する
Dim fd As New FrameDimension(img.FrameDimensionsList(0))
'フレーム数を取得する
Dim frameCount As Integer = img.GetFrameCount(fd)