这是一个小趣味游戏,在程序运行后显示下页图所示的椭圆形窗体,在界面上有句话:“baby Do you love me?”。如果单击“YES”按钮,会显示下页图所示界面,并有一句“I O U 2”(I LOVE YOU TOO);如果单击“NO”按钮,会出现一个信息框,内容是:“天啊,不可能!请再想想!”,然后按钮会躲着鼠标,让鼠标一直单击不到。 里面包含代码与图片
生成椭圆形窗体程序(vb6.0源代码编写) '函数声明 Private Declare Function CreateEllipticRgn Lib "gdi32" (ByVal X1 As Long, _ ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long Private Declare Function SetWindowRgn Lib "user32" (ByVal hWnd As Long, _ ByVal hRg