• ベストアンサー

フォームにビットマップを表示

todo36の回答

  • todo36
  • ベストアンサー率58% (728/1234)
回答No.2

訂正 Me.AutoRedraw = False With Picture1 .Picture = LoadPicture("hoge.bmp") For X = 0 To Me.ScaleWidth Step .ScaleWidth For Y = 0 To Me.ScaleHeight Step .ScaleHeight Me.PaintPicture .Picture, X, Y Next Next End With Me.AutoRedraw = True

関連するQ&A

  • 画像の縮小

    ピクチャー画像の縮小を行いたいのですが、 sw = Picture1.ScaleWidth * 0.1 sh = Picture1.ScaleHeight * 0.1 w = Picture1.Width h = Picture1.Height Picture2.Height = h * 0.1 - Picture2.Height - Picture2.ScaleHeight Picture2.Width = w * 0.1 - Picture2.Width- Picture2.ScaleWidth Picture2.PaintPicture Picture1.Picture,0,0,sw,sh のようなプログラムを行うと、画面で見えている範囲のピクチャーは縮小してくれるのですが、VB画面からはみ出る部分は切れてしまいます。 ピクチャーを1つずつ、とって縮小していくとなると相当な時間がかかってしまうので、早く処理できる方法は無いでしょうか? ご存知の方は教えて下さい。

  • 小画像を任意の位置に壁紙表示するには?

    小サイズの画像ファイル(300*100 ぐらい、 bmp 形式 )があって、 これをデスクトップ画面に出しておきたいと思っています。 その時に、画面の中央とかじゃなくて、右上辺りに表示できるようにしたいと思ってるんですが、 どういう方法が考えられるでしょうか? 画面のプロパティ>「デスクトップ」タブのところで、背景用にこのファイルを選んだ場合には、その表示位置としては、  ・中央に表示  ・並べて表示  ・拡大して表示 しか選べないようで、何か別の方法を工夫しきゃならないんだろうとは思ってますが ... --

  • 挿入した画像を等倍ではなく、サイズを指定したい

    Sub Macro1() ActiveSheet.Pictures.Insert( _ "C:\Users\画像.gif").Select With Selection.ShapeRange .ScaleWidth 1, msoFalse, msoScaleFromTopLeft .ScaleHeight 1, msoFalse, msoScaleFromTopLeft End With End Sub これで画像を挿入し、サイズを変更してるのですが 1だと等倍になってしまうようです。 常に1cmとか、サイズを指定して変更するプロパティはありますか?

  • Access2000 フォームビューの表示関連

    どなたか、ホントにお助け下さい。 A、B、Cテーブルのデータを1つのフォームで表示入力できるよう、A、B、Cを繋げたクエリ作成し、 A対B、A対Cの一対多リレーションシップ設定したんですが、フォームビューで確認すると背景だけで表示されません。 ・コントロールのプロパティの「可視」の状態は「はい」  コントロールのはフォーム上の配置位置が「ページヘッ ダー/フッター」は「詳細」となっております。 切り分け内容 ・フォーム-対象フォルダ選択-開く-背景表示無し -プロパティ-レコードソース-クエリー-レコードソースを外すと”入力フォーム自体”は表示されるようになりますが、各々#Name?となってしまいます。 お助け下さい。

  • 壁紙にJPGが表示されないのは、なぜ?

    壁紙に、JPGが表示されなくなりました。 以前は、表示されてたのですが、 フリーの時計(壁紙にカレンダーを書き込むタイプ)を使用したあとに、JPGのみ表示されなくなった気がするのですが「確かではないのですが」 ★なにもないところで、右クリック→アクティブデスクトップ→ デスクトップのカスタマイズ→画面のプロパティーで背景で、画像ファイルを選択して、表示させることが出来たのですが、現在できません(JPGのみ表示できません、BMP、GIFなどは、表示されるのですが) ただし、IEにJPGのファイルを表示させてから、 それを、背景にすることは、できるのですが、そうすると、★の上記方法で、みてみると、ファイルがBMPに変わっているのです。(元のファイルはJPGのままです) ★の方法で、JPGを表示させることはできるでしょうか? よろしくお願いします。

  • 壁紙が表示できない(追加)

    ご指摘がありましたので、もう少し詳しい内容をお伝えしたいと思います。 その壁紙は壁紙専門のページからダウンロードしました。 ファイルの種類はbmpです。 解凍後画面のプロパティの背景のところで選択しても、実際にデスクトップ上に表示することができず、かわりにデスクトップが黒くなってしまいます。 以上のことから何かお気づきになることがありましたら、教えてください。

  • 別ウィンドウを最大化表示させる

    別ウィンドウを最大化表示させたいのですが、 http://www.tohoho-web.com/how2/window.htm#window のようにしてもメニューバーなどがなくなってしまうし、位置を指定しなければなりません。 ●別ウィンドウを最大化するには位置(サイズ)を指定するやり方しかないのでしょうか? ●また、メニューバーやツールバーなども一緒に表示させる最大化の仕方はありますでしょうか? ●もうひとつ、全画面(F11)で表示させるやり方はありますでしょうか? 経験者の方、お願いします。

    • ベストアンサー
    • HTML
  • ピクチャーボックスの座標指定について

    ピクチャーボックス内で表示位置(座標)を指定して画像を表示したいです。 この場合loadpictureによる座標指定はできないのでしょうか? よろしくお願いします。

  • 画面のプロパティのデスクトップタブで

    画面のプロパティのデスクトップタブで 背景を変更しようと「参照」ボタンを押してJPEG画像を選びました。 しかし、その画像を選択してOKを押しても何の変更もありません。 「背景」一覧もC:\WINDOWS\Web\Wallpaperからのものではなく、 マイピクチャのとあるフォルダのbmp画像が表示されています。 どうすれば背景をJPEG画像に変えられるでしょうか? 「背景」一覧をC:\WINDOWS\Web\Wallpaperのものにどうやったらもどせるでしょうか? Desktop Albumというフリーソフトを使ったときからおかしくなったような気がします。

  • 画面のプロパティでの 壁紙のデフォルトフォルダの変更

    画面のプロパティで背景を変更するとき、一覧に出てくるのは、 C:\WINDOWS の bmpファイル か C:\WINDOWS\Web\Wallpaper の JPGファイル ですが、 このデフォルトフォルダをマイドキュメントのフォルダに変えたいのですが、どうしたらよいのでしょうか? よろしくおねがいします。