Bahan :
- 1 loyang persegi 12 cm sponge cake cokelat, tebal 1 cm
- 1 scoop strawberry ice cream
- 50 gr tepung terigu protein sedang
- 50 gr tepung roti
- 1 btr telur ayam, kocok lepas
- strawberry sauce, sebagai pelengkap
Cara Membuat :1. Isi sponge cake cokelat dengan ice cream, bentuk menjadi bulat seperti bola.2. Siapkan bahan untuk panir: ayak tepung terigu, taruh dalam mangkuk. Kocok lepas telur dalam mangkuk lain.3. Gulingkan sponge berisi es krim di dalam tepung terigu. Angkat, lalu celupkan ke dalam telur, terakhir gulingkan di atas tepung roti hingga rata. Simpan dalam freezer hingga membeku.4. Goreng dengan minyak panas hingga berwarna kuning keemasan.5. Belah es krim goreng menjadi dua bagian, hidangkan dengan strawberry sauce atau saus lain sesuai selera.
Kamis, 12 Desember 2013
Minggu, 08 Desember 2013
Quis online
Quis Online
Quis online Public Class Form1
Private Sub ListView1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListView1.SelectedIndexChanged
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
buattabel()
KP.Items.Add("TOK-MED-100")
KP.Items.Add("PAB-BEL-101")
KP.Items.Add("SWA-BEL-102")
KP.Items.Add("PAB-MED-103")
KP.Items.Add("RUM-MED-104")
End Sub
Sub buattabel()
With ListView1
.Columns.Add("KP", 80, HorizontalAlignment.Center)
.Columns.Add("nama", 80, HorizontalAlignment.Center)
.Columns.Add("tipe", 80, HorizontalAlignment.Center)
.Columns.Add("hargaM3", 80, HorizontalAlignment.Center)
.Columns.Add("BBeban", 80, HorizontalAlignment.Center)
.Columns.Add("pemakaian", 80, HorizontalAlignment.Center)
.Columns.Add("TTagihan", 80, HorizontalAlignment.Center)
.Columns.Add("pajak", 80, HorizontalAlignment.Center)
.Columns.Add("pembayaran", 60, HorizontalAlignment.Left)
.GridLines = True
.FullRowSelect = True
End With
End Sub
Sub isitabel()
Dim lst As New ListViewItem
lst.Text = KP.Text
lst.SubItems.Add(nama.Text)
lst.SubItems.Add(hargaM3.Text)
lst.SubItems.Add(BBeban.Text)
lst.SubItems.Add(pemakaian.Text)
lst.SubItems.Add(TTagihan.Text)
lst.SubItems.Add(pajak.Text)
lst.SubItems.Add(pembayaran.Text)
ListView1.View = View.Details
ListView1.Items.Add(lst)
End Sub
Private Sub KP_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KP.SelectedIndexChanged
Dim x As String
x = Microsoft.VisualBasic.Right(KP.Text, 3)
If x = "100" Then
Nama.Text = "Muhammad Ardianto"
ElseIf x = "101" Then
Nama.Text = "Jekson Sinaga"
ElseIf x = "102" Then
Nama.Text = "Triani Arista"
ElseIf x = "103" Then
Nama.Text = "Aldyan"
End If
x = Microsoft.VisualBasic.Left(KP.Text, 3)
If x = "PAB" Then
HargaM3.Text = 500
BBeban.Text = 250000
Tipe.Text = "Pabrik"
ElseIf x = "TOK" Then
HargaM3.Text = 500
BBeban.Text = 25000
Tipe.Text = "Toko"
ElseIf x = "RUM" Then
HargaM3.Text = 500
BBeban.Text = 10000
Tipe.Text = "Rumah"
ElseIf x = "SWA" Then
HargaM3.Text = 200
BBeban.Text = 15000
Tipe.Text = "Swalayan"
End If
x = Microsoft.VisualBasic.Mid(KP.Text, 5, 3)
If x = "MED" Then
Daerah.Text = "Medan"
ElseIf x = "BEL" Then
Daerah.Text = "Belawan"
End If
End Sub
Private Sub btnHapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnHapus.Click
KP.Text = ""
Nama.Text = ""
Tipe.Text = ""
TTagihan.Text = ""
HargaM3.Text = ""
Pajak.Text = ""
Pembayaran.Text = ""
Pemakaian.Text = ""
Daerah.Text = ""
BBeban.Text = ""
End Sub
Private Sub Btnproses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnproses.Click
isitabel()
End Sub
Private Sub TTagihan_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TTagihan.KeyPress
If Asc(e.KeyChar) = 13 Then
TTagihan.Text = hargaM3.Text * pemakaian.Text + Val(BBeban.Text)
pajak.Text = 0.01 * TTagihan.Text
pembayaran.Text = Val(TTagihan.Text) + Val(pajak.Text)
End If
End Sub
Private Sub Btnkeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnkeluar.Click
End
End Sub
End Class
Quis online Public Class Form1
Private Sub ListView1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListView1.SelectedIndexChanged
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
buattabel()
KP.Items.Add("TOK-MED-100")
KP.Items.Add("PAB-BEL-101")
KP.Items.Add("SWA-BEL-102")
KP.Items.Add("PAB-MED-103")
KP.Items.Add("RUM-MED-104")
End Sub
Sub buattabel()
With ListView1
.Columns.Add("KP", 80, HorizontalAlignment.Center)
.Columns.Add("nama", 80, HorizontalAlignment.Center)
.Columns.Add("tipe", 80, HorizontalAlignment.Center)
.Columns.Add("hargaM3", 80, HorizontalAlignment.Center)
.Columns.Add("BBeban", 80, HorizontalAlignment.Center)
.Columns.Add("pemakaian", 80, HorizontalAlignment.Center)
.Columns.Add("TTagihan", 80, HorizontalAlignment.Center)
.Columns.Add("pajak", 80, HorizontalAlignment.Center)
.Columns.Add("pembayaran", 60, HorizontalAlignment.Left)
.GridLines = True
.FullRowSelect = True
End With
End Sub
Sub isitabel()
Dim lst As New ListViewItem
lst.Text = KP.Text
lst.SubItems.Add(nama.Text)
lst.SubItems.Add(hargaM3.Text)
lst.SubItems.Add(BBeban.Text)
lst.SubItems.Add(pemakaian.Text)
lst.SubItems.Add(TTagihan.Text)
lst.SubItems.Add(pajak.Text)
lst.SubItems.Add(pembayaran.Text)
ListView1.View = View.Details
ListView1.Items.Add(lst)
End Sub
Private Sub KP_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KP.SelectedIndexChanged
Dim x As String
x = Microsoft.VisualBasic.Right(KP.Text, 3)
If x = "100" Then
Nama.Text = "Muhammad Ardianto"
ElseIf x = "101" Then
Nama.Text = "Jekson Sinaga"
ElseIf x = "102" Then
Nama.Text = "Triani Arista"
ElseIf x = "103" Then
Nama.Text = "Aldyan"
End If
x = Microsoft.VisualBasic.Left(KP.Text, 3)
If x = "PAB" Then
HargaM3.Text = 500
BBeban.Text = 250000
Tipe.Text = "Pabrik"
ElseIf x = "TOK" Then
HargaM3.Text = 500
BBeban.Text = 25000
Tipe.Text = "Toko"
ElseIf x = "RUM" Then
HargaM3.Text = 500
BBeban.Text = 10000
Tipe.Text = "Rumah"
ElseIf x = "SWA" Then
HargaM3.Text = 200
BBeban.Text = 15000
Tipe.Text = "Swalayan"
End If
x = Microsoft.VisualBasic.Mid(KP.Text, 5, 3)
If x = "MED" Then
Daerah.Text = "Medan"
ElseIf x = "BEL" Then
Daerah.Text = "Belawan"
End If
End Sub
Private Sub btnHapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnHapus.Click
KP.Text = ""
Nama.Text = ""
Tipe.Text = ""
TTagihan.Text = ""
HargaM3.Text = ""
Pajak.Text = ""
Pembayaran.Text = ""
Pemakaian.Text = ""
Daerah.Text = ""
BBeban.Text = ""
End Sub
Private Sub Btnproses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnproses.Click
isitabel()
End Sub
Private Sub TTagihan_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TTagihan.KeyPress
If Asc(e.KeyChar) = 13 Then
TTagihan.Text = hargaM3.Text * pemakaian.Text + Val(BBeban.Text)
pajak.Text = 0.01 * TTagihan.Text
pembayaran.Text = Val(TTagihan.Text) + Val(pajak.Text)
End If
End Sub
Private Sub Btnkeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnkeluar.Click
End
End Sub
End Class
Sabtu, 07 Desember 2013
tentang mesran dot net
Di mesran.net banyak website mengenai bahasa pemrograman .
dan banyak juga artikel artikel yang dipostingkan di mesran.net
dan beberapa bahasa pemrograman . Contohnya visual basic dot netmenurut pendapat saya website ini merupakan tempat belajar yang sangat seru dan juga menarik
kita dapat mempelajarinya di blog tersebut
dan juga menemukan banyak artikel disana
kita juga dapat melihat informasi jadwal perkuliahan , melihat IP dan lain lain setelah melakukan login member di mesran.net
jadi jika anda tertarik dan ingin belajar kunjungilah blog mesran.net
Perkembangan OS Android
Sejarah Perkembangan OS Android
Android berasal dari bahasa Yunani, yaitu "andr" yang artinya "laki-laki", dan "eides" yang artinya "dari spesies; menyerupai". Dan dalam perkembangannya, Android menjadi nama sistem operasi ponsel yang di pilih oleh Google.
Pada tahun 2005 yang merupakan masa emas di mana Google berlimpah kekayaan. Agar tidak mubazir, Google kemudian membelanjakan uangnya dengan membeli perusahaan-perusahaan yang sedang berkembang. Salah satunya adalah dengan membeli sebuah perusahaan kecil yang bernama Android Inc, yang didirikan oleh Andy Rubin (yang sekarang menjabat sebagai direktur Google Mobile Platform). Perusahaan ini bergerak di bidang Aplikasi ponsel. Google menyadari, Andy Rubin yang berkutat di Android adalah orang yang paling mengerti tentang Android, olehnya itu ia dipercaya untuk tetap memimpin perusahan tersebut. Saat itu digelar meeting, untuk mendengarkan visi dan misi dari Android yang dibawakan oleh Andy Rubin. Dalam meeting tersebut hadir VP Engineering Google, Vic Gundotra. Ketika meeting baru mulai dan Andy siap memaparkan apa itu Android, Vic langsung menyela dengan pertanyaan :
"Andy, apa dunia ini benar masih butuh Mobile Operating System yang lain?"
Usaha Google adalah di mesin pencari dan iklan, dan mesin pencari Google sudah ada disetiap Smartphone. Saat ini di dunia sudah ada banyak Operating System, ada Windows Mobile, Blackberry, Symbian, dan ada rajanya Smartphone, Apple dengan iPhone or iOS-nya, belum lagi Operating System kecil lainnya. Andy menjelaskan demikian, ada 2 point utama kenapa Android harus dibuat.
Point Pertama
Saat ini kita sedang kritis, dan butuh sebuah Operating System yang free dan terbuka (open source) supaya setiap developer bisa dengan bebas berinovasi di setiap level di dalamnya. Dengan cara ini para pembuat handset atau vendor bisa membuat handset sesuai keinginannya, boleh layar 2", 3" atau 4". Boleh pakai keyboard, boleh tidak, boleh ada kamera depan atau tidak. Dan nanti semua operator bisa ikut bergabung bersama sesuai kemampuan mereka, boleh 2G, 3G, 4G, LTE, Wimax, boleh CDMA boleh GSM dan lain sebagainya. Akhirnya nanti adalah konsumen yang diuntungkan, mereka bisa menentukan sendiri handset Smartphone Android mana yang terbaik menurut mereka, sesuai kebutuhan, kemampuan dan operator yang menjadi pilihan mereka.
Point Kedua
Karena kini Google adalah raksasa IT, Google punya kemampuan. Kalau Google diam saja, maka dunia akan menghadapi Draconian Future (Draconian Future mengacu kepada jaman Yunani ketika seorang bernama Draco menjadi pengatur hukum di sana, dimana pelanggaran kecil saja mendapat hukuman yang berat) masa depan yang "sulit" dimana nanti di depan hanya akan ada : 1 Orang 1 Perusahaan 1 Operating System dan 1 Operator saja yang bisa jadi pilihan konsumen.
Rumor bahwa Google akan membuat ponsel pun kemudian berkembang hingga ke pabrik-pabrik ponsel. Isu ini bahkan diangkat oleh BBC dan The Wall Street Journal. Mereka percaya bahwa Google sedang mempersiapkan sebuah ponsel dimana terintegrasi oleh layanan-layanan Google, seperti Google Map dan Gmail di dalamnya.Perkembangan OS Android
Android berasal dari bahasa Yunani, yaitu "andr" yang artinya "laki-laki", dan "eides" yang artinya "dari spesies; menyerupai". Dan dalam perkembangannya, Android menjadi nama sistem operasi ponsel yang di pilih oleh Google.
Pada tahun 2005 yang merupakan masa emas di mana Google berlimpah kekayaan. Agar tidak mubazir, Google kemudian membelanjakan uangnya dengan membeli perusahaan-perusahaan yang sedang berkembang. Salah satunya adalah dengan membeli sebuah perusahaan kecil yang bernama Android Inc, yang didirikan oleh Andy Rubin (yang sekarang menjabat sebagai direktur Google Mobile Platform). Perusahaan ini bergerak di bidang Aplikasi ponsel. Google menyadari, Andy Rubin yang berkutat di Android adalah orang yang paling mengerti tentang Android, olehnya itu ia dipercaya untuk tetap memimpin perusahan tersebut. Saat itu digelar meeting, untuk mendengarkan visi dan misi dari Android yang dibawakan oleh Andy Rubin. Dalam meeting tersebut hadir VP Engineering Google, Vic Gundotra. Ketika meeting baru mulai dan Andy siap memaparkan apa itu Android, Vic langsung menyela dengan pertanyaan :
"Andy, apa dunia ini benar masih butuh Mobile Operating System yang lain?"
Usaha Google adalah di mesin pencari dan iklan, dan mesin pencari Google sudah ada disetiap Smartphone. Saat ini di dunia sudah ada banyak Operating System, ada Windows Mobile, Blackberry, Symbian, dan ada rajanya Smartphone, Apple dengan iPhone or iOS-nya, belum lagi Operating System kecil lainnya. Andy menjelaskan demikian, ada 2 point utama kenapa Android harus dibuat.
Point Pertama
Saat ini kita sedang kritis, dan butuh sebuah Operating System yang free dan terbuka (open source) supaya setiap developer bisa dengan bebas berinovasi di setiap level di dalamnya. Dengan cara ini para pembuat handset atau vendor bisa membuat handset sesuai keinginannya, boleh layar 2", 3" atau 4". Boleh pakai keyboard, boleh tidak, boleh ada kamera depan atau tidak. Dan nanti semua operator bisa ikut bergabung bersama sesuai kemampuan mereka, boleh 2G, 3G, 4G, LTE, Wimax, boleh CDMA boleh GSM dan lain sebagainya. Akhirnya nanti adalah konsumen yang diuntungkan, mereka bisa menentukan sendiri handset Smartphone Android mana yang terbaik menurut mereka, sesuai kebutuhan, kemampuan dan operator yang menjadi pilihan mereka.
Point Kedua
Karena kini Google adalah raksasa IT, Google punya kemampuan. Kalau Google diam saja, maka dunia akan menghadapi Draconian Future (Draconian Future mengacu kepada jaman Yunani ketika seorang bernama Draco menjadi pengatur hukum di sana, dimana pelanggaran kecil saja mendapat hukuman yang berat) masa depan yang "sulit" dimana nanti di depan hanya akan ada : 1 Orang 1 Perusahaan 1 Operating System dan 1 Operator saja yang bisa jadi pilihan konsumen.
Rumor bahwa Google akan membuat ponsel pun kemudian berkembang hingga ke pabrik-pabrik ponsel. Isu ini bahkan diangkat oleh BBC dan The Wall Street Journal. Mereka percaya bahwa Google sedang mempersiapkan sebuah ponsel dimana terintegrasi oleh layanan-layanan Google, seperti Google Map dan Gmail di dalamnya.Perkembangan OS Android
Cara Menginstal Visual Basic
ungkin di antara kita masih banyak yang belum tau apa sih visual
basic itu??? dan belum tau gimana cara Cara Menginstal Visual Basic 6.0.
nah kali ini saya akan coba ngebahas Cara Menginstal Visual Basic 6.0 .
Adapun Langkah- langkah untuk menginstal Visual Basic 6.0 adalah :
1. Masukan CD-ROM installer , buka isinya kemudian klik ganda pada
setup.exe sehingga akan muncul kotak dialog yang pertama kemudian klik
next.
2. Kotak dialog yang kedua akan muncul, baca agreement jika setuju klik I accept the agreement dan klik next.
3. Kotak dialog yang ketiga akan muncul, isikan nomor produk yang tertera pada VB6 klik next.
4. Kotak dialog yang keempat akan muncul, klik instalasi Visual Basic 6 klik next, program InstallShield akan bekerja dan muncul kotak dialog kelima yang isinya tentang aturan hukum pembajakan ada aturan main yang harus disepakati bersama yaitu EULA(End User Lisence Agreement) perjanjian antara Microsoft dengan user, klik continue.
5. Kotak dialog yang keenam akan muncul, secara default VB6 akan
akan membuat folder yang terletak C:\Program files \DevStudio\VB. klik ok.
6. Kotak dialog yang ketujuh akan muncul, menyediakan pilihan setup Typical atau Custom lalu klik ok, nama program VB6 secara default adalah Microsoft Visual Basic 6 lalu klik continue proses penyalinan hardisk dimuali pada langkah ini .
7. Setelah proses mencapai 100% akan muncul tampilan yang memberi tahu bahwa proses instalasi akan komplet. Klik ok, VB6 akan meminta untuk merestart windows agar hasil proses instalasi sesuai dengan rencana.
8. Klik tombol restart windows, lengkaplah proses instalasi VB 6.0. Untuk melihat hasilnya, dari menu Start arahkan pointer ke Microsoft Visual Basic 6.o, maka akan tampil kelompok dari program Visual Basic 6.0 Kebutuhan Perangkat Komputer Sistem Operasi 32 bit seperti Windows 95 dst, Windows NT 4.0 atau 3.51 IBM PC atau yang kompatibel dengan prosesor 486 keatas RAM 16 MB keatas VGA dengan resolusi yang cukup tinggi Ruangan hardisk yang memadai untuk menyuimpan program VB6 Microsoft Visual Basic tersedia dalam 3 ( tiga ) edisi, yaitu :
1. Learning edition, merupakan edisi khusus yang perlengkapannya sangat minimal tapi sudah cukup bagi para pemula yang hanya menciptakan program-program sederhana.
2. Profesional edition, telah melengkapi semua peralatannya untuk membuat program.
3. Enterprise edition, merupakan edisi terlengkap, termasuk didalamnya untuk pembuatan aplikasi-aplikasi client server dalam jaringan dan MS-Source Safe.
Menjalankan VISUAL BASIC 6
Untuk menjalankan VB6 ada beberapa cara yang dapat digunakan, yaitu :
1. Dari Menu Start pilih program – Microsoft Visual Studio 6 – lalu klik icon Visual basic 6
2. Klik ganda icon Visual Basic 6 pada Dekstop
3. Klik ganda ekstensi .MAK pada Window Eksplorer
4. Klik ganda file VB6.EXE pada Windows Eksplorer. File ini secara default terletak pada folder C:\Program files \Microsoft VisuCara Menginstal Visual Basic
2. Kotak dialog yang kedua akan muncul, baca agreement jika setuju klik I accept the agreement dan klik next.
3. Kotak dialog yang ketiga akan muncul, isikan nomor produk yang tertera pada VB6 klik next.
4. Kotak dialog yang keempat akan muncul, klik instalasi Visual Basic 6 klik next, program InstallShield akan bekerja dan muncul kotak dialog kelima yang isinya tentang aturan hukum pembajakan ada aturan main yang harus disepakati bersama yaitu EULA(End User Lisence Agreement) perjanjian antara Microsoft dengan user, klik continue.
5. Kotak dialog yang keenam akan muncul, secara default VB6 akan
akan membuat folder yang terletak C:\Program files \DevStudio\VB. klik ok.
6. Kotak dialog yang ketujuh akan muncul, menyediakan pilihan setup Typical atau Custom lalu klik ok, nama program VB6 secara default adalah Microsoft Visual Basic 6 lalu klik continue proses penyalinan hardisk dimuali pada langkah ini .
7. Setelah proses mencapai 100% akan muncul tampilan yang memberi tahu bahwa proses instalasi akan komplet. Klik ok, VB6 akan meminta untuk merestart windows agar hasil proses instalasi sesuai dengan rencana.
8. Klik tombol restart windows, lengkaplah proses instalasi VB 6.0. Untuk melihat hasilnya, dari menu Start arahkan pointer ke Microsoft Visual Basic 6.o, maka akan tampil kelompok dari program Visual Basic 6.0 Kebutuhan Perangkat Komputer Sistem Operasi 32 bit seperti Windows 95 dst, Windows NT 4.0 atau 3.51 IBM PC atau yang kompatibel dengan prosesor 486 keatas RAM 16 MB keatas VGA dengan resolusi yang cukup tinggi Ruangan hardisk yang memadai untuk menyuimpan program VB6 Microsoft Visual Basic tersedia dalam 3 ( tiga ) edisi, yaitu :
1. Learning edition, merupakan edisi khusus yang perlengkapannya sangat minimal tapi sudah cukup bagi para pemula yang hanya menciptakan program-program sederhana.
2. Profesional edition, telah melengkapi semua peralatannya untuk membuat program.
3. Enterprise edition, merupakan edisi terlengkap, termasuk didalamnya untuk pembuatan aplikasi-aplikasi client server dalam jaringan dan MS-Source Safe.
Menjalankan VISUAL BASIC 6
Untuk menjalankan VB6 ada beberapa cara yang dapat digunakan, yaitu :
1. Dari Menu Start pilih program – Microsoft Visual Studio 6 – lalu klik icon Visual basic 6
2. Klik ganda icon Visual Basic 6 pada Dekstop
3. Klik ganda ekstensi .MAK pada Window Eksplorer
4. Klik ganda file VB6.EXE pada Windows Eksplorer. File ini secara default terletak pada folder C:\Program files \Microsoft VisuCara Menginstal Visual Basic
Cara Menggunakan Blackberry Messenger
Cara Menggunakan Blackberry Messenger
( BBM ) tidaklah terlalu sulit, layaknya menggunakan aplikasi chat yang
lain. Tetapi pada awal pertama kali anda baru saja membeli Blackberry
baru tentunya diperlukan sebuah instalasi agar software BBM yang akan
anda pakai dapat dipergunakan dengan benar untuk melakukan komunikasi.
Tetapi, sebelum kita menuju kesana tahukah anda apa saja keunggulan bbm
yang dapat anda gunakan ? Pasti amat banyak, tak hanya dapat untuk
berkirim pesan saja namun juga anda dapat memakainya untuk melakukan
transfer data secara cepat. Nah, ini tentu amat menguntungkan untuk
mereka yang suka transfer file berbentuk gambar, suara serta dokumen.
Beberapa langkah serta cara menggunakan blackberry messenger diantaranya adalah :
Kebanyakan orang menggunakan blackberry di indonesia lebih banyak dikarenakan karena mereka berasumsi bahwa blackberry adalah ponsel yang mempunyai kesan “mewah” dan memanglah benar perihal itu, dikarenakan fitur yang ada pada blackberry tidak dimiliki oleh phone celluler manapun. Anda dapat menggunakan banyak fitur BBM yang cukup digandrungi banyak orang ini. apa anda berniat mencobanya ?
banyak di antara mereka yang telah mencoba menjadi ketagihan dengan fasilitas ini karena ingin selalu eksis dengan berkirim pesan dengan cepat tentunya. Anda tidak mau ketinggalan bukan, nah bila anggarannya telah cukup Anda tinggal membelinya saja, dikarenakan cara menggunakan blackberry messenger sangat mudah sehingga semua orang dapat dengan mudah menggunakannya.
Beberapa langkah serta cara menggunakan blackberry messenger diantaranya adalah :
- Tentunya anda menggunakan HP Blackberry
- Kerjakan instalasi sampai selesai ( HP Blackberry baru )
- Kerjakan berlangganan dengan operator seluler yang anda gunakan
- Sesudah itu anda baru dapat invite orang dengan pin yang di punyai pada kontak bbm
Kebanyakan orang menggunakan blackberry di indonesia lebih banyak dikarenakan karena mereka berasumsi bahwa blackberry adalah ponsel yang mempunyai kesan “mewah” dan memanglah benar perihal itu, dikarenakan fitur yang ada pada blackberry tidak dimiliki oleh phone celluler manapun. Anda dapat menggunakan banyak fitur BBM yang cukup digandrungi banyak orang ini. apa anda berniat mencobanya ?
banyak di antara mereka yang telah mencoba menjadi ketagihan dengan fasilitas ini karena ingin selalu eksis dengan berkirim pesan dengan cepat tentunya. Anda tidak mau ketinggalan bukan, nah bila anggarannya telah cukup Anda tinggal membelinya saja, dikarenakan cara menggunakan blackberry messenger sangat mudah sehingga semua orang dapat dengan mudah menggunakannya.
Cara Mengembalikan File Yang Terkena Virus
cara mengembalikan file yang terkena virus
Virus diciptakan mengacaukan suatu system komputer,sehingga file-file yang tersimpan rapi di komputer kita dapat menghilang entah kemana,pasti kesal bukan akibat ulah si virus???.Virus sebenarnya bukanlah menghapus atau menghilangkan file,akan tetapi virus komputer hanya menyembunyikan file yang telah di infeksikan oleh virus komputer tersebut.
Kemudian file yang telah menginjeksikan virus pada file kita,virus akan mengubah attribute file kita menjadi file system sehingga file tersebut menjagi super hidden.Meskipun virus hanya menyembunyikan file,tetapi kita tetap tidak bisa membukanya dengan cara "show the hidden file".
Untuk mengatasi hal yang demikian,saya ada caranya kepada kamu.Cara yang akan saya bahas pada postingan kali ini adalah "cara mengembalikan file yang terkena virus".cara mengembalikan file dilakukan cukup mudah dan simple.
Ahh,daripada menunggu lama,langsung saja kita bahas cara mengembalikan file yang terkena virus.
Langkah-langkah yang dilakukan pertama sekali adalah melihat dahulu file kita yang disembunyikan oleh si virus nakal tadi.
Berikut caranya:
1. Buka windows explorer
2. Pilih menu tolls > lalu klik folder option
5. Semua folder dan file kamu yang terinfeksi oleh virus akan terlihat berbayang-bayang atau samar-samar
Nah yang ini ni yang paling pokok,(cara mengembalikan file yang terinfeksi virus).Berikut caranya:
6. Apabila kamu telah menginstall antivirus,uninstall terlebih dahulu.
7. Setelah itu, buka command prompt dengan menekan tombol window+R,
lalu ketik cmd. Kemudian ENTER.
8. Masuk ke folder yang filenya terkena virus. Pada contoh ini, file berada di folder
data, drive D. Ketika command prompt muncul, ketik D: lalu enter, kemudian ketik
cd data lalu enter untuk masuk ke folder data.
9. Ketik perintah ATTRIB *.* -s –h –r /s /d jika sudah,tekan enter. Keterangan masing-masing
perintah, bis ditemukan dengan mengetik ATTRIB /? lalu enter.
10.
Setelah menyelesaikan langkah-langkah seperti diatas,folder-folder
dan file file kamu sudah dapat dikembalikan seperti keadaan
normal.Seperti gambar dibawah\
Jadi
sebelum saya menutup postingan kali ini adalah jangan cemas apabila
file-file penting kamu hilang akibat ulah nakal si virus,semua dapat
kita akali dengan cara mengembalikan file yang terkena virus seperti
yang telah kita bahas tadi. Semoga bermanfaat
Virus diciptakan mengacaukan suatu system komputer,sehingga file-file yang tersimpan rapi di komputer kita dapat menghilang entah kemana,pasti kesal bukan akibat ulah si virus???.Virus sebenarnya bukanlah menghapus atau menghilangkan file,akan tetapi virus komputer hanya menyembunyikan file yang telah di infeksikan oleh virus komputer tersebut.
Kemudian file yang telah menginjeksikan virus pada file kita,virus akan mengubah attribute file kita menjadi file system sehingga file tersebut menjagi super hidden.Meskipun virus hanya menyembunyikan file,tetapi kita tetap tidak bisa membukanya dengan cara "show the hidden file".
Untuk mengatasi hal yang demikian,saya ada caranya kepada kamu.Cara yang akan saya bahas pada postingan kali ini adalah "cara mengembalikan file yang terkena virus".cara mengembalikan file dilakukan cukup mudah dan simple.
Ahh,daripada menunggu lama,langsung saja kita bahas cara mengembalikan file yang terkena virus.
Langkah-langkah yang dilakukan pertama sekali adalah melihat dahulu file kita yang disembunyikan oleh si virus nakal tadi.
Berikut caranya:
1. Buka windows explorer
2. Pilih menu tolls > lalu klik folder option
5. Semua folder dan file kamu yang terinfeksi oleh virus akan terlihat berbayang-bayang atau samar-samar
Nah yang ini ni yang paling pokok,(cara mengembalikan file yang terinfeksi virus).Berikut caranya:6. Apabila kamu telah menginstall antivirus,uninstall terlebih dahulu.
7. Setelah itu, buka command prompt dengan menekan tombol window+R,
lalu ketik cmd. Kemudian ENTER.
8. Masuk ke folder yang filenya terkena virus. Pada contoh ini, file berada di folderdata, drive D. Ketika command prompt muncul, ketik D: lalu enter, kemudian ketik
cd data lalu enter untuk masuk ke folder data.
9. Ketik perintah ATTRIB *.* -s –h –r /s /d jika sudah,tekan enter. Keterangan masing-masingperintah, bis ditemukan dengan mengetik ATTRIB /? lalu enter.
10.
Setelah menyelesaikan langkah-langkah seperti diatas,folder-folder
dan file file kamu sudah dapat dikembalikan seperti keadaan
normal.Seperti gambar dibawah\
Jadi
sebelum saya menutup postingan kali ini adalah jangan cemas apabila
file-file penting kamu hilang akibat ulah nakal si virus,semua dapat
kita akali dengan cara mengembalikan file yang terkena virus seperti
yang telah kita bahas tadi. Semoga bermanfaat Rabu, 13 November 2013
Yuk! Belajar Konsep Pemrograman Di Mesran.Blogspot.Com
Tugas Belajar Bahasa Pemograman
Pada tutorial kali ini, kita bahas bersama contoh program visual basic. Langkah-langkah nya sbb:
Pada tutorial kali ini, kita bahas bersama contoh program visual basic. Langkah-langkah nya sbb:
1. Buka Microsoft Visual Studio
2. Buka New>>Project
3. Beri nama project anda pada name, kemudian klik ok
4. Setelah itu maka akan keluar From1 di project kita, kemudian desain From tersebut dengan menggunakan Label, Textbox, Combobox, dan Botton yang dapat kata pilih pada proporties.
5.Listing Program dibawah ini:
Public Class Form3
Private Sub btnkeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnkeluar.Click
End
End Sub
Private Sub Form3_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
npm.Items.Add("12110619")
npm.Items.Add("12110504")
kodedosen.Items.Add("001")
kodedosen.Items.Add("002")
kmatakuliah.Items.Add("111")
kmatakuliah.Items.Add("222")
Dim i As Integer
For i = 100 To 1 Step -1
nk.Items.Add(i)
nt.Items.Add(i)
nuts.Items.Add(i)
nuas.Items.Add(i)
Next
End Sub
Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles npm.SelectedIndexChanged
Select Case npm.text
Case Is = "12110619"
nama.Text = "Yulia Lumbantoruan"
Jenjang.Text = "S1"
jurusan.Text = "Teknik Informatika"
Case Is = "12110504"
nama.Text = "Shandora Siregar"
Jenjang.Text = "s1"
jurusan.Text = "Teknik Informatika"
End Select
End Sub
Private Sub ComboBox2_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles kodedosen.SelectedIndexChanged
Select Case kodedosen.Text
Case Is = "001"
nd.Text = "Kenedi Tampubolon S.Si"
Case Is = "002"
nd.Text = " Sinar Sinurat S.T, M.kom"
End Select
End Sub
Private Sub kmatakuliah_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles kmatakuliah.SelectedIndexChanged
Select Case kmatakuliah.Text
Case Is = "111"
matakuliah.Text = " Matriks Dan LInier"
Case Is = "222"
matakuliah.Text = "Matematika diskrit"
End Select
End Sub
Private Sub btnproses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnproses.Click
nak.Text = 0.1 * nk.Text + 0.15 * nt.Text + 0.3 * nuts.Text + 0.45 * nuas.Text
If nak.Text >= 80 Then
nhu.Text = "A"
ket.Text = "Lulus"
ElseIf nak.Text >= 70 Then
nhu.Text = "B"
ket.Text = " Lulus"
ElseIf nak.Text >= 60 Then
nhu.Text = "C"
ket.Text = "Lulus"
ElseIf nak.Text >= 50 Then
nhu.Text = "D"
ket.Text = "Tidak Lulus"
Else
nhu.Text = "E"
ket.Text = "Tidak Lulus"
End If
End Sub
Private Sub nama_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles nama.TextChanged
End Sub
End Class
Cara Membuat Aplikasi Sederhana Menggunakan Visual Basic
Cara Membuat Aplikasi Sederhana Menggunakan Visual BasicVisual Basic, sudah tidak asing lagi untuk para programmer yang sering mencompile program-programnya dengan berbagai macam kode perintah yang memungkinkan anda menciptakan sebuah aplikasi atau program baru hanya dengan mencompile setiap kode perintah yang anda tulis.Kali ini saya akan membagikan cara membuat aplikasi sederhana menggunakan Visual Basic, siapa tahu anda membutuhkannya entah untuk bio atau lainnya :)Oke langsung saja download dulu aplikasi Visual Basic 6 [ DOWNLOAD ], Jika yang sudah punya lanjutkan saja.> Untuk yang mendownload, Visual Basic tersebut versi portable tanpa harus menginstal langsung saja buka aplikasi, tetapi saat membuka aplikasi pilih dulu bagian [ Reg Key (allows .Exe creation)
Setelah itu pilih " Yes " kemudian buka kembali Visual Basic 6.0 anda, dan pilih Run Visual Basic 6.
Pilih standard EXE dan Open, dan selesai. Sekarang kita akan memulai kreasi.
Untuk memulai membuat program sederhana anda mari kita buat tombol aplikasi anda, caranya pada bagian general cari dan pilih CommandButton, anda dapat mengatur ukuran Form1 yang nantinya akan menjadi besaran ukuran program anda. kemudian gambar sendiri pada kolom Form1 seperti contoh berikut:
Sebelum menulis kode, kita ubah dulu nama program dan nama tombol program anda. Caranyaklik pada bagian Form1 kemudian pada bagian caption ubah Command1menjadi nama program anda.untuk button sama silahkan klik dulu pada bagian button yang telah anda buat kemudian pada bagian caption ubah command1 menjadi judul button anda.Keterangan :
Keterangan : kata " Hallo! " dan " Message " pada kode tadi [ MsgBox "Hallo!", vbOKOnly, "Message" ] dapat anda ganti sesuai dengan keinginan anda. Jika sudah selesai klik saja tombol silang.Sekarang saatnya kita untuk membuatnya menjadi sebuah Aplikasi kecil, dengan cara pilih File kemudian Make Project1.exe simpan dimana anda mau, dan ubah nama Project1 menjadi nama aplikasi anda kemudian pilih Save.Silahkan buka dimana tempat anda menyimpan file anda tadi dan coba di buka.
Sekarang coba klik tombol yang sudah di buat tadi, berhasil bukan?
Sekian dulu tutorial dari saya, semoga sukses, tetap berkarya dan semoga membantu!
Sumber : http://shandoraraniwatisiregar.blogspot.com/
Setelah itu pilih " Yes " kemudian buka kembali Visual Basic 6.0 anda, dan pilih Run Visual Basic 6.
Pilih standard EXE dan Open, dan selesai. Sekarang kita akan memulai kreasi.
Untuk memulai membuat program sederhana anda mari kita buat tombol aplikasi anda, caranya pada bagian general cari dan pilih CommandButton, anda dapat mengatur ukuran Form1 yang nantinya akan menjadi besaran ukuran program anda. kemudian gambar sendiri pada kolom Form1 seperti contoh berikut:
Sebelum menulis kode, kita ubah dulu nama program dan nama tombol program anda. Caranyaklik pada bagian Form1 kemudian pada bagian caption ubah Command1menjadi nama program anda.untuk button sama silahkan klik dulu pada bagian button yang telah anda buat kemudian pada bagian caption ubah command1 menjadi judul button anda.Keterangan : - Buttion = Tombol yang anda buat menggunakan CommandButton
- Form 1 = Bentuk aplikasi anda dapat anda sesuaikan
Keterangan : kata " Hallo! " dan " Message " pada kode tadi [ MsgBox "Hallo!", vbOKOnly, "Message" ] dapat anda ganti sesuai dengan keinginan anda. Jika sudah selesai klik saja tombol silang.Sekarang saatnya kita untuk membuatnya menjadi sebuah Aplikasi kecil, dengan cara pilih File kemudian Make Project1.exe simpan dimana anda mau, dan ubah nama Project1 menjadi nama aplikasi anda kemudian pilih Save.Silahkan buka dimana tempat anda menyimpan file anda tadi dan coba di buka.
Sekarang coba klik tombol yang sudah di buat tadi, berhasil bukan?
Sekian dulu tutorial dari saya, semoga sukses, tetap berkarya dan semoga membantu!
Sumber : http://shandoraraniwatisiregar.blogspot.com/
Contoh database yang menggunakan Mysql
Untuk membuat suatu database digunakan perintah create. Contohnya : create database STMIK;
Ø Kemudian untuk menggunkannya digunakan perintah use. Contohnya : use STMIK ;
Ø Untuk membuat suatu table kita menggunakan perintah create table nama_tabel(nama_field tipe_data(jumlah),…);
· NPM=nama dari field yang akan di isi.
· Int= tipe data dari yang akan digunakan oleh NPM.
· (5)=jumlah yang akan digunakan oleh NPM.
Ø Untuk menampilkan table yang telah dibuat digunakan perintah desc nama_table;
Contohnya : desc MAHASISWA;
Ø Untuk memasukkan data dari table yang telah dibuat di gunakan perintah INSERT INTO nama_tabel VALUE(isi dari field,….);
Ø Contohnya : INSERT INTO MAHASISWA VALUE(12345,’TIAR’,’L’,’3IA10’,’CIJANTUNG’,’BELAJAR’);
Ø Untuk melihat hasil dari data yang di masukkan ke table dengan menggunakan perintah SELECT * FROM nama_table;
Contohnya : SELECT * FROM MAHASISWA;
Ø Untuk memasukkan data lebih dari satu kita gunakan perintah INSERT INTO nama_tabel VALUES(isi dari field,….); seperti gambari diatas. Bedanya untuk memasukkan 1 data saja kita menggunakan VALUE dan untuk memasukkan banyak data kita menggunakan VALUES.
hasil database yang sudah dibuat
Langganan:
Komentar (Atom)






