Thursday 27 November 2014

Statement-statement

1. With statement
Syntax:
With object
[statements]
End with

Example:
With MyLabel
    .Height = 2000
    .Width = 2000
    .Caption = "This is MyLabel"
End With 

2. While...Wend statement
Mengeksekusi serangkaian statement / pernyataan selama kondisi yang diberikan benar.
 
Syntax:
While condition
[statements]
Wend

Example:



3. Type statement
Digunakan pada level modul untuk mendefinisikan tipe data yang didefenisikan pengguna
memuat satu atau lebih elemen-elemen.

Example:
Type EmployeeRecord    ' Create user-defined type.
    ID As Integer    ' Define elements of data type.
    Name As String * 20
    Address As String * 30
    Phone As Long
    HireDate As Date
End Type
Sub CreateRecord()
    Dim MyRecord As EmployeeRecord    ' Declare variable.

    ' Assignment to EmployeeRecord variable must occur in a procedure.
    MyRecord.ID = 12003    ' Assign a value to an element.
End Sub

Syntax:


4. Sub statement
 
Example:
' Sub procedure definition.
' Sub procedure with two arguments.
Sub SubComputeArea(Length, TheWidth)
    Dim Area As Double    ' Declare local variable. 
    If Length = 0 Or TheWidth = 0 Then
    ' If either argument = 0.
        Exit Sub    ' Exit Sub immediately.
    End If
    Area = Length * TheWidth    ' Calculate area of rectangle.
    Debug.Print Area    ' Print Area to Debug window.
End Sub
 
5. Enum statement

Example:
Public Enum InterfaceColors
    icMistyRose = &HE1E4FF&
    icSlateGray = &H908070&
    icDodgerBlue = &HFF901E&
    icDeepSkyBlue = &HFFBF00&
    icSpringGreen = &H7FFF00&
    icForestGreen = &H228B22&
    icGoldenrod = &H20A5DA&
    icFirebrick = &H2222B2&
End Enum
 
6. Const statement
Mendeklarasikan konstanta / ketetapan untuk digunakan sebagai pengganti huruf (literal)
 

Example:
' Constants are Private by default.
Const MyVar = 459

' Declare Public constant. 
Public Const MyString = "HELP"

' Declare Private Integer constant.
Private Const MyInt As Integer = 5

' Declare multiple constants on same line.
Const MyStr = "Hello", MyDouble As Double = 3.4567  
 
 7. Time statement
Mengatur waktu sistem.
 
Contoh:
 
Dim MyTime
MyTime = #4:35:17 PM#    ' Assign a time.
Time = MyTime    ' Set system time to MyTime.

8. Private statement
Digunakan pada level modul untuk mendeklarasikan variabel-variabel private dan
mengalokasikan ruang penyimpanan.

Pernyataan private digunakan di level modul untuk mendeklarasikan variabel sebagai
private, yaitu mereka hanya tersedia bagi modul yang dimana mereka dideklarasikan.

Contoh:
 
Private Number As Integer    ' Private Integer variable.
Private NameArray(1 To 5) As String    ' Private array variable.
' Multiple declarations, two Variants and one Integer, all Private.
Private MyVar, YourVar, ThisVar As Integer    

Friday 21 November 2014

Nilai rata-rata dan standard deviasi

Budi mengerjakan 5 soal dalam 2 jam.
Soal #1 = 10 menit
Soal #2 = 20 menit
Soal #3 = 30 menit
Soal #4 = 40 menit
Soal #5 = 20 menit

Thursday 20 November 2014

Menciptakan fungsi buatan sendiri di Macro Microsoft Excel

Referensi: http://office.microsoft.com/en-au/excel-help/creating-custom-functions-HA001111701.aspx

1. Harus insert module
2. Copy code berikut ke jendela Book1 - Module1(Code)
Function tambah(a, b)
c = a + b
MsgBox (c)
End Function

Fungsi diatas menambahkan argumen a dan argumen b kedalam c dan menampilkan hasilnya di jendela msgbox.

Fungsi buatan sendiri harus dimulai dengan kalimat Function dan diakhiri dengan kalimat End Function.

Komponen fungsi: nama fungsi (dalam hal ini aloha) dan argumen-argumen (dalam hal ini a dan b) dan procedure.
1. Nama fungsi = bebas / terserah; lebih baik beri nama yang mencerminkan nilai yang dikandungnya.
2. Argumen-argumen = bisa tidak ada argumen, bisa sampai 29 argumen maksimum dengan menambahkan koma-koma diantaranya.
3. Procedure

Fungsi buatan sendiri berbeda dengan macro dan berbeda dengan Excel's built-in function. Contoh Excel's built-in function: RAND(), NOW().



3. Kembali ke jendela kotak-kotak excel dengan menekan tombol alt + F11 dan pada salah satu sel ketik "=aloha(A1;A2)" (tanpa tanda petik)




Beberapa contoh lainnya:
1.
Function Discount(quantity, price)
    If quantity >= 100 Then
        Discount = quantity * price * 0.1
    Else
        Discount = 0
    End If
    Discount = Application.Round(Discount, 2)
End Function
 
 

Fungsi diatas pada dasarnya mengerjakan apabila jumlah barang yang dibeli (kuantitas barang)
lebih besar dari 100 barang maka mendapatkan diskon sebesar 0.1. Sebaliknya, jika jumlah
barang yang dibeli dibawah 100 tidak ada diskon / potongan harga.
 
 
http://msdn.microsoft.com/id-id/default.aspx

Tuesday 18 November 2014

Saham

Ide dasar dari saham

Andi kehabisan uang untuk membeli bibit padahal ia mempunyai ladang. Andi mempunyai ide untuk meminta bantuan dari Boy dan Charli dalam membeli bahan baku dalam hal ini membeli bibit. Boy memberi 2000 dan Charlie 500. Harga bibit adalah 3000. Jadi Charli menambah 500 Rupiah lagi.

Setelah melalui proses produksi dan penjualan, akhirnya untung bersih yang didapatkan adalah 3000. Salah jika membagi keuntungan tersebut merata 1000 kepada setiap pemegang saham, karena jumlah uang yang ditanamkan berbeda. Solusinya adalah membagi tidak sama rata.

Jadi, jumlah uang yang didapatkan Boy adalah:
"Jumlah uang boy dibagi jumlah uang Andi ditambah uang boy ditambah uang Charli dikali keuntungan".

= (2000 / (2000 + 500 + 500) * 3000
= 2000


jumlah uang yang didapat Charli dari keuntungan adalah:
= (500 / (2000 + 500 + 500))  * 3000
= 500

Jumlah uang yang didapatkan Andi sendiri adalah:
= (500 / (2000 + 500 + 500)) * 3000
= 500

Jadi kesimpulannya:
1. Jika si pemilik usaha tidak memiliki saham = tidak mendapat bagian dari keuntungan. Untung dalam soal cerita diatas Andi si pemilik usaha masih menyimpan uang 500 untuk disahamkan. Hal ini berlaku juga di dalam kehidupan sehari-hari, siapa yang tidak memberikan sumbangsih, tidak merayakan keberhasilan.


Grid

Komponen grid
1. Jumlah grid
2. Lebar antara grid 1 dengan grid yang lain.

Monday 17 November 2014

Playing Cheese

Komponen catur


Komponen catur
1. Castle
2. Knight
3. Bishop
4. King
5. Queen
6. Pawn

Beberapa fungsi pawn:
1.Dikorbankan / dipertaruhkan untuk mendapatkan suatu keuntungan
2. Mendukung
3. Digadaikan / ditukarkan
4. Mengancam
5. Mengamankan suatu area


Algoritma catur



1.Knew how to create weekness
2. Knew about the imbalance
3. Put all the army to the hole
4. Learn the why and learn the how


Type of response:
1. Blocking move
2. Putting a guard move
3. Preventive move
4. Preparation move
5. Provocating move / Challange move.
6. Withdraw move (mundur)
7. Getting a more space move for a something
8. Threatenning move
9. Takes move (Eat)

Friday 7 November 2014

Senyawa dan campuran

Saya sudah bisa membedakan senyawa dan campuran.

Campuran/larutan
Campuran adalah larutan. Larutan adalah air garam, air gula, dan lain-lain yang sejenis.

Cara memisahkan campuran/larutan

Komponen larutan:
1. Pelarut
2. Terlarut

Air adalah pelarut.
Zat terlarut adalah garam, gula, kopi, pasir/lumpur/tanah dan lain-lain yang bisa menyatu dengan air. Bagaimana dengan minyak?

Dengan kata lain,
Pelarut = {air}
Terlarut = {garam, gula, kopi, pasir/lumpur/tanah}

Untuk menyatukan air dengan gula kita butuhkan panas. Untuk memisahkan air gula kita butuhkan panas juga.

Kita memisahkan air terhadap zat-zat terlarut ketika kita melakukan proses pemisahan campuran.
1.


Senyawa

Kenapa atom hydrogen bisa menyatu dengan atom oksigen? Persatuan 2 atom hydrogen dan 1 atom oksigen menghasilkan air (H2O).

Jika kamu panaskan suatu benda dan tidak bisa dipisahkan dengan panas (kalor) maa benda itu dikatakan senyawa.

Wednesday 5 November 2014

Ancaman dan persiapan mental usaha

Ancaman usaha

Setiap usaha mempunyai ancaman.

Ancaman adalah faktor-faktor yang mengurangi jumlah hasil produksi.

Contoh:
1. Ancaman pada usaha pertanian:
1. Serangga
2. Pencurian
3. Bakteri
4.

2. Ancaman pada usaha IT:
1. Variasi teknologi banyak
2. Pengaturan strategi penyelesaian proyek yang belum semua perusahaan mempunyai

Persiapan mental (preparation mental)

1. Goal setting
2. Focus
3. Confidence
4. Visualization
5. Practicing

Contoh:
1. Goal setting: membuat usaha yang sederhana
2. Focus: terus membuat usaha yang sederhana
3. Confidence: yakin bahwa membuat usaha yang sederhana itu benar
4. Visualization: bagaimana gambaran usaha yang sederhana itu?
5. Practicing: terus melatih keterfokusan, keyakinan, dan visualisasi.