東海オンエア虫眼鏡が彼女とラブラブ？画像は？
640 x 500px• 6 x 17. 00 5プリペイド M• 2000 x 1563px• 9 x 13. 00 15プリペイド L• 4000 x 3126px• 9 x 26. 00 30プリペイド XL• 9584 x 7491px• 1 x 63.
次の
640 x 500px• 6 x 17. 00 5プリペイド M• 2000 x 1563px• 9 x 13. 00 15プリペイド L• 4000 x 3126px• 9 x 26. 00 30プリペイド XL• 9584 x 7491px• 1 x 63.
次の
フォーム上に任意のパネルを配置して、その中にPictureBoxを入れて下さい。 Windows. Forms. MouseEventArgs Handles PictureBox1. Windows. Forms. MouseEventArgs Handles PictureBox1. MouseUp Me. PictureBox1. この回答への補足 こんにちは。 ご回答ありがとう御座います。 ご指摘にあります通り、以前の回答内容につきましては 私も参照させていただいておりましたが、こちらの例では AutoSize指定されたPictureBoxをフォームの大きさ目一杯を使って Locationプロパティを変更してずらして表示させる方法だと思います。 つまり虫眼鏡になる部分がフォームそのものとなります。 今回の場合は、あるフォーム上のPictureBoxの大きさや表示場所（座標）を 変えることなく、表示内容だけドラッグで移動したいと考えております。 つまり虫眼鏡になる部分がフォームではなくPictureBoxとなります。 Parent. PointtoClient Cursor. Location PictureBox1. Parent. PointtoClient Cursor. Location Pict... Clone ; pictureBox1. Clone ; pictureBox1. Clone ; pictureBox1. Q 最近、VB6からVB. NET 2003へプログラムの移行作業を始めたものです。 極々基本的なことなのかもしれませんが、. NETでフォームに描いたグラフィック（線や円など）を消去するコードがなかなかうまく書けず困っています。 Cls だけで消えるのですが、それに対応するコードはどのように記載すれば宜しいでしょうか？ ヘルプなどで見るとClearメソッドを使用するとありましたが、どうもうまく動きません。 例えば、以下の簡単な例でしたらどのように変えれば宜しいでしょうか？ 宜しくお願いいたします。 Object, ByVal e As System. EventArgs Handles Button1. Click Dim grph As System. Drawing. CreateGraphics grph. DrawLine Pens. FromArgb 0, 0, 0 e. Graphics. Object, ByVal e As System. EventArgs Handles Button2. Click ClearScreen e End Sub 最近、VB6からVB. NET 2003へプログラムの移行作業を始めたものです。 極々基本的なことなのかもしれませんが、. NETでフォームに描いたグラフィック（線や円など）を消去するコードがなかなかうまく書けず困っています。 Cls だけで消えるのですが、それに対応するコードはどのように記載すれば宜しいでしょうか？ ヘルプなどで見るとClearメソッドを使用するとありましたが、どうもうまく動きません。 例えば、以下の簡単な例でしたらどのように変えれば宜しいでしょうか？ 宜しくお願... A ベストアンサー お望みのことをするには、Button2のClick時にFormのRefreshメソッドを呼んであげればOKです。 そうすれば、フォームが再描画されて描画済みのグラフィックが消去されます。 コードとしてはこんな感じです。 Object, ByVal e As System. EventArgs Handles Button1. Click Dim grph As System. Drawing. CreateGraphics grph. DrawLine Pens. Object, ByVal e As System. EventArgs Handles Button2. Click Refresh End Sub Q VB初心者です。 NET TIPSの中に「ListViewコントロールでサムネイル画像を一覧表示するには？」というものがありました 今回、それを利用してサムネイル一覧の表示をしようとして行き詰りました。 行き詰ったのは、第一段階の、サムネイル画像のしたのファイル名の所です。 よく分からずに ListView1. Items. GetFileNameWithoutExtension bmpFiles i ListView1. Items. Add bmpFileName bmpFileName（ファイル名のみ）に変更したら、ファイル名は表示されるのですが、画像が表示されませんでした。 次に両方書いたのですが画像の下にフルパスその横にファイル名が表示されます。 GetFileNameWithoutExtension bmpFiles i ListView1. Items. Add bmpFiles i , i ListView1. Items. Add bmpFileName 色々調べてみたのですが、思ったような記述が無かったのでここで質問させて頂きました。 拙い質問なので分かり難いかと思いますがアドバイスをよろしくお願いいたします。 VB初心者です。 NET TIPSの中に「ListViewコントロールでサムネイル画像を一覧表示するには？」というものがありました 今回、それを利用してサムネイル一覧の表示をしようとして行き詰りました。 行き詰っ... A ベストアンサー PictureBoxで透過処理を行うのであれば BackColorプロパティを Color. TransParentに変更します 次に 設定する画像を Bitmapオブジェクトで構築して MakeTransparentメソッドで 何色を透明にしたいか設定します 次に 透過画像の背景になるコントロールの ControlsコレクションにAddします PictureBoxの Locationを適切な位置に変更すれば 希望の動作になるかと … ' 透過画像を用意 Dim bmp as new Bitmap "透過画像のパス" ' 透過色を設定 bmp. MakeTransparent bmp. GetPixel 0,0 ' コントロールの背景色を透過に設定 PictureBox2. Controls. Controls. add PictureBox2 End if ' 前景の描画位置を設定 PictureBox2. TransParentに変更します 次に 設定する画像を Bitmapオブジェクトで構築して MakeTransparentメソッドで 何色を透明にしたいか設定します 次に 透過画像の背景になるコントロールの ControlsコレクションにAddします PictureBoxの Locationを適切な位置に変更すれば 希望の動作になるかと … ' 透過画像を用意 Dim bmp as new Bitmap "透過画像のパス" ' 透過色を設定 bmp. MakeTransparent bmp. GetPixel 0,0 ' コントロールの背景色を透過... A ベストアンサー Dim Bmp As New Bitmap Pic. Width, Pic. Height Dim Fnt As New Font txtFntName. Text, txtFntSize. Text, RaSty, GraphicsUnit. Pixel Dim Bsh As New SolidBrush ColPic. FromFile FileName PoF. FromImage Bmp g. DrawString txtStr. Text, Fnt, Bsh, PoF Pic. StretchImage Pic. 変更後にイメージファイルを読み込めば 縮小表示される Dim Bmp As New Bitmap Pic. Width, Pic. Height Dim Fnt As New Font txtFntName. Text, txtFntSize. Text, RaSty, GraphicsUnit. Pixel Dim Bsh As New SolidBrush ColPic. FromFile FileName PoF. FromImage Bmp g. DrawString txtStr. Text, Fnt, Bsh, PoF Pic. A ベストアンサー こんばんは。 Excel97 でも、同じですね。 以下で試してみてください。 NETのプロジェクトがぐちゃぐちゃで参照設定とかいろんなの呼んでしまっているので、新しく作成しなおしたいのですが、 新しいプロジェクトでプロジェクトを作成し、前のプロジェクトで必要なファイル（. vb、RESX）を新しいプロジェクトのフォルダにコピーしたのですが、 普通のモジュールは追加＞新しい項目の追加でなんとか追加できたのですが、フォームの追加の仕方がわかりません＞＜教えてくださいー P. RESXファイルってフォームのデータが入ってるのでしょうか？そんな気がしてコピーしたのですが。 0からVB. NETに以降した際にアップデート情報みたいなのがプログラム上にくっついてしまって. vbファイルも参照項目も増えまくってしまった Q Microsoft Visual Studio 2008のスマートデバイス用で、PDA用のプログラミングを開発しています。 Windows. Forms. MouseUp 'ピクチャボックスの座標を表示させる End Sub Private pos As Pointで宣言しておき、 pos. X pos. Y でやると、どうも、フォームの座標が取得されてしまうようです ピクチャの画像は拡大・縮小をできるようにしてあるため、フォーム座標＝ピクチャ座標にはなりません ピクチャボックスの座標を取得するにはどのようにしたらよいのか、ご教授願います Microsoft Visual Studio 2008のスマートデバイス用で、PDA用のプログラミングを開発しています。 Windows. Forms. MouseUp 'ピクチャボックスの座標を表示させる End Sub Priv...
次の
640 x 500px• 6 x 17. 00 5プリペイド M• 2000 x 1563px• 9 x 13. 00 15プリペイド L• 4000 x 3126px• 9 x 26. 00 30プリペイド XL• 9584 x 7491px• 1 x 63.
次の