대규모 응용 프로그램 시스템을 시작하고 실행하는 데는 필요한 초기화 횟수와 사용자의 시스템 속도에 따라 시간이 오래 걸립니다. 따라서 기본 창이 표시되기 전에 초기화 창이 표시되어야 합니다. 프로그램이 로드될 때 일부 정보가 사용자에게 지속적으로 표시될 수 있고 아름다운 시각적 효과가 생성될 수 있기 때문에 애플리케이션이 더욱 매력적으로 보입니다. 예를 들어, VB와 Delphi는 시작할 때 메인 인터페이스 앞에 스플래시 창을 표시합니다.
----1. 다음은 플래시(슬로건) 화면 스플래시를 표시하는 간단한 방법입니다.
명시적인 옵션
PRivatesubform_load()
'메인 창 표시
나.쇼
'스플래시 창 표시
frmsplash.show
이벤트
'애플리케이션 초기화 수행
초기화
'스플래시 창 닫기
언로드스팔시
엔드 서브
----이 프로시저 코드는 애플리케이션의 시작 양식에 배치되어야 합니다. 첫 번째 show 메소드를 사용하면 Windows가 화면에 기본 폼을 표시할 수 있고 다음 show 메소드는 frmsplash라는 이름으로 디자인한 폼인 플래시 화면을 표시합니다. 화면 형태가 즉시 그려집니다. 초기화 기능은 파일에서 데이터 로드, 메모리에 양식 로드 등과 같이 응용 프로그램이 시작될 때 수행해야 하는 시간이 많이 걸리는 작업을 수행합니다. 이 시점에서 모든 것이 준비되었습니다.
----2. 깜박이는 양식 템플릿
----VisualBasic에는 많은 템플릿 양식이 포함되어 있으며 그 중 하나가 플래시 화면입니다. 프로젝트에 Splashscreen 폼을 추가하려면 프로젝트 메뉴에서 AddForm을 선택합니다. AddForm 대화 상자의 New 탭에서 SplashScreen 아이콘을 선택하고 Open을 클릭합니다. SplashScreen 폼이 프로젝트에 추가됩니다.
----다음 코드는 SplashScreen 양식 템플릿을 사용자 정의하는 방법의 예를 보여줍니다.
명시적인 옵션
개인하위양식_로드()
frmsplash.lbllicenseto=app.legaltrademarks
frmsplash.lblcompanyproduct=app.productname
frmsplash.lblplatform="window98"
frmsplash.lblcopyright=app.legalcopyright
frmsplash.lblcompany=app.companyname
frmsplash.lblwarning="경고: 이 프로그램은 보호되어 있습니다"&_
"저작권법에 의거 복사하지 마세요"
frmsplash.show
이벤트
초기화
언로드frmsplash
엔드 서브
----여기에서는 애플리케이션에 대한 정보에 액세스할 수 있는 앱 개체가 사용됩니다.
----스플래시화면 양식 템플릿 코드 모듈의 코드는 다음과 같습니다.
PrivateSubForm_keypress(keyasciiasinteger)
나를 언로드하다
엔드서브
비공개하위양식_로드()
lblversion.caption="버전"&app.major&".
"app.minor"."app.revision
lblproductname.caption=app.title
엔드 서브
privatesubframe1_click()
나를 언로드하다
EndSub->