またまた質問で、申し訳ありません。
VB6で、フォームを短形に選択し、そこに違うフォームにある画像を貼りつけたいのですが、
どうしてもできませんでした。ピクチャーボックスに張付けて、大きさを調整しようと思っているんですが、
どうなんでしょう？

適切なご返事お待ちしています。

タイトルのドラッグアンドドロップは関係あるのでしょうか？

画像の転送でしたら、
BitBltやStrechBltを使用すればできると思います。

> VB6で、フォームを短形に選択し、

こういう事でしょうか？

Option Explicit

Private BX1 As Single
Private BY1 As Single
Private BX2 As Single
Private BY2 As Single

Private Sub Form_Load()
    AutoRedraw = True
    DrawMode = vbXorPen
    DrawStyle = vbDot
    ForeColor = BackColor
End Sub

Private Sub Form_MouseDown(Button%, Shift%, X!, Y!)
    If Button = vbLeftButton Then
        BX1 = X
        BY1 = Y
        BX2 = X
        BY2 = Y
    End If
End Sub

Private Sub Form_MouseMove(Button%, Shift%, X!, Y!)
    If Button = vbLeftButton Then
        Line (BX1, BY1)-(BX2, BY2), , B
        BX2 = X
        BY2 = Y
        Line (BX1, BY1)-(BX2, BY2), , B
    End If
End Sub

Private Sub Form_MouseUp(Button%, Shift%, X!, Y!)
    If Button = vbLeftButton Then
        '以下をコメントにすると、矩形が残ったままになる
        Line (BX1, BY1)-(BX2, BY2), , B
    End If
End Sub

タイトルは、ドラッグアンドドロップでできたらいいなぁ〜という希望を書いただけでした(>_<)
掲示板に書き込むのとか、ほんとに初心者でよくわからないもんで、
伝わるかどうか、よくわからない日本語しか思いつきませんでした。
答えてくれた方々には本当に感謝しています。

ありがとうございました。