simpan gambar di vb.net dengan type bloob di mysql


Dim connstr As String
connstr = "server=localhost;user id=root;password=;database=aldie;"

            Try
                'membaca isi steram
                fs = New FileStream(currfile, FileMode.Open, FileAccess.Read)

                'mendapatkan ukuran file
                ukuran = fs.Length
                Dim rawdata() As Byte = New Byte(ukuran) {}
                fs.Read(rawdata, 0, ukuran)
                fs.Close()

                Dim sql As String = "select * from jenisbarang"
                conn = New MySqlConnection(connstr)
                conn.Open()

adapter = New MySqlDataAdapter(sql, conn)
Dim cmdbuilder As MySqlCommandBuilder = New MySqlCommandBuilder(adapter)
Dim ds As DataSet = New DataSet("jenisbarang")

                'mengsi data adapter
                adapter.Fill(ds, "jenisbarang")

                Dim row As DataRow = ds.Tables("jenisbarang").NewRow()
                row("kdjenis") = txtkdjenis.Text
                row("nmjenis") = txtnmjenis.Text
                row("nama_file") = Path.GetFileName(txtphoto.Text)
                row("ukuran") = ukuran
                row("file") = rawdata

                'meemasukan row
                ds.Tables("jenisbarang").Rows.Add(row)
                'menyimpan perubahan ke database
                adapter.Update(ds, "jenisbarang")
                MsgBox("data berhasil di masukan", MsgBoxStyle.Information, "insertok")
                mycn.tutupkoneksi()
                bersihkantext()

'clear textbox dan piccturebox
 txtkdjenis.Text = "" : txtnmjenis.Text = ""
 txtphoto.Text = "" : txtkdjenis.Focus()
 Catch ex As Exception
 MsgBox("failed to insert : " + ex.Message)
 End Try



narsis dikit ga papa kan..hehe

suara di vb.net

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim SAPI
        SAPI = CreateObject("SAPI.spvoice")

        SAPI.Speak("Welcome to the 13th visual basic .net tutorial")

    End Sub

End Class

Membatasi Karakter Input TextBox

Mungkin Anda pernah menginginkan agar sebuah TextBox hanya boleh atau bisa diisi dengan karakter input tertentu, seperti hanya karakter "R" dan "A" saja, atau mungkin hanya karakter "I" dan karakter angka saja, atau yang lain.
Berikut ini satu baris kode yang bisa Anda gunakanuntuk melakukannya. Sebagai contoh, buatlah sebuah kontrol TextBox di dalam Form. Lalu ketikkan kode berikut di bagian 'TextBox1_KeyPress' -nya :
[ VB 6.0 ]
If (InStr("ARDY", Chr(KeyAscii)) = 0) And (KeyAscii <> 8) Then KeyAscii = 0

[ VB .NET ]
If (InStr("ARDY", e.KeyChar) = 0) And (e.KeyChar <> Chr(8)) Then e.KeyChar = Chr(0)
Contoh diatas menunjukkan bagaimana TextBox hanya bisa diisi karakter "A", "R", "D", dan "Y" saja. Jika Anda menginginkan karakter yang lain, tinggal menggati teks yang berwarna merah dengan karakter-karakter yang hanya boleh diinputkan. Misalnya Anda ingin hanya krakter "T" dan karakter angka saja, tinggal menggantikannya dengan "T0123456789"

uas yang super keren!!

curhat dikit..haha
hari senin yang indah..ngopi pagi-pagi bersiap untuk berangkat ujian implementasi jarkom..saya merasa sudah siap karena semua sudah saya siapkan..saya mulai duduk di bangku komputer..dan melihat soal..weihh mantab..dah di luar kepala..haha sedikit sombong...eeeeeehhhhh.dosennya dateng..ngasih tambahan ini itu ini itu,,haha..okelah bisa di atur...gampang...pas udah selesai setting DNS..dan jalan..tinggal setting webserver dan phpnya....WHAT THE FUCK..ternyata flashdisk nya ga bisa masuk ke virtual servernya..sepertinya di disable..waaaaaaaasssuuuurrrrrrrrrrrrrr...semua file yang udah saya bikin..ga bisa di masukin donk??  waduhh gmana ini..putar otak..akhirnya ada ide dengan masukin file-file konfigurasinya di web..dan tinggal di download di virtual servernya..dan bisa...tapi sayang karena saya kehabisan waktu..

dan yang saya sesalkan..kenapa flashdisk harus di disable..karena semua configuration itu tidak mungkin di ketik karena bisa makan waktu banyak..sedangkan saya hanya di beri waktu cuma 2 jam..itu pun belum ngiitung subneting install dns..apalagi buat konfigurasi webserver dan phpnya..oh mengapa oh mengapa !!

tapi kenapa pak dosen yang saya hormati..tolong lah siswamu ini..kami bukan dewa yang bisa cepat mengerjakan soal dengan begitu cepat.dan kami hanya pelajar yang menuntut ilmu dari dosen.tolong hargai kerja keras kami..

wHYYYYYYYYYYYYYYYYY flashdisknya di disableee.????grrrrrrrrrrrr


cara menghitung subnetting !!

artikel ini saya ambil dari romisatriawahono.net.. sengaja saya publish di blog saya karena saya sendiri kadang2 lupa..hehe..kalo yang belum tau subnetting itu apa..cari aja ya di google..hehe


Subnet Mask Nilai CIDR
255.128.0.0 /9
255.192.0.0 /10
255.224.0.0 /11
255.240.0.0 /12
255.248.0.0 /13
255.252.0.0 /14
255.254.0.0 /15
255.255.0.0 /16
255.255.128.0 /17
255.255.192.0 /18
255.255.224.0 /19
Subnet Mask Nilai CIDR
255.255.240.0 /20
255.255.248.0 /21
255.255.252.0 /22
255.255.254.0 /23
255.255.255.0 /24
255.255.255.128 /25
255.255.255.192 /26
255.255.255.224 /27
255.255.255.240 /28
255.255.255.248 /29
255.255.255.252 /30

SUBNETTING PADA IP ADDRESS CLASS C
Ok, sekarang mari langsung latihan saja. Subnetting seperti apa yang terjadi dengan sebuah NETWORK ADDRESS 192.168.1.0/26 ?
Analisa: 192.168.1.0 berarti kelas C dengan Subnet Mask /26 berarti 11111111.11111111.11111111.11000000 (255.255.255.192).
 
Penghitungan: Seperti sudah saya sebutkan sebelumnya semua pertanyaan tentang subnetting akan berpusat di 4 hal, jumlah subnet, jumlah host per subnet, blok subnet, alamat host dan broadcast yang valid. Jadi kita selesaikan dengan urutan seperti itu: 

1. Jumlah Subnet = 2x, dimana x adalah banyaknya binari 1 pada oktet terakhir subnet mask (2 oktet terakhir untuk kelas B, dan 3 oktet terakhir untuk kelas A). Jadi Jumlah Subnet adalah 22 = 4 subnet 
2.Jumlah Host per Subnet = 2y – 2, dimana y adalah adalah kebalikan dari x yaitu banyaknya binari 0 pada oktet terakhir subnet. Jadi jumlah host per subnet adalah 26 – 2 = 62 host 
3.Blok Subnet = 256 – 192 (nilai oktet terakhir subnet mask) = 64. Subnet berikutnya adalah 64 + 64 = 128, dan 128+64=192. Jadi subnet lengkapnya adalah 0, 64, 128, 192.
4.Bagaimana dengan alamat host dan broadcast yang valid? Kita langsung buat tabelnya. Sebagai catatan, host pertama adalah 1 angka setelah subnet, dan broadcast adalah 1 angka sebelum subnet berikutnya.

    Subnet
    192.168.1.0
    192.168.1.64
    192.168.1.128
    192.168.1.192
    Host Pertama
    192.168.1.1
    192.168.1.65
    192.168.1.129
    192.168.1.193
    Host Terakhir
    192.168.1.62
    192.168.1.126
    192.168.1.190
    192.168.1.254
    Broadcast
    192.168.1.63
    192.168.1.127
    192.168.1.191
    192.168.1.255
 
Kita sudah selesaikan subnetting untuk IP address Class C. Dan kita bisa melanjutkan lagi untuk subnet mask yang lain, dengan konsep dan teknik yang sama. Subnet mask yang bisa digunakan untuk subnetting class C adalah seperti di bawah. Silakan anda coba menghitung seperti cara diatas untuk subnetmask lainnya.


Subnet Mask Nilai CIDR
255.255.255.128 /25
255.255.255.192 /26
255.255.255.224 /27
255.255.255.240 /28
255.255.255.248 /29
255.255.255.252 /30

 

SUBNETTING PADA IP ADDRESS CLASS B
Berikutnya kita akan mencoba melakukan subnetting untuk IP address class B. Pertama, subnet mask yang bisa digunakan untuk subnetting class B adalah seperti dibawah. Sengaja saya pisahkan jadi dua, blok sebelah kiri dan kanan karena masing-masing berbeda teknik terutama untuk oktet yang “dimainkan” berdasarkan blok subnetnya. CIDR /17 sampai /24 caranya sama persis dengan subnetting Class C, hanya blok subnetnya kita masukkan langsung ke oktet ketiga, bukan seperti Class C yang “dimainkan” di oktet keempat. Sedangkan CIDR /25 sampai /30 (kelipatan) blok subnet kita “mainkan” di oktet keempat, tapi setelah selesai oktet ketiga berjalan maju (coeunter) dari 0, 1, 2, 3, dst.


Subnet Mask Nilai CIDR
255.255.128.0 /17
255.255.192.0 /18
255.255.224.0 /19
255.255.240.0 /20
255.255.248.0 /21
255.255.252.0 /22
255.255.254.0 /23
255.255.255.0 /24
Subnet Mask Nilai CIDR
255.255.255.128 /25
255.255.255.192 /26
255.255.255.224 /27
255.255.255.240 /28
255.255.255.248 /29
255.255.255.252 /30


Ok, kita coba dua soal untuk kedua teknik subnetting untuk Class B. Kita mulai dari yang menggunakan subnetmask dengan CIDR /17 sampai /24. Contoh network address 172.16.0.0/18.
Analisa: 172.16.0.0 berarti kelas B, dengan Subnet Mask /18 berarti 11111111.11111111.11000000.00000000 (255.255.192.0).
Penghitungan: 
1.Jumlah Subnet = 2x, dimana x adalah banyaknya binari 1 pada 2 oktet terakhir. Jadi Jumlah Subnet adalah 22 = 4 subnet 
2.Jumlah Host per Subnet = 2y – 2, dimana y adalah adalah kebalikan dari x yaitu banyaknya binari 0 pada 2 oktet terakhir. Jadi jumlah host per subnet adalah 214 – 2 = 16.382 host
3.Blok Subnet = 256 – 192 = 64. Subnet berikutnya adalah 64 + 64 = 128, dan 128+64=192. Jadi subnet lengkapnya adalah 0, 64, 128, 192. 
4.Alamat host dan broadcast yang valid?

    Subnet
    172.16.0.0
    172.16.64.0
    172.16.128.0
    172.16.192.0
    Host Pertama
    172.16.0.1
    172.16.64.1
    172.16.128.1
    172.16.192.1
    Host Terakhir
    172.16.63.254
    172.16.127.254
    172.16.191.254
    172.16.255.254
    Broadcast
    172.16.63.255
    172.16.127.255
    172.16.191.255
    172.16..255.255

Berikutnya kita coba satu lagi untuk Class B khususnya untuk yang menggunakan subnetmask CIDR /25 sampai /30. Contoh network address 172.16.0.0/25.
Analisa: 172.16.0.0 berarti kelas B, dengan Subnet Mask /25 berarti 11111111.11111111.11111111.10000000 (255.255.255.128).
Penghitungan: 

1.Jumlah Subnet = 29 = 512 subnet 
2.Jumlah Host per Subnet = 27 – 2 = 126 host 
3.Blok Subnet = 256 – 128 = 128. Jadi lengkapnya adalah (0, 128) 
4.Alamat host dan broadcast yang valid?


 Subnet
172.16.0.0 172.16.0.128 172.16.1.0 172.16.255.128
Host Pertama 172.16.0.1 172.16.0.129 172.16.1.1 172.16.255.129
Host Terakhir 172.16.0.126 172.16.0.254 172.16.1.126 172.16.255.254
Broadcast 172.16.0.127 172.16.0.255 172.16.1.127 172.16.255.255



Masih bingung juga? Ok sebelum masuk ke Class A, coba ulangi lagi dari Class C, dan baca pelan-pelan ..

SUBNETTING PADA IP ADDRESS CLASS A
Kalau sudah mantab dan paham, kita lanjut ke Class A. Konsepnya semua sama saja. Perbedaannya adalah di OKTET mana kita mainkan blok subnet. Kalau Class C di oktet ke 4 (terakhir), kelas B di Oktet 3 dan 4 (2 oktet terakhir), kalau Class A di oktet 2, 3 dan 4 (3 oktet terakhir). Kemudian subnet mask yang bisa digunakan untuk subnetting class A adalah semua subnet mask dari CIDR /8 sampai /30.
Kita coba latihan untuk network address 10.0.0.0/16.
Analisa: 10.0.0.0 berarti kelas A, dengan Subnet Mask /16 berarti 11111111.11111111.00000000.00000000 (255.255.0.0).
Penghitungan:

1.Jumlah Subnet = 28 = 256 subnet 
2.Jumlah Host per Subnet = 216 – 2 = 65534 host 
3.Blok Subnet = 256 – 255 = 1. Jadi subnet lengkapnya: 0,1,2,3,4, etc. 
4.Alamat host dan broadcast yang valid?


Subnet
10.0.0.0 10.1.0.0 10.254.0.0 10.255.0.0
Host Pertama 10.0.0.1 10.1.0.1 10.254.0.1 10.255.0.1
Host Terakhir 10.0.255.254 10.1.255.254 10.254.255.254 10.255.255.254
Broadcast 10.0.255.255 10.1.255.255 10.254.255.255 10.255.255.255


Mudah-mudahan sudah setelah anda membaca paragraf terakhir ini, anda sudah memahami penghitungan subnetting dengan baik. Kalaupun belum paham juga, anda ulangi terus artikel ini pelan-pelan dari atas. Untuk teknik hapalan subnetting yang lebih cepat,

mySQL di Slackware

Bagi pengguna linux, apalagi yang sering berususan dengan database kemungkinan besar pernah berususan dengan mySQL, di slackware sendiri database server yang diikutkan dalam distribusi adalah mySQL. Namun tidak sama dengan distro yang lain yang begitu selesai di install maka mySQL siap untuk digunakan asal servicenya sudah jalan tentunya tapi di slackware ada beberapa yang mesti dilakukan sebelum mySQL tersebut bisa digunakan.
Kita akan mendapatkan pesan error seperti ini jika kita mencoba menjalankan mysql untuk kali pertama :

root@pegasus:~# /etc/rc.d/rc.mysqld start
root@pegasus:~# Starting mysqld daemon with databases from /var/lib/mysql
STOPPING server from pid file /var/run/mysql/mysql.pid
070628 13:15:40 mysqld ended


Berikut adalah cara untuk membuat mysql kita berjalan normal dan dapat digunakan.
Install Database Mysql
mySQL menggunakan sebuah database bernama mysql yang berisikan data - data tentang database server tersebut misalnya pengguna/user, komputer pengakses, sampai dengan hak akses dari user.
Untuk membuat database mysql kita tinggal ketikkan peintah : mysql_install_db

root@pegasus:~# mysql_install_db

Ganti kepemilikan /var/lib/mysql ke user mysql
Akan ada beberapa baris pesan hasil dari perintah mysql_install_db diatas, sampai disini kita masih belum bisa menggunakan mysql server kita kalau nekat akan dapat error seperti diatas, ini disebabkan karena script rc.mysqld menggunakan user mysql sedangkan hasil pembuatan database dari peintah mysql_install_db masih milik dari root. Untuk itu kita perlu merubah kepemilikan / ownership dari file-file database mysql. Di slackware file - file tersebut ada di /var/lib/mysql sehingga perintah berikut biasanya berfungsi :

chown mysql.mysql /var/lib/mysql/ -R

Jika silahkan menjalankan lagi server mysql kita :

root@pegasus:~# /etc/rc.d/rc.mysqld start

Akan keluar pesan :
root@pegasus:~# Starting mysqld daemon with databases from /var/lib/mysql
Tanpa pesan seperti diatas (mysql ended)
silahkan ketikkan perintah mysql untuk masuk ke mysql server.

root@pegasus:~# mysql
Welcome to the MySQL monitor. Commands end with ; or \g.
Your MySQL connection id is 1 to server version: 5.0.27-log

Type 'help;' or '\h' for help. Type '\c' to clear the buffer.
mysql>

Jika tampilan yang kita dapat sama seperti diatas maka mysql kita sudah bisa digunakan dan tidak ada lagi kata "mySQL ndak bisa jalan di slackware =))".

sumber: makassar-slackers.org

Khasiat daun Jelukap bikin saya ga jadi Operasi Amandel...

CURHAT DULU YA
Ane menderita penyakit amandel gede , ga bisa minum es dikit aja langsung dah badan panas,sakit tenggorokan, kata dokternya ane harus operasi karena amandelnya udah gede banget , soalnya ortu ane pas waktu itu lagi ga ada duit buat operasi gan maklum kami orang sederhana, pas kebetulan ada nenek2 tetangga suruh minum air rebusan daun jelukap (jadi kayak teh gan) ane minum tiap pagi, sore, dan malam...dan akhirnya setelah 1 minggu rutin minum  Amandel ane mengecil dan sudah berkurang kata pak dokter ane ga usah dioperasi coz amandelnya sudah dalam keadaan normal gan (amandelnya nggak hilang cuman kembali keadaan Normal)
Alhamdullilah

DAUN JELUKAP 
Tumbuhan ini merupakan tmbhn liar yang banyak tumbuh di perkebunan, ladang,tepi jalan, maupun kebun. Menurut Lasmadiwati (2003) tumbuhan ini berasal dari Asia Tropik tersebar di Asia Tenggara,termasuk Indonesia, India, Cina, Jepang dan Australia kemudian menyebar ke berbabagi negar-negara. Oleh karenanya, pegagan mudah dijumpai dan mudah tumbuh di berbagai tempat di Indonesia.Di Jawa Barat, jalukap banyak tumbuh di perkebunan atau di pekarangan.Masyarakat Jawa Barat mengenalnya sebagai salah satu tanaman lalap. di kalimantan selatan namanya jelukap. Di India, tanaman ini dimanfaatkan sebagai obat disentri. Di India, Pakistan, dan sebagian Eropa Timur telah lama, ribuan tahun yang lalu, pegagan dipercayai dapat meningkatkan ketahanan tubuh (panjang umur),membersihkan darah dan memperlancar air seni. Dalampengobatan Cina pun, jalukap dikenal dapat memperpanjang umur. Sementara masyarakat Timur Jauh di Eropa menggunakan jalukap sebagai obat lepra dan TBC. Di Eropa, jalukap telah diolah menjadi salep 1% atau bubuk 2% sebagai obat luka dan borok yang menahun. Masyarakat Malaysia pun telah lama mempergunakan jalukap sebagai tonik dan minuman segar serta infuse jalukap digunakan dalam pengobatan gangguan liver.

jalukap yang dikenal dengan sebutan Centella Herba memiliki kandungan asiaticoside, thankuniside, isothankuniside, madecassoside, brahmoside, brahmic acid, brahminoside, madasiatic acid, meso-inositol, centelloside, carotenoids, hydrocotylin, vellarine, tanin serta garam mineral seperti kalium, natrium, magnesium, kalsium dan besi. Diduga glikosida triterpenoida yang disebut asiaticoside merupakan antilepra dan penyembuh luka yang sangat luar biasa. Asiatosida berfungsi meningkatkan perbaikan dan penguatan sel-sel kulit, menstimulasi pertumbuhan rambut dan jaringan ikat. Dosis tinggi dari glikosida saponin akan menghasilkan efek pereda rasa nyeri. Dikatakan juga, saponin yang terkandung dalam tanaman ini mempunyai manfaat mempengaruhi collagen (tahap pertama dalam perbaikan jaringan), misalnya dalam menghambat produksi jaringan bekas luka yang berlebihan, sedangkan zat vellarine yang ada memberikan rasa pahit (Anonim 1, 2009). 

Terdapat sampai ketinggian 2.500 m di atas permukaan laut. Jalukap merupakan tanaman herba tahunan yang tumbuh menjalar dan berbunga sepanjang tahun. Tanaman akan tumbuh subur bila tanah dan lingkungannya sesuai hingga dijadikan penutup tanah. Sering dijumpai di daerah lembab dan tumbuh diantara rerumputan. Tumbuh merambat dengan geragih (stolon) yang merayap dengan panjang 10 cm - 80 cm, akar keluar dari setiap bonggol, banyak bercabang yang membentuk tumbuhan baru. Helai daun tunggal, pangkal daunnya lebar bertangkai panjang sekitar 5 cm - 15 cm berbentuk ginjal. Tepinya bergerigi atau beringgit, dengan penampang 1 cm - 7 cm tersusun dalam roset yang terdiri atas 2 - 10 helai daun, kadang-kadang agak berambut dan tidak mempunyai batang, namun mempunyai rhizoma (rimpang pendek). Bunganya kecil berwarna pink tua. Buah kecil bergantung yang bentuknya lonjong/pipih panjang 2 - 2,5 mm, baunya wangi, rasanya pedas dan pahit. 

PENGOLAHANNYA UNTUK OBAT 
Bagian yang dipakai sebagai bahan pengobatan adalah seluruh bagian herbal.Untuk obat yang diminum, cuci 30-60g herba segar, lalu rebus dalam 3 gelas air sampai tersisa menjadi 1 gelas.
Cara lain, giling herba sampai halus, lalu peras dan air perasannya diminum. Bisa juga, seduh 1-2g bubuk kering dengan air panas. Setelah dingin minum sekaligus. Untuk mengobati keracunan, jus 500-1.500 g herba jalukap segar, lalu minum sekaligus. Untuk Pemakaian luar, giling herba segar sampai halus, lalu tempelkan ke tempat yang sakit, seperti pada bisul, luka bakar, luka bernanah, tuberkulosis (TBC) kulit, herpes zoster, eksim, dan gigitan ular.

Cara lain, rebus herba segar dan gunakan air rebusannya sebagai obat kumur pada sariawan atau mencuci luka berdarah dan bernanah. Ekstrak minyaknya dapat digunakan untuk merangsang pertumbuhan rambut. Kebanyakan jalukap dikonsumsi segar untuk lalapan, tetapi ada yang dikeringkan untuk dijadikan teh, diambil ekstraknya, Jalukap juga telah diproduksi dalam bentuk tablet dengan nama gotu cola. (Arisandi et all, 2005).


semoga bermanfaat....

Asal Usul ,Sejarah dan manfaat Buah Naga

 
Buah Naga sering juga disebut dengan berbagai nama yaitu pir strawberry, buah kaktus, kaktus orchid, kaktus manis dan kaktus madu. Buah Naga termasuk dalam keluarga tanaman kaktus dari marga Hylocereus dan Selenicereus. Pohon buah ini memiliki karakteristik dimana terdapat duri pada setiap ruas batangnya. Buah ini berasal dari Meksiko, Costa Rica, El Salvador, Guatemala dan Negara-Negara di Amerika Tengah dan Amerika Selatan namun sekarang juga dibudidayakan di negara-negara Asia seperti Taiwan, Vietnam, Filipina, Malaysia dan termasuk juga di Indonesia. Di daerah asalnya buah ini dinamai pitahaya atau pitaya roja dan sering dikonsumsi sebagai hidangan pembuka di rumah-rumah penduduk.
 
Alasan Kenapa Dinamakan Buah Naga

Pada sekitar tahun 1870 tanaman ini dibawa orang Perancis dari Guyana ke Vietnam sebagai tanaman hias. Oleh orang Vietnam dan orang China buahnya dianggap membawa berkah. Oleh sebab itu, buah ini selalu diletakkan di antara dua ekor patung naga berwarna hijau di atas meja altar. Warna merah buah jadi mencolok sekali di antara warna naga-naga yang hijau ini. Dari kebiasaan inilah buah itu di kalangan orang Vietnam yang sangat terpengaruh budaya China dikenal sebagai Thang Loy (Buah Naga). Thang Loy orang Vietnam ini kemudian diterjemahkan di Eropa dan negara lain yang berbahasa Inggris sebagai Dragon Fruit (Buah Naga).


Jenis-Jenis Buah Naga
Hylocereus undatus, kulit buah berwarna merah dengan daging buah putih
 
 
Hylocereus polyrhizus, kulit buah berwarna merah dengan daging buah merah
 

Selenicereus megalanthus, kulit buah berwarna kuning dengan daging buah putih
 
 
Maanfaat Buah Naga

Dibalik rasanya yang manis menyegarkan, Buah Naga ini juga kaya akan manfaat. Buah ini mengandung 90% air, vitamin c, serat, kalsium, zat besi, dan fosfor yang sangat bermanfaat untuk penyakit darah tinggi (hipertensi). Daging Buah Naga yang berwarna merah juga sangat baik untuk memperbaiki penglihatan mata karena mengandung zat karotenoid. Fitokimia di dalam buah ini juga dapat menurunkan risiko kanker. Kandungan serat dalam buah naga yang tinggi juga bermanfaat sebagai pengikat zat karsinogen penyebab kanker dan terutama dapat memperlancar proses pencernaan. Kandungan vitamin C, beta karoten, kalsium juga baik untuk meningkatkan daya tahan tubuh.

Kandungan Nutrisi

Komposisi Gizi

Kadar Gula: 13-18 briks

Air: 90 %

Karbohidrat: 11,5 g

Asam: 0,139 g

Protein: 0,53 g

Serat: 0,71 g

Kalsium: 134,5 mg

Fosfor: 8,7 mg

Magnesium: 60,4 mg

Vitamin C: 9,4 mg
Air (g) 82,5–83,0

Protein (g) 0,16–0,23

Lemak (g) 0,21–0,61

Serat/dietary fiber (g) 0,7–0,9

Betakaroten (mg) 0,005–0,012

Kalsium (mg) 6,3–8,8

Fosfor (mg) 30,2–36,1

Besi (mg) 0,55–0,65

Vitamin B1 (mg) 0,28–0,30

Vitamin B2 (mg) 0,043–0,045

Vitamin C (mg) 8–9

Niasin (mg) 1,297–1,300
semoga bermanfaat...

membuat effect di ms word

Apabila anda ingin menandai sebuah teks di ms word dengan sebuah effect..
langkah-langkahnya:
- tekan Alt+F11 buat masuk ke VBA
- ketik kode ini di ThisDocument:

 Sub ApplyTextEffect()
    Selection.Font.Animation = wdAnimationBlinkingBackground
End Sub


- ketik sembarang di word
- blink blink blink...

ini adalah pilihan effectnya:


wdAnimationLasVegasLights
wdAnimationMarchingBlackAnts
wdAnimationMarchingRedAnts
wdAnimationShimmer
wdAnimationSparkleText 



kalau ingin hapus effectnya..ganti aja menjadi none 


Sub ApplyTextEffect()
    Selection.Font.Animation = wdAnimationNone
End Sub 
semoga bermanfaat..
Related Posts with Thumbnails