Form Loading


Form loading ini adalah sebuah form pembukaan sebelum aplikasi sistem informasi sekolah ini akan dimunculkan. Saya membuatnya dengan beberapa komponen yang tidak termasuk komponen standart dari VB 6. Oleh karena itu anda semua saya berikan link download untuk dapat membuat form loading ini.
1.       Yang pertama adalah aicAlphaImage untuk menampilkan gambar PNG. Download di sini.
2.       Yang kedua adalah ARProgressBar untuk membuat progress bar yang keren. Download di sini.


Kemudian di bawah ini adalah pengaturan dari setiap komponen yang akan dipakai dalam form ini. Semua setting ini dapat anda rubah sesuai dengan selera anda masing-masing.
Object
Properties
Setting
Form
Name
FrmLoading

BorderStyle
0-None

BackColor
&H00FFC0C0&

StartUpPosition
2-CenterScreen

ShowInTaskBar
1-True
aicAlphaImage
Name
aicAlphaImage1

ScaleMethod
1-aiStretch

Picture
As you wish
ARProgressBar
Name
Bar

Border
1-Simple

EndColor
&H0000C000&

IniColor
&H0080FF80&

UseGradient
True
Timer
Name
Timer1

Interval
30

Dan berikut ini adalah gambar design form loading ini

Gambar form saat running


Dan berikut ini adalah source code form loading

Private Sub Form_Activate()
FadeIn1 Me
End Sub

Private Sub Form_Load()
Me.Caption = "Loading..."
Bar.Value = 0
Me.Height = Me.aicAlphaImage1.Height
Me.Width = Me.aicAlphaImage1.Width
Me.Timer1.Enabled = True
FadeIn2 Me
End Sub

Private Sub Timer1_Timer()

If Bar.Value = 100 Then
    Timer1.Enabled = False
    Unload Me
    FrmLogin.Show
ElseIf Bar.Value = 50 Then
    Bar.CaptionForeColor = vbWhite
    Bar.Value = Val(Bar.Value) + 1
Else
    Bar.Value = Val(Bar.Value) + 1
End If
End Sub
Watch and Learn

Comments

Post a Comment

Popular posts from this blog

Flowchart Penjualan Grosir / Eceran

Image
    Pada fase selanjutnya adalah penjualan barang. Penjualan dalam proses manual alurnya sebagai berikut : Pemesanan barang oleh konsumen kepada toko yang dapat dilakukan dengan cara datang langsung ke toko dan memesan barang yang diinginkan atau konsumen dapat memesan barang lewat telepon. Pesanan akan dicatat oleh bagian penjualan barang dan diteruskan ke bagian penyimpanan barang toko untuk melakukan pengeecekan ketersediaan barang yang dipesan. Jika barang tidak ada maka bagian penjualan akan melakukan konfirmasi kepada konsumen bahwa barang tidak tersedia. Apakah konsumen bersedia untuk menunggu sampai barang dibeli. Jika konsumen bersedia maka bagian penjualan akan segera melaporkan hal ini kepada bagian pembelian barang untuk melakukan pembelian barang. Jika konsumen tidak bersedia maka barang yang dipesan bisa diganti atau transaksi dapat dibatalkan. Jika barang tersedia di tempat penyimpanan maka bagian penjualan akan segera membuat faktur penjualan baik itu secara gr
Read more

Flowchart Proses Pembelian Barang

Image
Proses pembelian secara manual sangatlah mudah proses dimulai saat stock barang telah habis dan dinformasikan kepada pihak pembelian barang. Pihak pembelian barang akan membuatkan list pembelian barang dan dikirimkan kepada semua supplier yang ada. Kemudian supplier mendatangkan barang dan barang diterima dan dicatat. Setalah itu barang masuk ke gudang penyimpanan dan pada akhirnya barang akan dibagikan ke toko yang ada. Ini adalah proses manual yang terjadi pada saat pembelian barang.
Read more