Improve company productivity with a Business Account.Sign Up

  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 181
  • Last Modified:

I want to make a non-rectangle form.

I want to make a non-rectangle form in VB, I think place a Bitmap on the form and make color which I want to let it dispear on the form is a better way to do. But I'm not able to do this myself, who can help me,please? Thanks very much.
  • 2
  • 2
1 Solution
Put these declarations in a module .BAS:

     Public Declare Function CreateEllipticRgn Lib "gdi32" _
         (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, _
         ByVal Y2 As Long) As Long

     Public Declare Function SetWindowRgn Lib "user32" _
         (ByVal hWnd As Long, ByVal hRgn As Long, _
         ByVal bRedraw As Boolean) As Long

Put this code in a form:

Private Sub Form_Load()

         Show 'The form!
         SetWindowRgn hWnd, CreateEllipticRgn(0, 0, 300, 200), True

End Sub

Run the project!
No BITMAP required!
prefixAuthor Commented:
Oh,sorry!I didn't post my question clearly.I don't want to make a Rectangle or Elli form, I want to make a form like ICQ's star up pic or the K-jofol mp3 Player's.Not irregular form.
And thank you all the same.If you can solve this,please tell me the way.Thank you.
prefixAuthor Commented:
Thank You.
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

  • 2
  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now