A 回答 (3件)
- 最新から表示
- 回答順に表示
No.3
- 回答日時:
いまいち何がやりたいのか私が正しく理解できている自身が無いのですが...
Image1.Picture.Width とか Image1.Picture.Height などで画像のサイズは
求められますよ。
単位を Pixel でということなら ScaleX、ScaleY メソッドで単位変換を
行います。
With Image1
.Picture = LoadPicture("C:\Sample.bmp")
x = Int(ScaleX(.Picture.Width, vbHimetric, vbPixels))
y = Int(ScaleY(.Picture.Height, vbHimetric, vbPixels))
End With
MsgBox CStr(x) & " × " & CStr(y) & "pix"
こんな感じで Image コントロールの Picture のサイズを Pixel で求める
ことができます。ここまでで、当初ご質問のサイズ取得は解決しませんか?
これを使って2倍に拡大して PaintPicture したいなら、
With Picture1
.AutoRedraw = True
’Picture1 で指定する単位も Pixel にする
.ScaleMode = vbPixels
.PaintPicture Image1.Picture, 0, 0, x * 2, y * 2, 0, 0, x, y
End With
とか。。こういうことではないのでしょうか?
ありがとうございます。
ようやく、Picture.Width/HeightとParent.ScaleWidth/ScaleHeightの違いが理解できました。大変勉強になりました。
元々VB4で作成されたフォームのせいか、PaintPictureする際にもPictureに全画面表示されない等悩みましたが、昨日無事プログラムの改造が完了しました。
連絡遅くなり申し訳ありません。本当に助かりました。
また、よろしくお願いします。
No.1
- 回答日時:
VB のバージョンは?
# 最初から書いた方が良いですよ。
この記事が参考になりませんか?
VB6と .Net 両方のサンプルコードがあります。
http://www.microsoft.com/japan/msdn/vbasic/migra …
失礼しました。
OSは、WindowsXP SP2
VBは、VB6.0
で開発しています。
上記HP紹介いただき、ありがとうございます。
ただ、今回のケースの場合、イメージデータサイズが異なるため、イメージA(400ピクセル×300ピクセル)の全体表示ができるサイズのImageにイメージB(800×400)を読み込むとPaintPictureでは左上1/4しか表示されません。
ファイル名ではイメージAか、イメージBか判断できないため困っています。助けてください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- PDF aiデータをpdfに変換するとサイズが変わりますか? 逆にpdfデータをaiで開くとサイズが変わりま 4 2022/11/02 01:21
- Excel(エクセル) 【VBA】指定フォルダに格納中のテキストファイルをエクセルで処理し結果のエクセルを新規フォルダに保存 1 2022/03/25 14:19
- Excel(エクセル) Excel グラフのプロットエリアについて 2 2022/08/26 18:12
- その他(コンピューター・テクノロジー) データの転送速度は何で決まるのでしょうか?読み込み3000MB/Sで書き込み2000MB/Sの外付け 3 2023/07/14 22:13
- Android(アンドロイド) Androidスマホのデータ移行が終わらない 1 2023/08/04 17:25
- LANケーブル・USBケーブル USBケーブルが、充電専用ケーブルなのか、充電とデータ転送可能ケーブルなのか、わかる方法を教えて下さ 11 2023/05/01 10:46
- PHP PHPで入力フォームでデータを確認表示画面まで送る流れを日本語で理解したいのです。 1 2023/05/29 19:12
- その他(クラウドサービス・オンラインストレージ) バックアップ用ファイルストレージについて 2 2022/11/11 13:58
- PDF パワポ及びPDFのデータ量について 3 2023/07/20 10:24
- C言語・C++・C# pythonのファイルの並びでの読み込みとリストについて 4 2022/04/13 03:52
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
教えて下さい
-
配列でデータが入っている要素...
-
ACCESSからEXCELに出力する際、...
-
多量のSUMIF式を軽くしたい
-
[C言語] コメント文字列を無視...
-
エクセルで2つの時系列のデー...
-
【エクセル】測定時間がバラバ...
-
VBにおいてフォーム間の変数の...
-
この行は既に別のテーブルに属...
-
Accessで該当データにフラグを...
-
LoadPictureしたイメージデータ...
-
C# ソケット通信でデータ受信時...
-
あんまり考えたくないけど
-
チェックサムの実装方法について
-
<VB>String→Object
-
テーブルの空白部分に斜め線を...
-
エクセルで1次近似をもとめたい
-
EXCELVBAでSQLserverからデータ...
-
携帯電話を水につけるとデータ...
-
パースとはなんですか?
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
教えて下さい
-
配列でデータが入っている要素...
-
【エクセル】測定時間がバラバ...
-
メモ帳(テキストデータ)をExc...
-
この行は既に別のテーブルに属...
-
VBAを使ってOutlookメール本文...
-
VBA 空白セルを削除ではない方...
-
S9タイプからXタイプにデータ...
-
多量のSUMIF式を軽くしたい
-
Accessで該当データにフラグを...
-
[C言語] コメント文字列を無視...
-
[エクセル]データの個数が2番目...
-
エクセルで2つの時系列のデー...
-
特定のデータの抽出方法を教え...
-
外部データの更新がうまくでき...
-
ActiveReportについて
-
CString型の文字列連結について
-
ユーザーフォームのテキストボ...
-
カンマからスラッシュに
-
シーケンサにパソコンからアク...
おすすめ情報