Tanpa kategori

TUGAS VISUAL BASIC BAHASA PEMROGRAMAN 1

Tugas 1 Private Sub cmdbatal_Click() cbokode.SetFocus cbokode = “Pilih Kode Buku” rzjudul = “” rzpengarang = “” rztahun = “” rzpenerbit = “” rzharga = “” End Sub   Private Sub cmdkeluar_Click() End End Sub   Private Sub cmdlagi_Click() cbokode.SetFocus cbokode = “Pilih Kode Buku” rzjudul = “” rzpengarang = “” rztahun = “” rzpenerbit… Continue reading TUGAS VISUAL BASIC BAHASA PEMROGRAMAN 1

Tugas Bahasa Program 1

Tugas 3 Pemrograman 1

Program 1A Private Sub CboNpm_Click() Dim Nama, Jurusan, HR As String Select Case CboNpm.Text Case “15100001” Nama = “Stevanus Prihanuji” Jurusan = “Sistem Informasi” Case “15100002” Nama = “Fergiawan Listianto” Jurusan = “Sistem Informasi” Case “15100003” Nama = “Renita Fitri Andriyanti” Jurusan = “Sistem Informasi” Case “15100004” Nama = “Evi Setyorini” Jurusan = “Sistem Informasi”… Continue reading Tugas 3 Pemrograman 1

Tanpa kategori

TUGAS BAHASA PEMROGRAMAN VB PERTEMUAN KE 2

TUGAS 1.1 SOURCE CODE Private Sub Commandbersih_Click() rz1.SetFocus rz1 = ” ” rz2 = ” ” rzhasil = ” ” End Sub Private Sub Commandkeluar_Click() End End Sub Private Sub rz1_keypress(keyascii As Integer) If keyascii = 13 Then rz2.SetFocus End If End Sub Private Sub commandHitung_click() rzhasil = Val(rz1) * Val(rz2) End Sub Screenshot TUGAS… Continue reading TUGAS BAHASA PEMROGRAMAN VB PERTEMUAN KE 2

Tanpa kategori · Tugas Bahasa Program 1

TUGAS BAHASA PROGRAM VB PERTEMUAN KE 1

Tugas Pertama Source Code Private Sub RzNpm_Keypress(KeyASCII As Integer) If KeyASCII = 13 Then RzNama.SetFocus End If End Sub Private Sub RzNama_Keypress(KeyASCII As Integer) If KeyASCII = 13 Then RzAlamat.SetFocus End If End Sub Private Sub CommandLagi_Click() RzNpm.SetFocus RzNpm = ” ” RzNama = ” ” RzAlamat = ” ” End Sub Private Sub CommandBatal_Click()… Continue reading TUGAS BAHASA PROGRAM VB PERTEMUAN KE 1

Tanpa kategori

Khazanah Al-Zahrawi, Bapak Ilmu Bedah Modern

Selama lebih dari delapan abad kejayaan Islam di dunia, berbagai akar ilmu pengetahuan modern telah dikembangkan ribuan ilmuwan Muslim dari berbagai dinasti dan wilayah taklukan. Salah satunya, ilmu kedokteran, khususnya dalam bidang pembedahan. Di ranah ini tersebutlah satu nama yang sangat masyhur, yakni Abu al-Qasim al-Zahrawi. Dikenal di dunia Barat dengan nama Abulcasis, al-Zahrawi lahir… Continue reading Khazanah Al-Zahrawi, Bapak Ilmu Bedah Modern

Tanpa kategori

Khazanah Rahasia Titik di Bawah Ba

Pembahasan titik dibawah huruf ba banyak dibahas didalam kitab-kitab tafsir Isyari dan kitab-kitab tasawuf.  Menurut riwayat dari A-Hafiz ibn Sulaiman ibn Ibrahim al-Qun duzy, sesungguhnya seluruh ra hasia kitab-kitab samawi tersimpul di dalam Alquran. Rahasia keseluruhan Alquran tersimpul di dalam surah al-Fatihah, dan rahasia keseluruhan surah al-Fatihah tersimpul di dalam basmalah, dan rahasia basmalah terletak… Continue reading Khazanah Rahasia Titik di Bawah Ba

Tanpa kategori

Khazanah Masjid Al-Aqsa Bertahan Melintasi Berbagai Masa

Tegak berdiri di bumi Palestina, Masjid al-Aqsa merupakan satu dari tiga situs suci umat Islam. Posisinya di Yerusalem membuat al-Aqsa berada di jantung konflik tiga agama besar. Islam, Kristen, dan Yahudi bersama-sama mengajukan klaim kepemilikan. Situs bersejarah ini telah berulang kali menyaksikan konflik dan perebutan kekuasaan. Firas Alkhateeb dalam The Al Aqsha Mosque Through The… Continue reading Khazanah Masjid Al-Aqsa Bertahan Melintasi Berbagai Masa