Hidup adalah sebuah perjalanan

Karunia indah dari Tuhan adalah waktu, kesempatan kita hidup kita terbatas dan kita menuju ke kehidupan yang abadi, tengoklah apa yang sudah kita persiapkan untuk bekal hidup setelah hidup kita disini

Senin, 03 Oktober 2016

Revisi ebook MK Technopreneurship

Revisi ebook MK Technopreneurship

1. ADBRITE
Catatan revisi :
1. Cover ebook 3D belum ada
2. Buku belum jadi 1 dari sampul sampai biografi penuli
3. blm dalam pdf
4. Isi buku membingungkan, belum fokus ke tema
5. Kesimpulan belum ada
6. Daftar pustaka belum ada
7. Biografi penulis belum ada
8. Format penulisan (template) kaku

2. COST PER MILE
Catatan revisi :
1. Cover ebook 3D belum dihilangkan tulisan boxshot
2. Buku belum ada kata pengantar, daftar isi, kesimpulan, daftar pustaka, biografi penulis
3. blm dalam pdf
4. Isi buku membingungkan, dibuat sistematis, langkah - langkah
5. Format penulisan (template) kaku

3. KEANGGOTAAN BERBAYAR
Catatan revisi :
1. Cover ebook 3D belum ada
2. Buku belum ada kata pengantar, daftar isi, kesimpulan, daftar pustaka, biografi penulis
3. blm dalam pdf
4. Isi buku membingungkan, dibuat sistematis, langkah - langkah
5. Format penulisan (template) masih amburadul/ belum tertata
6. belum ada testimoni

4. PAY PER DOWNLOAD
Catatan revisi :
1. Cover ebook 3D belum ada
2. Buku belum ada baru kata pengantar dan daftar isi
3. belum ada kesimpulan, daftar pustaka, biografi penulis
4. blm dalam pdf
5. testimoni  3kurang

5. SERVICES
Catatan revisi :
1. Isi buku membingungkan, fokus ke tema, dibuat sistematis, step by step
2. belum ada kesimpulan, daftar pustaka, biografi penulis
4. blm dalam pdf (buku utuh)
5. belum ada testimoni

Jumat, 03 Juni 2016

Contoh program modular funsi dan prosedur

Contoh program modular funsi dan prosedur yang dibuat dengan visual basic
Sintaks :

Private Sub TulisTeks()
'PROGRAM MODULAR'
'DEKLARASI'
        
'DESKRIPSI'
    Label1.Caption = "Selamat datang di pemrograman modular"
End Sub

 Private Function JumlahAngka() As String
Dim angka1 As String, angka2 As String
Dim hasil As Single
angka1 = InputBox("Tulis angka 1 :", "Jumlah Angka")
angka2 = InputBox("Tulis angka 2 :", "Jumlah Angka")
If angka1 <> "" And angka2 <> "" Then
hasil = CSng(angka1) + CSng(angka2)
JumlahAngka = CStr(hasil)
End If
End Function

Private Sub Label1_DblClick()
Call TulisTeks("Hai", vbBlue)
End Sub

Private Sub Command1_Click()
Call TulisTeks
End Sub

Private Sub Command2_Click()
Label1.Caption = "Jumlah = " & JumlahAngka()
End Sub



Contoh program Array data pegawai

Berikut contoh program array untuk mengisi data pegawai yang dibuat dengan Visual Basic
Sintaks :
Dim NamaPekerja() As String

Private Sub Command3_Click()
Unload Me
End Sub

Private Sub Form_Load()
    Dim i As Integer
    ReDim NamaPekerja(1 To 5)
    For i = 1 To 5
        Combo1.AddItem i
    Next i
    Combo1.ListIndex = 0
    Text1.Text = 5
End Sub

Private Sub Command1_Click()
    Dim no As Integer, i As Integer
   
    no = CInt(Combo1.Text)
    NamaPekerja(no) = InputBox("Tuliskan nama pekerja no : " & no, "Input Nama Pekerja")
    If NamaPekerja(no) <> "" Then
        List1.Clear
        For i = 1 To UBound(NamaPekerja)
            List1.AddItem "NamaPekerja(" & i & ")=" & NamaPekerja(i)
        Next i
    End If
End Sub

Private Sub Command2_Click()
    Dim num As Integer, i As Integer
    If Not IsNumeric(Text1.Text) Then Exit Sub
    num = CInt(Text1.Text)
    ReDim NamaPekerja(1 To num)
    Combo1.Clear
    List1.Clear
    For i = 1 To UBound(NamaPekerja)
        Combo1.AddItem i
        List1.AddItem "NamaPekerja(" & i & ")=" & NamaPekerja(i)
    Next i
    Combo1.ListIndex = 0
End Sub




Senin, 18 April 2016

GRATIS Pelatihan pembuatan toko online

Sebagai bentuk diseminasi (penyebarluasan) untuk memperkenalkan teknologi IT (Information Technology) kepada masyarakat serta bentuk pemberdayaan masyarakat agar melek teknologi maka kami menyelenggarakan pelatihan Pembuatan Toko Online

Pelatihan ini bertujuan untuk memberikan pengetahuan dan keterampilan kepada masyarakat agar mampu membuat website dan mempublikasikan informasi maupun produk yang dimiliki agar dikenal luas oleh masyarakat dunia melalui media internet.
Adapun materinya adalah :
1. Pengenalan Internet
2. Pengenalan CMS Joomla
3. Cara membuat server localhost
4. Cara menginstal Virtuemart (toko online)
5. Cara membuat content produk yang akan dipasarkan
6. Cara membuat tampilan
7. Cara menambahkan menu
8. Cara menambahkan modul dan kelengkapan
9. Cara mengupload di internet

Pelatihan ini didesain berdurasi 2 jam, dan ditujukan bagi masyarakat terutama industri kecil, pemerintah desa dan kelompok masyarakat. Untuk keperluan pelatihan pengaturan jadwal silahkan menghubungi kami melalui email ahmad.muhsin@upnyk.ac.id.

Pelatihan ini bersifat Gratis/ tidak dipungut biaya!, dan karena keterbatasan waktu maka permintaan pelatihan hanya untuk wilayah Yogyakarta dan diselenggarakan hanya pada hari sabtu/ ahad.

Pelatihan Desain dan Pemrograman Website GRATIS !


Sebagai bentuk diseminasi (penyebarluasan) untuk memperkenalkan teknologi IT (Information Technology) kepada masyarakat serta bentuk pemberdayaan masyarakat agar melek teknologi maka kami menyelenggarakan pelatihan Desain dan Pemrograman Website.

Pelatihan ini bertujuan untuk memberikan pengetahuan dan keterampilan kepada masyarakat agar mampu membuat website dan mempublikasikan informasi maupun produk yang dimiliki agar dikenal luas oleh masyarakat dunia melalui media internet.
Adapun materinya adalah :
1. Pengenalan Internet
2. Pengenalan CMS Joomla
3. Cara membuat server localhost
4. Cara menginstal CMS Joomla
5. Cara membuat content/ informasi/ berita
6. Cara membuat tampilan
7. Cara menambahkan menu
8. Cara menambahkan modul dan kelengkapan
9. Cara mengupload di internet

Pelatihan ini didesain berdurasi 2 jam, dan ditujukan bagi masyarakat : organisasi pemuda, karang taruna, sekolah smp/sma, industri kecil, pemerintah desa dan kelompok masyarakat. Untuk keperluan pelatihan pengaturan jadwal silahkan menghubungi kami melalui email ahmad.muhsin@upnyk.ac.id.

Pelatihan ini bersifat Gratis/ tidak dipungut biaya!, dan karena keterbatasan waktu maka permintaan pelatihan hanya untuk wilayah Yogyakarta dan diselenggarakan hanya pada hari sabtu/ ahad.

Program sequence sederhana VB 6 : penentuan biaya tenaga kerja

Pada posting kali ini saya akan memberikan contoh pembuatan program aplikasi sederhana sebagai aplikasi dari struktur algoritma pemrograman sequence yaitu Program Penentuan Biaya Tenaga Kerja menggunakan program Visual Basic 6, anda juga dapat menggunakan VB versi yang terbaru saat ini yaitu Visual Studio Community 2015 yang bisa anda download secara gratis di websitenya milik microsoft.

Langkah pertama siapkan form berikut :
Yang terpenting adalah pada :
Textbox1 berikan nama TxtMesin
Textbox2 berikan nama TxtPekerja
Textbox3 berikan nama TxtLembur
Textbox4 berikan nama TxtNaker
Command Button berikan nama BtnProses

Klik ganda (double klik) pada BtnProses kemudian ketikkan sintaks berikut :
'PROGRAM PENENTUAN BIAYA TENAGA KERJA'
'DEKLARASI'
      Dim biaya_mesin, biaya_pekerja, biaya_lembur, biaya_naker as integer
'DEFINISI'
      biaya_mesin = Val (TxtMesin.Text)
      biaya_pekerja = Val (TxtPekerja.Text)
      biaya_lembur = Val (TxtLembur.Text)
      biaya_naker = biaya_mesin + biaya_pekerja + biaya_lembur
      biaya_naker = TxtNaker.Text 

Setelah selesai maka jalankan atau klik tombol run, hasilnya adalah seperti gambar dibawah :

Selamat mencoba !



Rabu, 09 Maret 2016

Download buku bahan ajar Logika Dasar dan Pemrograman Komputer


Cover Depan 
Kata Pengatar 
Materi 1. PENGENALAN KOMPUTER 
Materi 2. KONSEP DASAR KOMPUTER
Materi 3. PENGANTAR LOGIKA PEMROGRAMAN
Materi 4. FLOWCHART
Materi 5. LOGIKA INFORMATIKA DAN INFERENSI 
Materi 6. TIPE DATA, VARIABEL, DAN KONSTANTA
Materi 7. BAHASA PEMROGRAMAN 
Materi 8. STRUKTUR DASAR ALGORITMA SEQUENCE 
Materi 9. STRUKTUR DASAR ALGORITMA SELECTION 
Materi 10. STRUKTUR DASAR ALGORITMA LOOPING 
Materi 11. PEMROGRAMAN MODULAR : FUNGSI 
Materi 12. PEMROGRAMAN MODULAR : PROSEDUR
Materi 13. ARRAY 
Materi 14. SORTING DAN SEARCHING  
Materi 15. PEMROGRAMAN BERORIENTASI OBJEK 
Materi 16. PENGANTAR PERANCANGAN SISTEM INFORMASI 
Penutup
Cover Belakang