Selasa, 30 Juni 2020

Setiap Manusia Mempunyai Ujian

Rabu, 1 Juli 2020

Tidak semua anak mempunyai masa kanaknya dan tidak semua orang dewasa menjalani masanya dengan baik. Semua harus bekerja keras demi menjalani kehidupan, walau pada akhirnya kematian sedang menunggu.

Saat kebahagian datang, kesedihan terselip menunggu gilirannya untuk beraksi. Semua yang terjadi tidak dapat diprediksi bahkan sering tidak sesuai dengan ekspetasi. Sekali lagi manusia harus bekerja keras tetapi harus disertai bekerja dengan pintar.

Setiap manusia, memiliki ujiannya masing-masing. Tidak sedikit yang gagal dari ujian tersebut. Oleh karenanya rencana tuhan hanyalah tuhan yang tahu.

Banyak orang sukses berasal dari kalangan terdidik. Tapi tahukah? Orang sukses yang berawal dari penderitaan dan kemalangan, berarti orang tersebut telah memiliki kepribadian baja. Hingga setelahnya kesuksesannya lebih menyayat hati dan menjadi cerita dikalangan masyarakat.  Akan tetapi bukan berarti kesuksesan dari kalangan terdidik tidak mempunyai cerita. Sebab ujiannya BERBEDA.

Orang tua kebanyakan memaksakan kehendak mereka terhadap anak, seorang anak juga tidak bisa melawan kehendak orang tua. Sebagian merasa kebahagian orang tua berarti kebahagian seorang anak, kemudian sebagian merasa kebahagiaan orang tua adalah sebuah beban.

Terdapat dialog dalam sebuah film, " anak harus berguna bagi orang tua, karena itu tugas nya ". Namun jika anak itu tidak berguna apa yang orang tua lakukan terhadap anaknya?. Jawabanya tergantung dari masing-masing hati nurani yang dimiliki orang tua.

Selanjutnya ketika menjadi dewasa, ujiannya akan ditambah. Setelah melewati ujian tengah semester maka ujian akhir semester menanti. Harus mulai bersiap agar nilai nya dapat naik ataupun mempertahan nilai yang bagus. Sebab di akhir akan diberikan rapot yang memberitahukan apa kita sudah sukses dalam menjalani ujian atau harus mengulang.

Banyak sekali permasalahan yang terjadi di kalangan masyarakat yang disebabkan oleh ujian kehidupan. Entah dari kalangan orang dewasa maupun anak-anak.

Namun tidak perlu merana ataupun sedih, kabar gembira nya adalah setelah kita melewati ujian yang seperti BADAI, di ujung sana kebahagian melihat sambil tersenyum.

Oleh karena nya, lewati ujian dengan berani walaupun rasa takut merayap. Sebab jika tidak dilewati maka berakhir dengan kepedihan.





Tulisan ini hanya berupa pemikiran yang ada di dalam diri saya. Mohon maaf jika terdapat kata-kata yang menyinggung. Terima kasih dan jika terdapat kritik dan saran mengenai tulisan ini silahkan berikan komentar.

Senin, 04 Mei 2020

Program sederhana pada Visual Basic dengan menambahkan kombinasi parameter " Dialog box " dan " Input box "

Membuat Program Sederhana pada Visual Basic dengan Menambahkan Kombinasi parameter " Dialog box " dan " Input box "

Note : pilihan kombinasi tugas saya ambil pada Vclass M5


Program ini saya buat untuk memenuhi tugas Vclass Pengantar Komputer & Teknologi Informasi 2B

Berikut adalah langkah-langkah nya :

1. Masuk ke dalam aplikasi Visual   Basic 6. Penampilannya seperti di bawah ini, kemudian pilih standar EXE dan klik open.


2. Setelah di klik open, akan muncul halaman utama VB 



3. Buat 3 text, 4 command, 1 label. 



4. Pengaturan desain form

Object                     property           Value


Text 1                        Text                     -

Text 2                        Text                     -

Text 3                        Text                     -

Label 1                   Caption           Negara

Command 1          Caption           ASEAN

Command 2          Caption        Click Here

Command 3          Caption                OK

Command 4          Caption               Exit    

  
Pengaturan di lakukan di jendela properti



5. Pembuatan kode program 






6. A. Uji Coba aplikasi Dialog blox


Jika menulis negara dan "click here" 

Akan muncul kotak box seperti di atas


Jika langsung klik "click Here" tanpa mengisi nama negara akan tampak seperti di atas

Jika OK akan tetap dalam kondisi running 


 B. Uji coba aplikasi Input box 


Jika memilih OK akan tampil seperti dibawah ini :


Jika Cancel akan tampil seperti dibawah ini :


Jika OK di MsgBox " Tanggapan ", akan kembali ke langkah 1 

Jika memilih exit akan tampil seperti di bawah ini :









Rabu, 22 April 2020

Program sederhana VB 6.0 dengan menggunakan perintah perulangan Do Until Loop

Membuat program sederhana dengan menggunakan perintah perulangan
Do Until Loop

Program ini saya buat untuk memenuhi tugas Vclass Pengantar Komputer dan Teknologi Informasi 2B.

Berikut langkah -langkah pembuatannya :

1. Masuk ke dalam aplikasi Visual
Basic 6 setelah dibuka tampilan nya akan seperti di bawah ini, lalu pilih Standar EXE, dan klik Open


2. Buka halaman utama VB


3. buat 1 text, 1 listbox, dan 3 command



4. Pengaturan desain form 

Object                 property           value

List 1                          -                       -

Text 1                      Text                 

Command 1       caption           Do While

Command 2       caption           Do Until

Command 3       caption           Clear


Pengaturan dilakukan di dalam jendela properti




5. Pembuatan kode program




6. Uji coba aplikasi Do Until


Do Until -> Kondisi false 


Do until -> Kondisi true


Terima kasih sudah berkunjung :)





Rabu, 15 April 2020

Program Menggunakan Perintah Perulangan "For-Next" Pada VB 6.0

Membuat Program Sederhana dengan Menggunakan Perintah Perulangan "For-Next"

Program ini saya buat dalam memenuhi tugas Vclass Pengantar Komputer & Teknologi Informasi 2B

Berikut langkah-langkah pembuatannya :

1. Masuk ke dalam aplikasi
    Visual Basic 6. Tampilan nya seperti
    di bawah ini. Kemudian pilih Standar
    Exe, klik open.


2. Kemudian akan muncul halaman 
    Utama VB


3. Buat 1 label, 1 textbox, 1 listbox, 1 command button


4. Pengaturan desain form

Label 1 = 

isi property (caption) dengan "N="
                 
TextBox 1 =

Kosongkan property (text)

Command button 1 = 

isi property (caption) dengan tampilan barisan.

Pengaturan dilakukan di dalam jendela properti dibawah ini :


5. Pembuatan kode program


6. Uji coba aplikasi



7. Penjelasan kode program

• fungsi Val digunakan untuk mengubah tipe data text menjadi tipe data numerik.

• property clear pada list 1digunakan untuk membersihkan isi list 1. Kemudian property addltem pada list 1 
Digunakan untuk menambahkan isi list 1.


Senin, 06 April 2020

Program sederhana dengan menggunakan kondisi percabangan Select-Case dalam Visual Basic 6

Ini adalah program yang saya buat dalam memenuhi tugas Vclass Pengantar Komputer & Teknologi Informasi 2B

Berikut langkah - langkah pembuatannya :

1. Masuk ke dalam Aplikasi Visual Basic 6. Setelah itu pilih Standar Exe, klik open.


2. Buka halaman utama VB


3. Buat 2 text dan 1 command


4. Pengaturan desain form, pengaturan dilakukan di dalam jendela properti


Object              Property        value

Text 1               text                 -

Text 2               text                 -

Command 1    Caption         ASEAN

Pengaturan tulisan text 1 dan text 2 di atur di font dengan ukuran 18

Dan pengaturan tulisan di command1 di atur di font dengan ukuran 24

5. Pembuatan kode program

     



6. Uji coba aplikasi


















Rabu, 01 April 2020

Program Sederhana dengen Menggunakan Kondisi Percabangan If-Then-Else

Program yang saya buat ini untuk memenuhi tugas Vclass Pengantar Komputer & Teknologi Informasi 2B

Berikut implementasi If-Then-Else :


1. Buka aplikasi Visual Basic 6. Setelah dibuka tampilan nya seperti berikut ini. Kemudian pilih standar exe, dan klik open.


2. Setelah klik open, akan muncul tampilan utama vb.6 seperti ini


3. Kemudian buat 2 label, 2 textbox dan 1 command.


4. Pengaturan desain form, pengaturan dilakukan di jendela properti.


• pada label 1, isi property (caption) dengan bilangan. Pada label 2, isi property (caption) dengan keterangan.

• pada text box 1 dan 2 kosongkan property (text)

• pada command 1 isi property (caption) dengan cek

5. Pembuatan kode program beserta penjelasannya

Private sub command1_click ()


bil = Val (Text 1)

If bil Mod 2 = 0 Then  > bil Mod 2 =
                                          Kondisi perca-
                                          bangan

ket = "GENAP"              > pernyataan jika
                                           Kondisi genap

Else

ket = "GANJIL"             > pernyataan jika
                                          Kondisi ganjil

End If

Text 2 = ket

End sub

6. Uji coba aplikasi 



Logika dari programnya yaitu jika bilangan habis dibagi 2 maka bilangan itu genap, jika tidak bilangan tersebut ganjil.











Rabu, 25 Maret 2020

Program Sederhana Rumus lingkaran dan bil. Arimatika dalam Visual Basic

Program Sederhana dengan Menggunakan Deklarasi Tipe Data, Variabel, Konstanta dan Operator dalam Visual Basic.

Program ini saya buat untuk tugas vclass Pengantar  Komputer & Teknologi Informasi 2B

Berikut langkah-langkah nya :


  1. Masuk kedalam Aplikasi Visual Basic atau VB.6. Tampilannya seperti ini, kemudian pilih Standar EXE dan klik Open.
   
     
2. Setelah itu akan ada tampilan hala-
    man utama VB


3. Desain form ( seperti tampilan seper-
    ti halaman sebelumnya )

4. Buat 4 label ; 3 text dan 3 command


5. Pengaturan Desain Form di jendela
    Properties.
   
    Object :     Property :      Value :
    
    Form 1      Caption         Konstanta test

    Label 1      Caption         menghitung 
                                               Luas dan Keli-
                                               ling lingkaran

    Label 2      Caption          Jari-Jari

    Label 3      Caption          Luas

    Label 4      Caption          Keliling

    Text 1         Text                -
                        Name             Text1

    Text 2         Text                -
                        Name             Text2

    Text 3         Text                -
                        Name             Text3

    Command  Caption         Tekan sini 
             1                                 untuk liat
                                                hasil
            

    Command Caption          Bersih-bersih
            2

    Command Caption          Selesai
            3

6. Pembuatan Kode program

7. Uji Coba Aplikasi
  
    Tampilan vb     
     

     Tampilan running

Penjelasan Kode program
Private  sub command1_click()

Dim phi, luas, Keliling As Double
Phi 22 / 7

luas = phi * (Text1.Text * Text1.Text)
Keliling = 2 * phi * Text1.Text

Text2.Text = luas 
Text3.Text = Keliling
Text1.SetFocus

MsgBox "luas lingkaran : " & luas & vbCrLf & "Keliling : " & Keliling, vbInformation, "hasil"
End sub

Private sub command2_click()
End
End sub

Private sub command3_click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text1.Setfocus 
End sub

Penjelasan 

= deklarasi variabel luas dan keliling
   • tipe data double
   • key tipe data dim

= phi 22 /7 (konstanta)
= end (perintah keluar dari program)


Implementasi Operator

Langkah pembuatan :

1. Buka halaman utama vb
     

2. Desain form (seperti tampilan seperti
    halaman sebelum nya.

3. Buat 2 label ; 3 text dan 1 command


4. Pengaturan desain form di jendela 
    Properties

    Object :       Property :       Value :

    Label 1        Caption           Bilangan 1

    Label 2        Caption           Bilangan 2

    Text 1           Name              txtBil1
                          Text                 -

    Text 2           Name              txtBil2
                          Text                 -

    Text 3           Name              txtHasil
                          Text                 -

    Command1 Name              cmdtambah
                         Caption            +

5. Pembuatan kode program
     

6. Uji coba aplikasi

     


Aplikasi visual basic yang saya buat ini untuk menghitung hasil dari rumus lingkaran yaitu luas dan keliling. Kedua program aritmatika untuk melakukan penjumlahan.