0 Comment
Syntax Dasar Visual Basic 6.0 (1)

Ini ada beberapa Syntax dasar Visual Basic 6.0 beserta contohnya semoga bermanfaat,
dan ini bagian pertama dari artikel ini...
1. MsgBox
digunakan untuk menampilkan pesan pada kotak dialog.
Syntax dasar :
Msgbox (prompt[,buttons][,title][,helpfile][,context]

parameter buttons dapat diisi dengan:
vbOkOnly, menampilkan hanya tombol Ok
vbOkCancel, menampilkan tombol Ok dan Cancel.
vbAbortRetryIgnore, menampilkan tombol Abort, Retry, Ignore.
vbYesNoCancel, menampilkan tombol Yes, No, Cancel.
vbYesNo, menampilkan tombol Yes, No.
vbRetyCancel, menampilkan tombol Retry dan Cancel.

contoh :
Private Sub Command1_Click()
MsgBox "Hanya di infoislam99.blogspot.com", vbOKOnly, "Info Islam"
End Sub
Hasil :







2. If....Then....Else
Digunakan sebagai statemen kondisi. sebuah kode/blok kode akan dijalankan apabila kondisi terpenuhi (true), dan blok kode lainnya akan dijalankan apabila kondisinya tidak terpenuhi (false).
Syntax 1:
If condition1 then statement

contoh:
If nilai_angka >= 80 Then nilai_huruf = "A"

Syntax 2 :
If condition1 then
statement
end if

Contoh:
If niali_angka >= 80 then
nilai huruf = "A"
Msgbox "selamat anda mendapatkan nilai terbaik",vbOkOnly,"Informasi"
end if

Syntax 3:
If condition1 then
statement
else
statement
end if

Contoh :
If nilai_angka >= 80 then
nilai_huruf = "A"
else
nilai_huruf = "B"
end if

Sintax 4:
If condition1 then
statement
elseif condition2 then
statement
else
statement
end if

contoh :
If nilai_angka >= 80 then
nilai_huruf = "A"
elseif nilai_angka >= 70 then
nilai_huruf = "B"
else
nilai_huruf = "C"
end if

3. Do... Loops
Digunakan sebagai statenent perulangan.

Syntax 1:
Do Until (Expression)
(code to execute)
Loop

Contoh :
Dim i as integer
i = 0
Do until i = 100
i= i +1
loop

Syntax 2 :
Do While (Expression)
(code to execute)
Loop

Contoh :
Dim i as integer
do while i <= 100
i = i+1
loop

Syntax 3 :
Do
(code to execute)
Loop while (expression)

contoh :
Dim i as integer
Do
i = i +1
Loop while i <= 100

4. For.. Next
Digunakan sebagai statement perulangan

Syntax dasar :
For counter = start to end ( Step step)
(code to execute)
Next (counter)

Contoh :
Dim i as integer
For i = 0 to 10
msgbox "Nilai i = " & i
next i

5. Select Case
Digunakan sebagai statement kondisi dengan banyak pilihan.

Select Case nilai_angka
Case 0 to 50
nilai huruf = "D"
Case Is <= 70
nilai huruf ="C"
Case Is <= 80
nilai huruf = "B"
Else Case
nilai huruf = "A"
End select
Msgbox "nilai huruf = " & nilai_huruf
 6. Len()
Digunakan untuk mendapatkan informasi panjang sebuah String.

Syntax dasar :
Len(string)

Contoh :
Dim str As String
str = "Belajar Visual Basic"
msgbox str & " = " & Len(str) & "karakter"

Hasil :





7. Mid$()
Digunakan untuk mendapatkan bagian tertentu dari sebuah string.

Syntax Dasar :
Mid$(string, start[, length])

Contoh :
Dim str As String
str = Mid$("Belajar Visual Basic", 9, 6)
msgbox str

Hasil





8. Left$()
Digunakan untuk mendapatkan bagian tertentu dari sebuah string

Syntax dasar :
Left$(string, length )

9. Right()
Digunakan untuk mendapatkan bagian tertentu dari sebuah string,
yang dimulai dari sisi kanan String.

Syntax dasar :
Right$(string, length)

10. Ucase$()
Digunakan untuk mengganti pada semuah text/string mencadi huruf besar(kapital)

Syntax dasar :
Ucase$(string)

11. Lcase$()
Digunakan untuk menggatikan semuah text/string menjadi huruf kecil

Syntax dasar :
Lcase$(string)

12. Instr()
Diguakan untu mencari posisi/letak karakter tertentu dalam sebuah string.

Syntax dasar:
InStr([start,] string1, string2 [, compare])

Contoh :
Dim str as string
str = InStr(5, "Belajar Visual Basic", "a")
msgbox str

Keterangan:
Pada contoh diatas akan dicari posisi karakter "a" yang dihitung mulai dari karakter ke 5.

13. String$()
Digunakan untuk menghasilkan sebuah string dari sebuah perulangan karakter tertentu dengan panjang yang sudah ditentukan.

Syntax dasar :
String$(number, character)

Contoh :
Dim str As String
str = String$(6, "X")
msgbox str

keterangan :
Contoh diatas akan menghasilkan sebuag string yang terdiri dari 6 buah karakter X.

14. Space$()
Digunakan untuk menghasilkan sebuah string dari perulangan karakter spasi dan panjang yang sudah ditentukan.

Syntax dasar :
Space$(number)

Contoh
Dim str As String
str = Space$(6)
msgbox str

Keterangan :
Pada contoh diatas akan menghasilkan sebuah string yang terdiri dari 6 buah karakter spasi.

15. Replac$()
Digunakan untuk mengganti substring atau karakter dalam sebuah string dengan sebuah substring atau karakter yang lain.

Syntax Dasar :
Replace$(Expression, find, replacewith [, start[, count[,compare]]])

Contoh :
Dim str As String
str = Replace$("Visual Basic", Basic","Studio")
msgbox str

keterangan :
Pada contoh diatas substring "Basic" diganti dengan substring "Studio", sehingga akan menghasilkan string "Visual Studio".

Cara Menambahkan Tulisan atau Posting di WordPress.com

1 Comment
1. Tentunya Anda harus login terlebih dahulu
2. Masuk ke Menu yang ada disamping kiri Anda arahkan maouse ke Menu Tulisan lalu Tambahkan Baru. Seetelah itu akan muncul halaman dimana Anda akan menulis, seperti yang terlihat pada gambar berikut :
Tulis Judul Tulisan Anda, Pastikan berada pada mode Visual dan mulailah menulis.
Menu pada tulisan :
1.   Bold, menebalkan text.
2.   Italic, mencetak miring text.
3.   Strikethruough, mencoret text.
4.   Unordered list, menampilkan daftar peluru pada text.
5.   Orderd list, menampilkan daftar peluru berbentuk angka pada text.
6.   Blockquote, membuat area tulisan khusus pada text.
7.   Align left, membuat rata kiri text.
8.   Align center, membuat rata tengah text.
9.   Align right, membuat rata kanan text.
10. Insert/edit link, membuat dan mengedit link pada text.
11. Unlink, menghapus link pada text.
12. Insert More tag, memecah text menjadi dua bagian (read more).
13. Proofread Writing, untuk pemeriksaan ejaan taxt.
14. Toggle fullscreen mode, menampilakan halaman penuh penulisan.
15. Show/Hide Kitchen Sink, menampilkan dan menyembunyikan tombol tambahan fasilitas penyuntingan text.
Untuk melihat tombol tambahan fasilitas penyuntingan yang lainnya, klik tombol  (Show/Hide Kitchen Sink).
1.   Paragraph, membuat format gaya penulisan text.
2.   Underline, menampilkan garis bawah pada text.
3.   Align full, membuat rata kanan dan kiri pada text.
4.   Select text color, memberi warna pada huruf.
5.   Paste as Plain Text, menempelkan text melalui mode bebas pengkodean.
6.   Paste from Word, menempelkan text dari aplikasi word.
7.   Remove formatting, membersihkan format yang ada pada tulisan seperti semula.
8.   Insert custom character, menampilkan daftar karakter dan simbol penulisan.
9.   Outdent, membuat text menjorok keluar.
10. Indent, membuat text menjorok kedalam.
11. Undo, kembali satu aksi ke belakang aktifitas penyuntingan.
12. Redo, kembali satu aksi kedepan aktifitas penyuntingan.
13. Help, bantuan.

Membuat Wordpress

0 Comment
  1.  Jalankan browser Anda kemudian buka http://www.wordpress.com. Tunggu hingga muncul tampilan awal WordPress.com.
  2. Klik Get Started Here
    cara membuat blog wordpress
  3. Isi formulir yang telah tersedia,
    cara membuat blog wordpress
    kemudian klik Create Blog.
  4. Selanjutnya Anda diminta untuk melakukan aktivasi blog dengan cara mengeklik link yang dikirimkan ke email Anda.
    cara membuat blog wordpress
  5. Klik link yang ada di pesan email Anda.
    cara membuat blog wordpress
  6. Setelah Anda klik link tersebut maka Anda akan langsung menuju halaman dashboard. Ini artinya akun Anda telah aktif dan blog Anda telah jadi.
    cara membuat blog wordpress
  7. Selesai.
Nah, itu tadi cara membuat blog wordpress.com. Cepat, mudah, instan, dan gratis. Selamat mencoba!
* klik gambar untuk memperbesar

Jawaban UAS SIM (Sistem Informasi Manajement)

0 Comment
Jawaban UAS SIM (Sistem Informasi Manajement)

No.1:
A.   Sistem informasi terstruktur adalah sistem informasi yang berjalan diatas norma-norma organisasi yang berlaku untuk semua, yang sesuai dengan kedudukan/jabatannya masing-masing di dalam organisasi. 
Contoh: Informasi kenaikan gaji
B.   Sistem informasi tidak terstruktur adalah sistem-sistem yang berlaku di suatu lingkungan organisasi secara tidak formal, namun tetap mengikat dan berpengaruh pada organisasi yang bersangkutan tersebut.
Contoh: Surat izin tidak masuk kuliah

No. 2:
A.   Aktivitas-aktivitas manajemen yang terdapat di dalam pengendalian operasional adalah: Membuat dan memelihara prosedur terdokumentasi untuk menangani situasi dimana ketiadaannya dapat menyebabkan deviasi dari kebijakan dan tujuan dan sasaran lingkungan, Menetapkan kriteria operasi dalam prosedur, Membuat dan memelihara prosedur yang terkait dengan aspek penting lingkungan yang teridentifikasi dari barang dan jasa yang digunakan organisasi dan mengkomunikasikan prosedur dan persyaratan terkait kepada pemasok dan kontraktor.
B.   Aktivitas-aktivitas manajemen yang terdapat di dalam pengendalian manajemen adalah: mengukur prestasi, memutuskan tindakan pengendalian, merumuskan aturan keputusan baru untuk ditetapkan personalia operasional dan mengalokasikan sumber daya.
C.   Aktivitas-aktivitas manajemen yang terdapat di dalam perancangan strategi adalah mengembangkan strategi sebagai sarana suatu organisasi untuk mencapai tujuannya.

No. 3:
Proses yang ada di dalam pengontrolan informasi adalah sebagai berikut:
Semua data yang diperoleh dikumpulkan menjadi satu dan selanjutnya diproses. Di dalam pemrosesan tersebut data dibedakan menjadi 2, yaitu informasi yang berguna dan informasi yang tidak berguna. Informasi yang berguna itulah yang nantinya akan dipakai, sedangkan informasi yang tidak berguna akan dibuang (tidak di pakai).

No. 4:
Yang dimaksud dengan evolusi dan aplikasi CBIS adalah bahwa suatu sistem informasi manajemen tidak serta merta langsung menjadi suatu sistem yang bisa digunakan, melainkan ada tahapan-tahapan yang harus dilalui untuk menghimpun, menyimpan dan memproses data dari terciptanya sistem yang mengelola data tersebut menjadi sebuah informasi dan dari informasi tersebut terciptalah sistem pendukung keputusan berupa EDP, SIM dan DSS.

No. 5:
Perbedaan EDP, SIM dan DSS:
  _EDP:
a.   Fokus pada data
b.   Proses transaksi yang efisien
c.    Mengintegrasi file-file dari pekerjaan sejenis
d.   Membuat ringkasan untuk laporan bagi manajemen
  _ SIM:
a.   Mendukung pengambilan keputusan yang bersifat terstruktur pada level operasional dan manajemen
b.   Umumnya SIM berorientasi pada laporan dan pengawasan. SIM didesain untuk membantu membuat laporan kegiatan yang ada serta menyediakan pengawasan harian terhadap kegiatan tersebut
c.    SIM bergantung pada data gabungan dan alur data
d.   SIM tidak terlalu memiliki kemampuan analisis
e.   Umumnya digunakan untuk mengambil keputusan dengan menggunakan data masa lalu dan kini
f.     Relatif tidak fleksibel dan lebih memiliki orientasi internal daripada eksternal
   _ DSS:
a.   DSS menawarkan fleksibilitas, adaptabilitas dan respon yang cepat
b.   DSS dapat bekerja dengan hanya mengandalkan sedikit bantuan bahkan tanpa bantuan seorang programmer
c.    DSS menyediakan bantuan untuk pengambilan keputusan dan masalah yang jalan keluarnya tidak dapat dispesifikasi
d.   DSS menggunakan peralatan dan model analisis data yang mutakhir

No. 6:
Keamanan sistem informasi mengacu pada perlindungan terhadap semua sumber daya informasi perusahaan dari ancaman pihak-pihak yang tidak berwenang.

Ancaman terhadap keamanan sistem informasi antara lain:
     a.   Kerusakan hardware
     b.   Software tidak berfungsi
     c.    Tindakan-tindakan personal
     d.   Pencurian data atau peralatan
     e.   Kebakaran
     f.     Permasalahan listrik
     g.    Kesalahan oleh user
     h.   dsb

No. 7:
Proses dalam pengambilan keputusan keorganisasian (menurut Rubeinstein dan Haberstroh):
     a.   Pengenalan persoalan atau kebutuhan
     b.   Analisis dan laporan alternatif-alternatif
     c.    Pemilihan alternatif yang ada
     d.   Komunikasi dan pelaksanaan keputusan
     e.   Langkah lanjutan dan umpan balik hasil keputusan

Kerangka kerja dalam pengambilan keputusan keorganisasian:
a.   Sistem pengambilan keputusan
-    Sistem keputusan tertutup
Sistem keputusan terbuka
b.   Pengetahuan tentang hasil
c.    Tanggapan keputusan
-   Keputusan terprogram
-   Keputusan tidak terprogram
d.   Uraian tentang pengambilan keputusan
e.   Kriteria untuk pengambilan keputusan
f.    Relevansi konsep keputusan terhadap perancangan SIM

No. 8:
Etika dalam komputer penting karena tidak dapat dipisahkan dari permasalahan-permasalahan seputar penggunaan komputer yang meliputi kejahatan komputer, netiket, e-commerce, pelanggaran HAKI (Hak Atas Kekayaan Intelektual) dan tanggung jawab profesi.

Liat Soalnya disini
Download Soal & Jawaban Disini 
Jangan Lupha Comment yeah.... hehehe

Soal UAS SIM (Sistem Informasi Manajemen)

0 Comment
Tugas Soal UAS (SIM) 
SISTEM INFORMASI MANAJEMENT



Dosen Pembimbing:
Khasan Basori, S.Kom, MM


Disusun Oleh:
Abdul RozaQ
2010.69.04.0062


UNIVERSITAS YUDHARTA PASURUAN 
FAKULTAS TEKNIK 
UJIAN AKHIR SEMESTER GENAP


SOAL:

1. Apa yang dimaksud sistem informasi terstruktur dan tidak terstruktur? Berikan contohnya!
2. Jelaskan aktivitas-aktivitas manajemen yang terdapat di dalam:
    a. Pengendalian Operasional
    b. Pengendalian Manajemen
    c. Perencanaan Strategis
3. Jelaskan proses dalam pengontrolan informasi!
4. Apa yang dimaksud evolusi dan aplikasi sistem informasi berbasis computer (CBIS)? Jelaskan!
5. Apa beda EDP, DSS dan SIM? Jelaskan!
6. Jelaskan tentang keamanan sistem informasi? Ancaman apa saja yang ada di dalamnya?
7. Sebutkan proses dan kerangka kerja dalam pengambilan keputusan keorganisasian!
8. Mengapa etika dalam komputer itu penting? Jelaskan
Untuk Jawabanya bisa di liat disini

Tugas Lapangan

0 Comment
Info Tugas Lapangan Jarkom

1. Nama instansi
2. Hardware yang digunakan
3. Os server yang digunakan
4. Konsep routing yang digunakan
5. Konsep security yang diterapkan

Dateline 21 juni 2012 + di presentasikan

Konfigurasi Jaringan Dengan Menggunakan Routing Statik pada Cisco

0 Comment
router statis  adalah sebuah router yang memiliki tabel routing statik yang di setting secara manual oleh administrator jaringan. Berikut akan dijelaskan bagaimana cara untuk mengconfigurasi jaringan dengan routing statik :


                              Sterling                                   Hoboken                                       Waycross

Phisycal Device
  • Router ke router          : Serial
  • Router ke switch         : FastEthernet
  • Switch ke PC              : FastEthernet
  • Konektor antar router   : Kabel Serial DTE
  • Riuter ke switch          : Kabel Cooper Straight –through
  • Switch ke PC              : Kabel Cooper Straight -through
Tabel IP
Devic
IP
Mask
Router 0 ke Switch
172.16.1.1/24
255.255.255.0
Router 0 ke Router 1
172.16.2.1/24 - 172.16.2.2/24
255.255.255.0
Router 1 ke Switch
172.16.3.1/24
255.255.255.0
Router 1 ke Router 2
172.16.4.1/24 - 172.16.4.2/24
255.255.255.0
Router 2 ke Switch
172.16.5.1/24
255.255.255.0
PC 0
172.16.1.5
255.255.255.0
PC 1
172.16.1.6
255.255.255.0
PC 2
172.16.3.5
255.255.255.0
PC 3
172.16.3.6
255.255.255.0
PC 4
172.16.5.4
255.255.255.0
PC 5
172.16.5.6
255.255.255.0
Untuk member nama host pada setiap router caranya sebagai berikut:
Klik router >  config
 
isikan display name atau hostname sesuai yang kita inginkan. Lakukan pada setiap routing yang akan di beri nama host-nya, sebaiknya beri nama yang berbeda untuk memudahkan mengingat setiap jaringan yang dibangun. Berikut adalah cara mengkonfigurasi router dengan menggunakan CLI (Comand Line Interface), klik router > CLI
Seting router 0 / Sterling
Sterling> enable
Sterling #configure terminal
Sterling (config)#int fa0/0
Sterling (config-if)#ip add 172.16.1.1 255.255.255.0 
Sterling (config-if)#no shut
Sterling (config-if)#exit
Sterling (config)#
Sterling (config)#int s2/0
Sterling (config-if)#ip add 172.16.2.1255.255.255.0
Sterling (config-if)#no shut
Sterling (config-if)#exit
Seting router 1 / Hoboken
Hoboken >enable
Hoboken #configure terminal
Hoboken (config)#int fa0/0
Hoboken (config-if)#ip add 172.16.3.1 255.255.255.0
Hoboken (config-if)#no shut
Hoboken (config-if)#exit
Hoboken (config)#
Hoboken (config)#int s2/0
Hoboken (config-if)#ip add 172.16.2.2 255.255.255.0
Hoboken (config-if)#no shut
Hoboken (config-if)#exit
Hoboken (config)#
Hoboken (config)#int s3/0
Hoboken (config-if)#ip add 172.16.4.1 255.255.255.0
Hoboken (config-if)#no shut
Hoboken (config-if)#exit
Seting router 2 / Waycross
Waycross >enabel
Waycross #configure terminal
Waycross (config)#int fa0/0
Waycross (config-if)#ip add 172.16.5.1255.255.255.0
Waycross (config-if)#no shut
Waycross (config-if)#ex
Waycross (config)#
Waycross (config)#int s2/0
Waycross (config-if)#ip add 172.16.4.2255.255.255.0
Waycross (config-if)#no shut
Waycross (config-if)#ex
Selanjutnya lakukan konfigurasi untuk routing:
Sterling:
Sterling (config)#ip route 172.16.3.0 255.255.255.0 172.16.2.2
Sterling (config)#ip route 172.16.5.0 255.255.255.0 172.16.2.2
Hoboken :
Hoboken (config)#ip route 172.16.1.0 255.255.255.0 172.16.2.1
Hoboken (config)#ip route 172.16.5.0 255.255.255.0 172.16.4.2
Waycross:
Waycross (config)#ip route 172.16.1.0 255.255.255.0 172.16.4.1
Waycross (config)#ip route 172.16.3.0 255.255.255.0 172.16.4.1
Berikan IP pada setiap komputer host dengan cara sebagai berikut:
Klik PC > Config > FacEthernet > Static
Jika semua sudah selesai di konfigurasi cobalah ping jaringan, misalkan disini saya mencoba untuk mengeping antar Router dan antar PC:
Antar Router
Sterling>ping 172.16.2.2
Type escape sequence to abort.
Sending 5, 100-byte ICMP Echos to 172.16.2.2, timeout is 2 seconds:
!!!!!
Success rate is 100 percent (5/5), round-trip min/avg/max = 2/36/169 ms
Hoboken#ping 172.16.4.1
Type escape sequence to abort.
Sending 5, 100-byte ICMP Echos to 172.16.4.1, timeout is 2 seconds:
!!!!!
Success rate is 100 percent (5/5), round-trip min/avg/max = 3/7/9 ms
Waycross#ping 172.16.5.1
Type escape sequence to abort.
Sending 5, 100-byte ICMP Echos to 172.16.5.1, timeout is 2 seconds:
!!!!!
Success rate is 100 percent (5/5), round-trip min/avg/max = 0/1/4 ms
Antar PC
   gunakan dekstop kemudian comand prompt untuk mengeping-nya.

_Pasopati 2010 UYP™

Copyright 2011 Designing a dream come true.
Blogger Templates By:Noct.