No.2ベストアンサー
- 回答日時:
ピクチャボックスそのもののサイズを変更したいのであれば
ピクチャボックスのScaleModeではなく、ピクチャボックスのコンテナであるフォームのScaleModeを変更してからWidth/Heightpropertyを設定しましょう
Private Sub Command1_Click()
Dim org
org = Me.ScaleMode
Me.ScaleMode = 3
With PictureBox1
.Width = Yoko.Text
.Height = Tate.Text
End With
Me.ScaleMode = org
End Sub
といった具合です
No.1
- 回答日時:
Yoko = 600
Tate = 480 という変数はどこで宣言していますか?
Private Sub Command1_Click()の外で宣言している場合、
「Private Yoko as Integer」のように
Privateを先頭につけて宣言しなければ変数の中身が消えてしまいます。
または、Private Sub Command1_Click()の中で宣言すれば
うまくいくと思います。
この回答への補足
すみません。記述を省略してしまいました。
テキストボックスに入力した内容でサイズを変化したいと思います。
Private Sub Command1_Click()
With Picture1
.ScaleMode = 3 '
.Width = val(Yoko.text)
.Height = val(Tate.text)
End With
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 【マクロ】スクショ印刷がうまく動かない件 5 2022/12/06 17:37
- Excel(エクセル) 【エクセルマクロ】既に開いているIEの、サイズや表示位置を変更するには 4 2022/12/01 22:57
- Visual Basic(VBA) 【VBA】写真の貼り付けコードがうまく機能しません。 5 2022/09/01 18:43
- Visual Basic(VBA) 【VBA】写真の縦横比を変えずに貼り付ける 5 2023/06/13 11:42
- Visual Basic(VBA) ①ExcelVBAでカレンダーを作り、別のユザーフォームで日付を入力したいのですがエラーになります。 1 2023/02/17 18:39
- Visual Basic(VBA) ListBox1をClickしたときのイベント 5 2022/12/11 19:45
- Visual Basic(VBA) フォーム上のリストボックスに重複して表示しています 3 2022/10/19 11:55
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 2 2023/05/23 16:28
- Excel(エクセル) マクロで列を加えたら上手くいかなくなりました。 2 2022/05/23 17:59
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/08/10 14:24
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Matlabでsin波を使って矩形波を...
-
VB6でマウスのドラッグで範囲を...
-
タイムアウトする仕組みを作りたい
-
VBAでcallで呼び出したsubを終...
-
【VB6.0】 あるフォームから他...
-
他のフォームから別のフォーム...
-
キャッシュを無効に
-
コンボボックスからテキストボ...
-
Excel VBA: private sub 内の...
-
HTML + VBScript で Sleep でき...
-
共有フォルダの「共有のアクセ...
-
VB.netである関数を呼んで、そ...
-
VBAのフォーム カーソル移動
-
VBA public変数はどのようなこ...
-
[Excel2000]auto_closeを止めさ...
-
Excel VBA カーソルを当てた際...
-
リストビューの列ヘッダーの幅...
-
ExcelのVBAで文章にある複数の...
-
visual basic初心者です。 visu...
-
VB2010 TextBoxの数字の表示...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
FlexGridで文字色を変更。
-
SCALEの使い方教えてください
-
PictureBoxでのアニメーション...
-
ボールが壁に当たって跳ね返る...
-
Matlabでsin波を使って矩形波を...
-
SavePictureで保存できない
-
ピッ、ってアルファベットでど...
-
VB6でマウスのドラッグで範囲を...
-
Picture box の サイズを変更
-
ホンテットマンションに乗った...
-
Matlab/SimulinkのChirp信号に...
-
C言語のOpenGLで複数のテクスチ...
-
[ASP]小数点第2位以下をカット!
-
文字間の幅の設定
-
画像処理
-
BMPファイルを作成し保存
-
ASPで日付(期間)検索
-
ピクチャーボックスの画像を印...
-
VBでbmpのビットを抜出す
-
マウスポインタの変更
おすすめ情報