posting latihan vb

 

Private Sub Command1_Click()
Dim e As String
Text6.Text = “20” & Mid(Text2.Text, 3, 2)
Text7.Text = Right(Text2.Text, 3)

e = Left(Text2.Text, 1)
If e = “E” Then
Text3.Text = “EKSEKUTIF”
ElseIf e = “R” Then
Text3.Text = “REGULER”
End If

e = Mid(Text2.Text, 5, 1)
If e = “1” Then
Text4.Text = “SISTEM INFORMASI”
ElseIf e = “2” Then
Text4.Text = “MANAJEMEN INFORMATIKA”
ElseIf e = “3” Then
Text4.Text = “MANAJEMEN DAN KOMP.AKUNTANSI”
End If

e = Mid(Text2.Text, 6, 2)
If e = “01” Then
Text5.Text = “STRATA SATU”
ElseIf e = “02” Then
Text5.Text = “DIPLOMA TIGA”
ElseIf e = “03” Then
Text5.Text = “DIPLOMA SATU”
End If

If Text3.Text = “EKSEKUTIF” And Text5.Text = “STRATA SATU” Then
Text8.Text = “200000”
Text9.Text = “1900000”
Text10.Text = “1500000”
Text11.Text = “1250000”
ElseIf Text3.Text = “EKSEKUTIF” And Text5.Text = “DIPLOMA TIGA” Then
Text8.Text = “1500000”
Text9.Text = “1650000”
Text10.Text = “1250000”
Text11.Text = “1250000”
ElseIf Text3.Text = “EXSEKUTIF” And Text5.Text = “DIPLOMA SATU” Then
Text8.Text = “150000”
Text9.Text = “1350000”
Text10.Text = “1250000”
Text11.Text = “1250000”
End If

If Text3.Text = “REGULER” And Text5.Text = “STRATA SATU” Then
Text8.Text = “200000”
Text9.Text = “1900000”
Text10.Text = “1500000”
Text11.Text = “1000000”
ElseIf Text3.Text = “REGULER” And Text5.Text = “DIPLOMA TIGA” Then
Text8.Text = “1500000”
Text9.Text = “1650000”
Text10.Text = “1250000”
Text11.Text = “1000000”
ElseIf Text3.Text = “REGULER” And Text5.Text = “DIPLOMA SATU” Then
Text8.Text = “150000”
Text9.Text = “1350000”
Text10.Text = “1250000”
Text11.Text = “1000000”

End If
Text12.Text = Val(Text8) + Val(Text9) + Val(Text10) + Val(Text11) + Val(Text12)
End Sub

Private Sub Command2_Click()
With Data1.Recordset
.AddNew
.Fields(“nama”) = Text1.Text
.Fields(“npm”) = Text2.Text
.Fields(“kelas”) = Text3.Text
.Fields(“jurusan”) = Text4.Text
.Fields(“prodi”) = Text5.Text
.Fields(“tahun”) = Text6.Text
.Fields(“nurut”) = Text7.Text
.Fields(“pendaftaran”) = Text8.Text
.Fields(“semester”) = Text9.Text
.Fields(“sarana”) = Text10.Text
.Fields(“posdikti”) = Text11.Text
.Fields(“total”) = Text12.Text
.Update
MsgBox “BERHASIL TERSIMPAN”, vbOKCancel
End With
Text1.SetFocus
End Sub

Private Sub Command3_Click()
Text1.SetFocus
With Data1.Recordset
Text1.Text = .Fields(“nama”)
Text2.Text = .Fields(“npm”)
Text3.Text = .Fields(“kelas”)
Text4.Text = .Fields(“jurusan”)
Text5.Text = .Fields(“prodi”)
Text6.Text = .Fields(“tahun”)
Text7.Text = .Fields(“nurut”)
Text8.Text = .Fields(“pendaftaran”)
Text9.Text = .Fields(“semester”)
Text10.Text = .Fields(“sarana”)
Text11.Text = .Fields(“posdikti”)
Text12.Text = .Fields(“total”)
End With

End Sub

Private Sub Command4_Click()
MsgBox “DATA INI AKAN DIHAPUS”, vbOKOnly
Data1.Recordset.Delete
Text1.SetFocus
Text1.Text = “”
Text2.Text = “”
Text3.Text = “”
Text4.Text = “”
Text5.Text = “”
Text6.Text = “”
Text7.Text = “”
Text8.Text = “”
Text9.Text = “”
Text10.Text = “”
Text11.Text = “”
Text12.Text = “”

End Sub

Private Sub Command5_Click()
With Data1.Recordset
.Edit
Text1.Text = .Fields(“nama”)
Text2.Text = .Fields(“npm”)
Text3.Text = .Fields(“kelas”)
Text4.Text = .Fields(“jurusan”)
Text5.Text = .Fields(“prodi”)
Text6.Text = .Fields(“tahun”)
Text7.Text = .Fields(“nurut”)
Text8.Text = .Fields(“pendaftaran”)
Text9.Text = .Fields(“semester”)
Text10.Text = .Fields(“sarana”)
Text11.Text = .Fields(“posdikti”)
Text12.Text = .Fields(“total”)
.Update
End With
MsgBox “DATA TELAH DIGANTII”, vbOKOnly
End Sub
End Sub

Private Sub Command6_Click()
MsgBox “ANDA YAKIN AKAN KELUAR”, vbOKOnly
End
End Sub

Private Sub Command7_Click()
Text1.SetFocus
Text1.Text = “”
Text2.Text = “”
Text3.Text = “”
Text4.Text = “”
Text5.Text = “”
Text6.Text = “”
Text7.Text = “”
Text8.Text = “”
Text9.Text = “”
Text10.Text = “”
Text11.Text = “”
Text12.Text = “”
End Sub

Private Sub Form_Activate()
Text1.SetFocus
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text2.SetFocus
End If
End Sub

TUGAS VSUAL BASIC

 

LISTING PROGRAM

Private Sub cmdbatal_Click()

Textnama.SetFocus

Textnama.Text = “”

Textjur.Text = “”

Textpstu.Text = “”

Texttahun.Text = “”

Textnurut.Text = “”

Textbipen.Text = “”

Textnpm.Text = “”

End Sub

 

Private Sub cmdkeluar_Click()

End

End Sub

 

Private Sub cmdlagi_Click()

Textnama.SetFocus

Textnama.Text = “”

Textjur.Text = “”

Textpstu.Text = “”

Texttahun.Text = “”

Textnurut.Text = “”

Textbipen.Text = “”

Textnpm.Text = “”

 

End Sub

 

Private Sub cmdproses_Click()

Dim s As String

Texttahun.Text = “20” & Left(Textnpm.Text, 2)

s = Mid(Textnpm.Text, 3, 1)

If s = “1” Then

Textjur.Text = “sistem informasi”

ElseIf s = “2” Then

Textjur.Text = “teknik informatika”

ElseIf s = “3” Then

Textjur.Text = “manajemen informatika”

ElseIf s = “4” Then

Textjur.Text = “manajemen & kom.akutansi”

End If

s = Mid(Textnpm.Text, 4, 2)

If s = “00” Then

Textpstu.Text = “strata satu”

Textbipen.Text = “2000000”

ElseIf s = “01” Then

Textpstu.Text = “diploma satu”

Textbipen.Text = “1200000”

ElseIf s = “02” Then

Textpstu.Text = “diploma dua”

Textbipen.Text = “1300000”

ElseIf s = “03” Then

Textpstu.Text = “diploma tiga”

Textbipen.Text = “1400000”

ElseIf s = “04” Then

Textpstu.Text = “diploma empat”

Textbipen.Text = “1500000”

End If

Textnurut.Text = Right(Textnpm.Text, 3)

 

End Sub

 

 

Private Sub Command1_Click()

Data1.Recordset.AddNew

Textnama.Text = “”

Textnpm.Text = “”

Textjur.Text = “”

Textpstu.Text = “”

Textnurut.Text = “”

Texttahun.Text = “”

Textbipen.Text = “”

Textnama.SetFocus

End Sub

 

Private Sub Command2_Click()

With Data1.Recordset

.AddNew

.Fields(“nama”) = Textnama.Text

.Fields(“npm”) = Textnpm.Text

.Fields(“jurusan”) = Textjur.Text

.Fields(“program study”) = Textpstu.Text

.Fields(“tahun masuk”) = Texttahun.Text

.Fields(“nomor urut”) = Textnurut.Text

.Fields(“biaya pendidikan”) = Textbipen.Text

.Update

End With

End Sub

 

Private Sub Command3_Click()

Textnama.SetFocus

With Data1.Recordset

Textnama.Text = .Fields(“nama”)

Textnpm.Text = .Fields(“npm”)

Textjur.Text = .Fields(“jurusan”)

Textpstu.Text = .Fields(“program study”)

Texttahun.Text = .Fields(“tahun masuk”)

Textnurut.Text = .Fields(“nomor urut”)

Textbipen.Text = .Fields(“biaya pendidikan”)

End With

End Sub

 

Private Sub Command4_Click()

MsgBox “DATA INI AKAN DIHAPUS”, vbOKOnly

Data1.Recordset.Delete

Textnama.SetFocus

Textnama.Text = “”

Textnpm.Text = “”

Textjur.Text = “”

Textpstu.Text = “”

Texttahun.Text = “”

Textnurut.Text = “”

Textbipen.Text = “”

End Sub

 

Private Sub Command5_Click()

With Data1.Recordset

.Edit

.Fields(“nama”) = Textnama.Text

.Fields(“npm”) = Textnpm.Text

.Fields(“jurusan”) = Textjur.Text

.Fields(“program study”) = Textpstu.Text

.Fields(“tahun masuk”) = Texttahun.Text

.Fields(“nomor urut”) = Textnurut.Text

.Fields(“biaya pendidikan”) = Textbipen.Text

.Update

End With

MsgBox “DATA TELAH DIGANTII”, vbOKOnly

End Sub

 

Private Sub Textnama_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then

Textnpm.SetFocus

End If

 

End Sub

Curhatan Valentino Rossi

 Perjalanan Valentino Rossi sebentar lagi bersama Ducati akan berakhir. Hanya lima balapan lagi dimusim 2012 yang ia harus lakoni bersama Ducati.
Setelah itu Rossi akan kembali ke tim lamanya, Yamaha yang pernah ia bela dari tahun 2004 hingga tahun 2010.
Sebelum pindah Valentino Rossi mengeluarkan curhatannya kepada motogp.com (12/9) dan pengalamannya selama dua tahun membela Ducati.
“Pengalaman dan petualangan bersama Ducati sebenarnya sudah sangat sulit ketika semuanya dimulai. Dan kami belum beruntung untuk memperbaiki semua masalah selama satu setengah tahun terakhir, dan saya tidak pernah merasa kompetitif dengan motor ini,” ujar Rossi.
Rossi mengakui masalah terbesar dan utama adalah saat tes pertama kali dengan Ducati di Valencia pada tahun 2010, dan hampir dua tahun terakhir selalu memiliki masalah yang sama, meskipun ia merasa memiliki rekan-rekan yang luar biasa dan bekerjasama dengan baik di Ducati.
Rossi pun mengklaim dengan kondisi motor seperti ini akan sangat sulit mengejar pebalap seperti seorang Lorenzo. “Tapi yang pasti saat ini saya sedang menikmati setiap mengendarai motor dan yang pasti saya punya peluang untuk selalu bertarung dan mendapatkan hasil terbaik,” tambah Rossi.
Aksi Rossi dan Ducati selanjutnya adalah di GP San Marino, Italia, 16 September mendatang,

Casillas Digosipkan Perang Dingin Dengan Ronaldo

MADRID – Seperti dilansir Marca, ada pemandangan menarik ketika Cristiano Ronaldo merayakan golnya ke gawang Manchester City di Liga Champions. Kapten tim Iker Casillas hanya berdiri terpaku di depan gawangnya dan tidak menunjukkan ekspresi senang meski timnya berhasil membalikkan kedudukan.

Kejadian seperti ini tentu memunculkan pertanyaan besar mengenai kondisi skuat asuhan Jose Mourinho saat ini. Dari sikap yang ditunjukkan Casillas menimbulkan spekulasi mengenai keretakan tim.

Isu keretakan di skuat Los Blancos mencuat pertama kali ketika Cristiano Ronaldo tidak mau merayakan dua golnya ke gawang Granada dan mengaku tengah kecewa dengan klub. Ungkapan hati Ronaldo dihubung-hubungkan dengan perasaan Ronaldo yang merasa tidak diterima oleh rekan-rekan setim, tidak mendapat dukungan dari tim, kecewa dengan penentuan jabatan kapten, hingga masalah gaji.

Jika dihubungkan dengan sikap Iker Casillas saat menghadapi Manchester City, bisa dipastikan sikap tersebut muncul karena kapten tim nasional Spanyol tersebut balik kecewa dengan Cristiano Ronaldo yang mengumbar rasa kecewanya kepada publik. Pasalnya, sejak pria Portugal itu mengumbar kekecewaan, situasi di Los Blancos cenderung kurang kondusif.

WTF!! Penggunaan Facebook Bisa Sebabkan Asma

Dari sekian banyak efek negatif dari penggunaan situs jejaring sosial Facebook yang telah diberitakan, mungkin yang satu ini akan siap membuat Anda terkaget-kaget. Karena sebuah penelitian yang dilakukan oleh sekolompok dokter di Italia mendapatkan sebuah fakta bahwa gangguan asma serta stress, dapat dipicu melalui gangguan psikologis yang disebabkan oleh penggunaan media situs jejaring Facebook tersebut.

Salah satu dari beberapa kasus yang ada adalah yang dialami oleh seorang remaja berumur 18 tahun ini. Anehnya, pemuda ini selalu mengalami sesak napas secara berulang kali setelah melihat foto mantannya di profil picture-nya.

Diketahui juga bahwa, ternyata mantannya telah menghapus sang pasien asma tersebut dari kontak temannya dan baru aja menjalani “in relationship” dengan orang lain, tapi sang pasien asma ini terus berusaha agar bisa tetap berteman dengan mantannya. Salah satunya adalah mengganti nama akun pribadinya menjadi nama orang lain agar bisa berteman dengan mantannya.

Parahnya setelah berteman kembali dengan mantannya serta melihat fotonya, asma yang dideritanya kembali kambuh, dan sistem pernapasannya melemah hingga 20 persen. Pasien itupun harus menerima obat hidup atau inhaler untuk dapat kembali bernapas normal. Remaja itu kemudian dibujuk untuk tidak lagi mengakses profil mantannya. Serangan asma berhenti setelah Ia diminta untuk menjauh dari dunia maya.

Kail Ikan dan Kail Kehidupan

Kail dalam kamus besar bahasa Indonesia berupa kata benda berupa sekerat kawat yg ujungnya berkait dan tajam, digunakan untuk menangkap ikan; atau biasa kita menyebut pancing.
Sejenak saya meminta waktu anda untuk ikut kami, untuk memancing ikan. memancing dalam angan dunia maya anda….

* Ambilah Kail kecil anda.
Mulailah dengan memancing di got depan rumah anda.
Apa yang akan anda dapatkan???
Berpindahlah kesungai kecil dekat rumah anda.
Apa yang akan anda dapatkan???
Berpindahlah lagi kesungai Musi, mahakam, bengawan solo atau berpindahlah kedanau danau besar yang dekat dengan anda.
Apa yang akan anda dapatkan???
Jika belum puas berpindah lagi anda ke samudra, memancing lah anda disana.

Apa yang akan anda dapatkan???

Kemudian pulanglah dan ganti kail anda dengan yang besar. ulangi kegiatan anda dari got depan rumah sampai ke tengah samudra seperti diatas.
dan jawablah….
Apa yang akan anda dapatkan???

Ingatlah kehidupan bagaikan memancing
cita n asa hanya bisa tergapai tak kala kita memilih pancing yang tepat dan lokasi memancing yang tepat pula.

Namun kita harus tetap ingat meskipun pilihan kail dan tempat kita sudah tepat belum tentu kita mendapat apa yang kita inginkan. terkadang ikan kakap pun dapat terlepas saat kita angkat keatas.

So jika semua sudah tepat, maka banyaklah berdoa pada Illahi. agar hasilpun bisa menjadi tepat.

Selamat memancing dan semoga sukses dalam kehidupan ini.

Jika ingin sukses yang abadi, kumpulkan ikan-ikan yang telah didapat untuk persiapan perjalanan setelah mati.

Foke Telepon Jokowi Ucapkan Selamat

JAKARTA,— Di tengah makan siang, telepon selular calon gubernur DKI Jakarta Joko Widodo (Jokowi) berdering. Saat diangkat, suara berat seorang pria terdengar. Buru-buru Jokowi menghentikan santapan makan siangnya. Telepon itu ternyata berasal dari pesaing kuatnya, Fauzi Bowo. Foke, sapaan akrab Fauzi, mengucapkan selamat kepada pasangan calon nomor tiga ini.

Baru dua menit yang lalu Pak Foke telepon saya. Intinya mengucapkan selamat.

— Jokowi

“Baru dua menit yang lalu Pak Foke telepon saya. Intinya mengucapkan selamat,” kata Jokowi.

Ucapan selamat Foke kepadanya pun langsung dijawab Jokowi dengan menyampaikan permintaan maaf. “Saya juga mohon maaf sebesar-besarnya kalau saya ngerepotin selama ini, kalau ada kata yang tidak berkenan. Beliau mengiyakan, dan menitip salam untuk keluarga,” ujar Jokowi.

Tidak hanya meminta maaf, Jokowi juga meminta Foke turut membantunya dalam memimpin Jakarta. “Saya mohon ke beliau untuk nanti membantu karena beliau kuasai lapangan dan sudah berikan kesanggupannya,” kata Jokowi.

Pembicaraan itu berlangsung singkat. Hanya sekitar lima menit. Jokowi mengaku dirinya berencana bertemu dengan Foke-Nara dalam waktu dekat.

Hasil Undian Sepakbola PON Riau

Tim-tim yang sebelumnya berlaga di Pra PON akhirnya melengkapi kuota 12 tim untuk PON XVIII Riau. Mereka selanjutnya diundi dalam tiga grup untuk berduel guna memperebutkan emas di cabor sepakbola.

Berdasarkan hasil undian yang dilakukan Jumat (29/6), Tim sepakbola Jawa Timur yang berstatus sebagai juara bertahan, akan tergabung di Grup B. Fandi Eko Utomo dan kawan-kawan bakal bersaing ketat dengan Jawa Barat, Sumatera Utara dan Gorontalo.

Markas PSPS Pekanbaru, Grand Stadium Sport Centre Kuasing, Taluk Kuantan akan menjadi tempat bertanding Grup B.

Untuk Grup A akan diisi runner up PON edisi 2008, Papua yang akan berduel dengan Sulawesi Tenggara, Jambi dan Nusa Tenggara Barat. Grup ini akan berlaga di Stadion Nara Singa, Rengat.

Tuan rumah Riau menempati Grup C bersama dengan Sumatera Barat yang sempat menahan Jatim di uji coba beberapa waktu lalu. Dua tempat lainnya diisi oleh Kalimantan Selatan dan Jawa Tengah. Stadion Tuanku Tambusai, Bangkingan menjadi medan pertempuran grup ini.

Nantinya, dua terbaik dari tiap grup akan kembali diadu di babak enam besar yang akan digelar di Stadion Kaharudin Nasution Pekanbaru. Sedangkan partai semifinal dan final akan dilangsungkan di Stadion Utama Riau. Partai perebutan emas atau final sendiri ini dijadwalkan akan berlangsung pada 19 September nanti.

Berikut hasil undian grup cabang sepak bola PON XVIII Riau:
Grup A (Stadion Nara Singa, Rengat)
Papua, Sulawesi Tenggara, Jambi, Nusa Tenggara Barat

Grup B (Grand Stadium Sport Centre Kuasing, Taluk Kuantan)
Jawa Timur, Jawa Barat, Sumatera Utara, Gorontalo

Grup C (Stadion Tuanku Tambusai, Bangkingan)
Riau, Sumatera Barat, Kalimantan Selatan, Jawa Tengah

Babak Enam Besar:
Stadion Kaharudin Nasution, Pekanbaru
Semifinal dan Final:
Stadion Utama Riau, Pekanbaru (fjr/end)

Juve Nyaman di Puncak

uara bertahan Serie A, Juventus kembali meraih kemenangan setelah mereka sukses mengandaskan tuan rumah Genoa dengan skor 3-1.

Menyimpan sejumlah pemain guna menghadapi Liga Champions, Juve tampil kurang meyakinkan di babak pertama. Akibatnya Rossoblu berhasil mencuri gol lebih dulu melalui Ciro Immobile. Beruntung Juve memiliki pemain seperti Emanuele Giaccherini, Mirko Vucinic, dan Kwadwo Asamoah yang sukses membalikkan keadaan dan membuat tim tamu berbalik unggul dan bahkan memenangkan pertandingan.

Tampil di kandang sendiri membuat Genoa tampil begitu percaya diri. Mereka berani tampil menyerang meski harus menghadapi juara bertahan Juventus.

Bahkan mereka berhasil menciptakan peluang pertama melalui Bosko Jancovic. Akan tetapi kesigapan Gianluigi Buffon masih berhasil membuat skor tetap bertahan 0-0.

Genoa kembali mengancam. Kali ini giliran Immobile yang membuat lini belakang Juve kerepotan. Sayang sepakannya dari luar kotak penalti masih melebar dari gawang Buffon.

Gol yang ditunggu-tunggu publik tuan rumah pun akhirnya lahir di menit ke 18. Immobile yang berada di dalam kotak penalti sukses menyarangkan bola di sisi kiri. Akan tetapi, selebrasi yang berlebihan membuat wasit menghadiahi pemain 22 tahun tersebut dengan kartu kuning.

Satu gol Genoa seolah membuat tim tuan rumah semakin di atas angin. Bianconeri seolah dibuat kehabisan akal untuk bisa membuat gol. Malahan, Andrea Pirlo dan Leonardo Bonucci harus mendapatkan kartu kuning akibat pelanggaran yang mereka buat di menit 25 dan 43. Hingga babak pertama usai, kedudukan masih tetap 1-0 untuk keunggulan Genoa.

Babak kedua Genoa masih tetap percaya diri dan berusaha melakukan tusukan-tusukan melalui Immobile. Akan tetapi, Nyonya Tua tidak tinggal diam. Masimmo Carrera pun mengambil tindakan.

Ia menarik Paolo De Ceglie dan Alessandro Matri yang digantikan oleh Asamoah dan Vucinic. Hasilnya pun cukup signifikan. Serangan Juventus menjadi lebih hidup dan berhasil keluar dari tekanan tuan rumah dan bahkan menyamakan kedudukan.

Buffon mengirimkan umpan panjang langsung menemui Vucinic di sisi kanan. Pemain asal Montenegro ini menarik bola ke belakang yang langsung disambar oleh Giaccherini. Sepakan first time pemain timnas Italia ini sukses bersarang di pojok kanan dan mengubah skor menjadi 1-1.

Kondisi tersebut membuat pertandingan kembali hidup. Kedua tim berusaha mencari gol tambahan guna memenangkan pertandingan. Meski begitu, kedua tim masih belum berhasil mencetak gol. Malahan keduanya kembali mengoleksi kartu kuning yang diberikan wasit kepada Michele Canini dan Andrea Barzagli.

Juventus memiliki mendapatkan peluang untuk unggul dari titik putih setelah Mario Sampirisi melanggar Asamoah di area terlarang. Vucinic yang menjadi algojo tak menyia-nyiakan kesempatan dan mengubah papan skor menjadi 2-1 untuk keunggulan La Vecchia Signora.

Juve terus meningkatkan intensitas seranga. Hasilnya pun cukup positif. Menit 84 Asamoah berhasil menjebol gawang Sebastien Frey untuk kali ketiga. Lagi-lagi Vucinic lah yang menjadi aktor terlahirnya gol bagi tim asal kota Turin ini.

Tim Putih-Hitam sebenarnya memiliki peluang untuk kembali mencetak gol. Sayangnya Vucinic yang sudah berada di depan gawang gagal memanfaatkan peluang. Sepakan kaki kanannya masih sedikit melambung di atas mistar gawang Genoa.

Wasit pun meniup peluit panjang tanda berakhirnya pertandingan. Juventus sukses meraih tiga angka dan bertengger di puncak dengan raihan sembilan poin.

Genoa (4-3-1-2): Frey, Bovo (Granqvist), Melazzi, Canini, Sapirisi (Ferroneti), Jankovic, Seymour, Kucka, Bertolacci, Immobile, Borriello.

Juventus (3-5-2): Buffon, Chilellini, Barzagli, Bonucci, Caceres (Lichtsteiner), Marchisio, De Ceglie (Asamoah), Pirlo, Giaccherini, Giovinco, Matri (Vucinic).   (espn/gl/bgn)

Halo dunia!

Selamat datang di WordPress.com! Ini adalah postingan pertama Anda. Klik Sunting untuk memodifikasi atau menghapusnya, atau tulis postingan baru. Kalau mau, gunakan postingan ini untuk menyampaikan kepada para pembaca mengapa Anda membuat blog ini dan apa rencana Anda selanjutnya.

Selamat ngeblog!