Jangan mengharapkan anak kita membalas kebaikan kita. Kenapa? Karena mereka ada di dunia ini atas keinginan kita (orang tua); bukan atas keinginan mereka. Sudah sepantasnya kita menghidupi mereka walaupun nanti kelak ia kemungkinan menyakiti kita.
Thursday 6 March 2014
Wednesday 5 March 2014
Basic routing conf
1. Basic RIP configuration
Task 5: Verifying RIP routing
step 1: show ip route
untuk melihat apakah network lain / network bukan directly connected terhadap suatu router sudah terinjeksi kedalam routing table.
step 2: show ip protocols
step 3: debug ip rip
"who send and what he send"
step 4: undebug all
non aktifkan debug ip rip (kata-kata yang menyedihkan)
Task 5: Verifying RIP routing
step 1: show ip route
untuk melihat apakah network lain / network bukan directly connected terhadap suatu router sudah terinjeksi kedalam routing table.
step 2: show ip protocols
step 3: debug ip rip
"who send and what he send"
step 4: undebug all
non aktifkan debug ip rip (kata-kata yang menyedihkan)
Monday 3 March 2014
Namespace
Tempat penyimpanan kelas-kelas
Contoh penggunaan namespace
Namespace pekerjaanmanusia
Public Class Petani
Public luaslahan As Integer = Nothing
Sub jumlahlahan(ByVal luas)
luaslahan = luas
End Sub
End Class
Public Class Programmer
Public bahasaprogram As String = Nothing
Sub bahasayangdikuasai(ByVal nama)
bahasaprogram = nama
End Sub
End Class
End Namespace
Module Module1
Dim Budi As New pekerjaanmanusia.Programmer
Dim tardo As New pekerjaanmanusia.Petani
Sub Main()
Budi.bahasaprogram = "C"
Console.WriteLine(Budi.bahasaprogram)
Console.ReadLine()
tardo.luaslahan = 100
Console.WriteLine("Luas lahan tardo: " & tardo.luaslahan & " " & "Hektar")
Console.ReadLine()
End Sub
End Module
Contoh penggunaan namespace
Namespace pekerjaanmanusia
Public Class Petani
Public luaslahan As Integer = Nothing
Sub jumlahlahan(ByVal luas)
luaslahan = luas
End Sub
End Class
Public Class Programmer
Public bahasaprogram As String = Nothing
Sub bahasayangdikuasai(ByVal nama)
bahasaprogram = nama
End Sub
End Class
End Namespace
Module Module1
Dim Budi As New pekerjaanmanusia.Programmer
Dim tardo As New pekerjaanmanusia.Petani
Sub Main()
Budi.bahasaprogram = "C"
Console.WriteLine(Budi.bahasaprogram)
Console.ReadLine()
tardo.luaslahan = 100
Console.WriteLine("Luas lahan tardo: " & tardo.luaslahan & " " & "Hektar")
Console.ReadLine()
End Sub
End Module
Creating class, instantiate
Public Class Person
Private weight As Double = 8
Private money As Double = 100
Private income As Double = 7.25
Public Sub eat(ByVal pounds As Double)
weight += pounds
End Sub
Public Sub excercise(ByVal time As Double)
weight -= time / 10
End Sub
Public Sub work(ByVal hours As Double)
money += hours * income
End Sub
Public Function getweight() As Double
Return weight
End Function
Public Function getmoney() As Double
Return money
End Function
Public Function getincome() As Double
Return income
End Function
End Class
Class
Public Class Form1
Private myperson As New Person
Private weight As Double = 8
Private money As Double = 100
Private income As Double = 7.25
Public Sub eat(ByVal pounds As Double)
weight += pounds
End Sub
Public Sub excercise(ByVal time As Double)
weight -= time / 10
End Sub
Public Sub work(ByVal hours As Double)
money += hours * income
End Sub
Public Function getweight() As Double
Return weight
End Function
Public Function getmoney() As Double
Return money
End Function
Public Function getincome() As Double
Return income
End Function
End Class
Class
Public Class Form1
Private myperson As New Person
Sunday 2 March 2014
Subscribe to:
Posts (Atom)