1

現在 300 である fWidth というグローバル変数があります。

私はpictureBox. width = fWidthを設定していますが、その後、 pictureBox. height = calcImgHeight(originalHeight,originalWidth) のようなことをしたいです

私は数学が苦手なので、ここで問題が発生します:D

Private Function calcImgHeight(oHeight, oWidth)
    Dim nHeight, ratio As Integer
    ratio = oWidth / fWidth
    nHeight = oHeight / ratio

    Return nHeight
End Function

正しいコードは何ですか？

4

1 に答える 1

1

私はあなたより数学が苦手だと思いますが、幸いなことにグーグルは得意です。

http://andrew.hedges.name/experiments/aspect_ratio/

元の高さ / 元の幅 x 新しい幅 = 新しい高さ

于 2012-11-30T16:19:59.120 に答える