还剩2页未读,继续阅读
文本内容:
多媒体应用软件中的人机界面设计完成人:完成时间设计目的和要求熟悉基本人机界面的设计,更好的对部件进行控制L.编写一个小程序,要求程序窗体为不规则形(不规则形窗体的控件可在网上下载),并且要.23求界面背景能在运行中变换,对基本部件也有一定的控制程序的图标应该是自己创作设计内容,选取几幅不同的图片做为程序背景;
1.设计自己的程序窗体;
2.绘制自己的程序图标;3,对界面中的某些基本部件进行控制4实验结果介绍这是一个小趣味游戏,在程序运行后显示下页图所示的椭圆形窗体,在界面上有句话:“DO如果单击按钮,会显示下页图所示界面,并有一句“,U LOVEME:“YES”LOVE YOUTOO”点击红心会回到游戏开始界面;鼠标滑过时变换界面,显示一只受伤的小猪,并显示NO然后按钮会躲着鼠标,让鼠标一直单击不到,单击界面上的小猪会回到游“WRONGANSWER!”戏开始界面双击游戏开始界面游戏退出LOVE UTOO!游戏开始界面单击后的界面“YES”游戏界面截图DO ULOVE MEYESWRONGANSWER1鼠标悬浮在上后的界面NO程序代码及注释Private Declare Function CreateEllipticRgnLib,gdi32n ByVai XI As Long,By VaiY1As Long,ByVaiX2As Long,By VaiY2As LongAs LongPrivateDeclareFunctionSetWindowRgn Libnuser32ByVai hWndAs Long,ByVai hRgnAsLong,By VaibRedraw AsBoolean AsLong」〃椭圆形程序窗口实现Private SubForm oadDimX,Y AsLongX=CreateEllipticRgn8,28,280,220二Y SetWindowRgnMe.hWnd,X,TrueEnd Sub〃双击退出实现Private SubIl_dblClickUnload MeEndSub〃鼠标滑Private SubL2_MouseMoveButton AsInteger,Shift AsInteger,X AsSingle,Y AsSingle过效果实现NOL
2.Left=IntRnd*Me.ScaleWidth-L
2.Width*3L
2.Top=IntRnd*Me.ScaleHeight-L
2.Height*3II.Visible=FalseP.Visible=TrueH.Visible=FalseLI.Visible=TrueL
2.Visible=TrueL
3.Visible=FalseL
4.Visible=TrueI.Visible=TrueP.ZOrderL.ZOrderL
4.ZOrderLl.ZOrderL
2.ZOrderEnd Sub〃点击红心回到游戏开始界面Private SubH_ClickII.Visible=TrueH.Visible=FalseP.Visible=FalseLI.Visible=TrueL
2.Visible=TrueL
3.Visible=False二L
4.Visible False
11.ZOrderLl.ZOrderL
2.ZOrderEnd Sub〃点击变换界面Private SubLl_Click YESII.Visible=FalseH.Visible=TrueLI.Visible=FalseL
2.Visible=FalseL
3.Visible=TrueL
4.Visible=FalseH.ZOrderL
3.ZOrderEnd Sub〃点击变换界面,本实验没用到Private SubL2_Click NOH.Visible=FalseP.Visible=TrueH.Visible=FalseLI.Visible=FalseL
2.Visible=FalseL
3.Visible=FalseL
4.Visible=TrueP.ZOrderL
4.ZOrderEnd Sub〃点击小猪回到游戏开始界面Private SubP_ClickH.Visible=TrueP.Visible=FalseH.Visible=FalseLI.Visible=TrueL
2.Visible=TrueL
3.Visible=FalseL
4.Visible=FalseIl.ZOrderLl.ZOrderL
2.ZOrderEnd Sub。
个人认证
优秀文档
获得点赞 0