2016-05-25 15 views
-1

今、私がしたいのは、あなたが望むサイズを選択すると、画像が変更されます。私は例を挙げましたが、それはうまく動作しません。ComboBoxでPictureBoxと画像のサイズを変更するにはどうすればよいですか?

Private Sub cboxpizzasize_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboxpizzasize.SelectedIndexChanged 

    Select Case cboxselectclass.SelectedItem 
     Case Is = "Personal - 4 slide" 
      PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage 
      PictureBox1.Size = New Size(134, 150) 
     Case Is = "Regular - 6 slide" 
      PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage 
      PictureBox1.Size = New Size(174.2, 196.95) 
     Case Is = "Large - 8 slide" 
      PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage 
      PictureBox1.Size = New Size(214.4, 242.4) 
     Case Is = "Xtra Large - 12 slide" 
      PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage 
      PictureBox1.Size = New Size(268, 303) 
    End Select 

End Sub 
+0

「それは文句を言わない仕事」ではありません適切な問題の記述。ソースファイルの先頭に 'Option Strict On'を置き、コンパイルエラーを修正してください。 –

答えて

0

は、次のことをしようとしたことがあり、ここで

が私のコードです: のSizeMode

それとも、次の記事読んで持って変更resizing

article

ピクチャー-boxは以前にのみサイズを変更できます画像をロードすると、そこには の後に読み取り専用で効果がありません!デザイナでStretchImageへのSizeModeを設定し、次のコードを使用し

+0

私はウェブサイト – nonstop328

+0

を通過することができないリンクは今修正する必要があります。 –

0

Private Sub cboxpizzasize_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboxpizzasize.SelectedIndexChanged 
    Select Case cboxpizzasize.SelectedIndex 
     Case Is = 0 
      PictureBox1.Size = New Size(134, 150) 
     Case Is = 1 
      PictureBox1.Size = New Size(174.2, 196.95) 
     Case Is = 2 
      PictureBox1.Size = New Size(214.4, 242.4) 
     Case Is = 3 
      PictureBox1.Size = New Size(268, 303) 
    End Select 
End Sub 

(コンボボックスがcboxpizzasizeと呼ばれるが、ピクチャボックスはPictureBox1です)

関連する問題