Slider

Recent Movies

MEMBUAT PROGRAM MENGUNAKAN FUNGSI IF dan CASE DENGAN SOFWARE VISUAL BASIC




Hey......
Disini saya akan kembali lagi membahas tentang visual basic tentang fungsi if dan case.
PROGRAM MENGGUNAKAN FUNGSI IF
Pertama-tama kita harus membuka program visual basic terlebih dahulu ,dan membuat from baru

Lalu kita design seperti dibawah ini

Lalu aturlah masing-masing item sepertiini :
1.            Label1 :  Text = KETERANGAN NIAI
                Label2 :  Text = NILAI
                Label3 :  Text = KETERANAGAN
2.            TextBox1 : (Name) = TN
                TextBox2 : (Name) = TK
3.            Button1 : Text      = PROSES
                                   (Name) = BP
               Button1 : Text      = HAPUS
                                   (Name) = BH
               Button1 : Text      = KELUAR
                                   (Name) = BK
Dan Jadinya seperti ini


Lalu atur script code seperti di bawah ini


Nanti jika dijalankan maka akan seperti ini




PROGRAM MENGGUNAKAN FUNGSI CASE
Design seperti dibawah ini

Lalu aturlah masing-masing item sepertiini :
1.            Label1 :  Text = HARGA BARANG
                Label2 :  Text = BARANG
                Label3 :  Text = HARGA
2.            TextBox1: (Name) = TH
                ComboBox1 : (Nama) = B1
3.            Button1 : Text      = HAPUS
                                   (Name) = BH
                Button2 : Text      = KELUAR
                                   (Name) = BK
Dan Jadinya seperti ini

Lalu atur script code seperti di bawah ini


Apabila programnya di jalankan akan seperti berikut

Sekian artikel dari saya semoga bermanfaat
TERIMAKASIH.........






PROGRAM LUAS SEGITIGA dan TRAPESIUM MENGUNAKAN VISUAL BASI


Hey...... 
Disini saya akan membuat program luas segitiga dan trapesium mengunakan sofware visual basic.


Pertama-tama kita harus membuka program visual basic terlebih dahulu ,dan membuat from baru

Lalu kita design seperti dibawah ini



Lalu aturlah masing-masing item sepertiini :
1.            Label1 :  Text = Luas Trapesium
                Label2 :  Text = Sisi Pertama
                Label3 :  Text = Sisi Kedua
                Label4 :  Text = Tinggih
                Label5 :  Text = Luas

2.            TextBox1 : (Name) = SP
                TextBox2 : (Name) = SK
                TextBox3 : (Name) = T
                TextBox4 : (Name) = L

3.            Button1 : Text      = PROSES
                                   (Name) = BP
                Button2 : Text      = HAPUS
                                   (Name) = BH

                Button3 : Text      = KELUAR
                                   (Name) = BK

Dan Jadinya seperti ini

Lalu atur script code seperti di bawah ini





Sekian toturial yang saya berikan semoga bermanfaat bagi anda semua.
TERIMAKASIH.............

Pengenalan Visual Basic & Perkembangannya



Hy semua apa kabar?
Kali ini saya akan membahas tentang software visual basic 2008 . Mungkin banyak yang bertanya-tanya, apa sih Visual Basic itu? Visual Basic atau sering disingkat sebagai VB saja merupakan sebuah bahasa pemrograman yang menawarkan Integrated Development Environment (IDE) visual untuk membuat program perangkat lunak berbasis sistem operasi Windows dengan menggunakan model pemrograman (COM).Visual Basic merupakan turunan bahasa pemrograman BASIC dan menawarkan pengembangan perangkat lunak komputer berbasis grafik dengan cepat.

Bill Gates, pendiri Microsoft, memulai bisnis perangkat lunak dengan mengembangkan interpreter bahasa Basic untuk Altair 8800, untuk kemudian ia ubah agar dapat berjalan di atas IBM PC dengan sistem operasi DOS. Perkembangan berikutnya ialah diluncurkannya BASICA (basic-advanced) untuk DOS. Setelah BASICA, Microsoft meluncurkan Microsoft QuickBasic dan Microsoft Basic (dikenal juga sebagai Basic Compiler).

Visual Basic adalah pengembangan dari bahasa komputer BASIC (Beginner’s All-purpose Symbolic Instruction Code). Bahasa BASIC diciptakan oleh Professor John Kemeny dan Thomas Eugene Kurtz dari Perguruan Tinggi Dartmouth pada pertengahan tahun 1960-an. Bahasa program tersebut tersusun mirip dengan bahasa Inggris yang biasa digunakan oleh para programer untuk menulis program-program komputer sederhana yang berfungsi sebagai pembelajaran bagi konsep dasar pemrograman komputer.

Sejak saat itu, banyak versi BASIC yang dikembangkan untuk digunakan pada berbagai platform komputer,seperti Microsoft QBASIC, QUICKBASIC, GWBASIC, IBM BASICA, Apple BASIC dan lain-lain.

Apple BASIC dikembangkan oleh Steve Wozniak, mantan karyawan Hewlett Packarddan teman dekat Steve Jobs (pendiri Apple Inc.). Steve Jobs pernah bekerja dengan Wozniak sebelumnya (mereka membuat game arcade “Breakout” untuk Atari). Mereka mengumpulkan uang dan bersama-sama merakit PC, dan pada tanggal 1 April 1976 mereka secara resmi mendirikan perusahaan komputer Apple. Popularitas dan pemakaian BASIC yang luas dengan berbagai jenis komputer turut berperan dalam mengembangkan dan memperbaiki bahasa itu sendiri, dan akhirnya berujung pada lahirnya Visual Basic yang berbasis GUI(Graphic User Interface) bersamaan dengan Microsoft Windows. Pemrograman Visual Basic begitu mudah bagi pemula dan programer musiman karena ia menghemat waktu pemrograman dengan tersedianya komponen-komponen siap pakai.

Hingga akhirnya Visual Basic juga telah berkembang menjadi beberapa versi, sampai yang terbaru, yaitu Visual Basic 2010. Bagaimanapun juga Visual Basic 6.0 tetap menjadi versi yang paling populer karena mudah dalam membuat programnya dan ia tidak menghabiskan banyak memori

Sejarah BASIC di tangan Microsoft sebagai bahasa yang diinterpretasi (BASICA) dan juga bahasa yang dikompilasi (BASCOM) membuat Visual Basic diimplementasikan sebagai gabungan keduanya.Programmer yang menggunakan Visual Basic bisa memilih kode bahasa pemrograman yang dikompilasi atau kode yang harus bahasa pemrograman yang diinterpretasikan sebagai hasil porting kode VB. Sayangnya, meskipun sudah terkompilasi jadi bahasa mesin, DLL bernama MSVBVMxx.DLL tetap dibutuhkan. 
Sekian pembahasan software Visual Basic semoga bermanfaat bagi kalian semua terima kasih....

Cara menyembunyikan file

 Pada kesempatan hari ini saya akan membagikan tips dan trik cara menyembunyikan file di pc atau leptop. banyak orang yang ingin foto atau vidio nya tidak ingin di lihat orang lain . Ya langsung saja saya akan memberitahunya:
  1. kali ini saya akan menyembunyikan folder game  saya
2. klik kanan di file yg akan kita sembunyikan Properties>>General--attributes-- centeng di kolom         hiden



3. tekan ok. maka file tersebut akan tersembunyi
   

 Dan cara untuk menampilkan file tersembunyi tersebut dengan cara:
1. 
2. 
 Semoga bermanfaat bagi kehidupan anda :)
      Assalamualaikum

Cara mengetahui windows di pc/leptop kita di instal

  1. Start Menu > Run > ketik CMD

  2. Pada pop up command prompt, ketik systeminfo > enter

  3. Cari "Original Install Date" , disinilah tanggal yang menunjukkan kapan windows kita diinstall


Cara Menghapus Virus Shortcut




virus shortcut  cukup membuat kita binggung dan terganggu , jadi virus ini memang harus dibasmi jauh-jauh dari planet komputer kita.



Mau tau caranya, berikut ini langkah-langkahnya :

1. Sebelumnya matikan dulu proses system restore.

2. Matikan proses dari file Wscript yang terletak di C:\Windows\System32, dengan cara menggunakan tools seperti CProcess, HijackThis atau dapat juga menggunakan Task Manager dari Windows.

3. Setelah dimatikan proses dari Wscript tersebut, kita harus men-delete atau me-rename dari file tersebut agar tidak digunakan untuk sementara oleh virus tersebut.
Sebagai catatan, kalau kita me-rename dari file Wscript.exe tersebut dengan otomatis, maka akan dikopikan lagi di folder tersebut. Oleh sebab itu, kita harus mencari di mana file Wscript.exe yang lainnya, biasanya ada di C:\Windows\$NtServicePackUninstall$, C:\Windows\ServicePackFiles\i386.

Tidak seperti virus-virus VBS lainnya, kita bisa mengganti Open With dari file VBS menjadi Notepad, virus ini berextensi MDB yang berarti adalah file Microsoft Access. Jadi Wscript akan menjalankan file DATABASE.MDB seolah-olah dia adalah file VBS.

4. Delete file induknya yang ada di C:\Documents and Settings\\My Documents\database.mdb, agar setiap kali komputer dijalankan tidak akan me-load file tersebut. Dan jangan lupa kita buka juga MSCONFIG, disable perintah yang menjalankannya.

5. Sekarang kita akan men-delete file-file Autorun.INF. Microsoft.INF dan Thumb.db. Caranya, klik tombol START, ketik CMD, pindah ke drive yang akan dibersihkan, misalnya drive C:\, maka yang harus kita lakukan adalah:

Ketik C:\del Microsoft.inf /s, perintah ini akan men-delete semua file microsoft.inf di seluruh folder di drive C:. Sementara kalau mau pindah drive tinggal diganti nama drivenya saja contoh: D:\del Microsoft.inf /s.

Untuk file autorun.inf, ketik C:\del autorun.inf /s /ah /f, perintah akan men-delete file autorun.inf (syntax /ah /f) digunakan karena file tersebut memakai attrib RSHA, begitu juga untuk file Thumb.db lakukan juga hal yang sama.

6. Untuk men-delete file-file selain 4 file terdahulu, kita harus mencarinya dengan cara search file dengan ekstensi .lnk ukurannya 1 kb. Pada 'More advanced options' pastikan option 'Search system folders' dan 'Search hidden files and folders' keduanya telah dicentang.

Harap berhati-hati, tidak semua file shortcut / file LNK yang berukuran 1 kb adalah virus, kita dapat membedakannya dari ikon, size dan tipenya. Untuk shortcut yang diciptakan virus ikonnya selalu menggunakan icon 'folder', berukuran 1 kb dan bertipe 'shortcut'. Sedangkan folder yang benar harusnya tidak memiliki 'size' dan tipenya adalah 'File Folder'.

7. Fix registry yang sudah diubah oleh virus. Untuk mempercepat proses perbaikan registry salin script dibawah ini pada program 'notepad' kemudian simpan dengan nama 'Repair.inf'. Jalankan file tersebut dengan cara:

- Klik kanan repair.inf
- Klik Install
[Version]
Signature="$Chicago$"
Provider=Vaksincom Oyee

[DefaultInstall]
AddReg=UnhookRegKey
DelReg=del

[UnhookRegKey]
HKLM, Software\CLASSES\batfile\shell\open\command,,,"""%1"" %*"
HKLM, Software\CLASSES\comfile\shell\open\command,,,"""%1"" %*"
HKLM, Software\CLASSES\exefile\shell\open\command,,,"""%1"" %*"
HKLM, Software\CLASSES\piffile\shell\open\command,,,"""%1"" %*"
HKLM, Software\CLASSES\regfile\shell\open\command,,,"regedit.exe "%1""
HKLM, Software\CLASSES\scrfile\shell\open\command,,,"""%1"" %*"
HKLM, SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon, Shell,0, "Explorer.exe"
HKLM, SYSTEM\ControlSet001\Control\SafeBoot, AlternateShell,0, "cmd.exe"
HKLM, SYSTEM\ControlSet002\Control\SafeBoot, AlternateShell,0, "cmd.exe"

[del]
HKLM,SOFTWARE\Microsoft\Windows\CurrentVersion\Run, Winupdate
HKCU,SOFTWARE\Microsoft\Windows\CurrentVersion\Run, explorer

Cara mengunci file/folder di windows 7 tanpa software

Hay sobat blogger selamat Datang di my blog , kali ini saya akan membagikan sedikit ilmu tentang megunci file/folder di windows 7 TANPA SOFTWARE . Mungkin di komputer kalian ada data-data pribadi yang gax mau dilihat oleh orang lain, maka anda ingin menguncikan folder tersebut .
Okey gue anak yang paling keren akan menjelaskan cara cara mengunci file/folder di windows 7. 

1.pertama tama buka  tempat yang mau kita buat file untuk dikunci ,terserah mau di lokal disk C,D,atau E.
2.Buat folder baru dan beri nama yang anda inginkan
3.Buka folder yang anda baru buat tadi ,dan tambahkan di dalamnya sebuah text document,caranya klik kanan di dalam folder yang anda buat tadi,pilih new,dan pilih text document.
 
4.copy kode di bawah ini kedalam text document yang anda buat tadi

Quote:
Quote: cls
@ECHO OFF
title Folder Private
if EXIST "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" goto UNLOCK
if NOT EXIST Private goto MDLOCKER
:CONFIRM
echo Are you sure you want to lock the folder(Y/N)
set/p "cho=>"
if %cho%==Y goto LOCK
if %cho%==y goto LOCK
if %cho%==n goto END
if %cho%==N goto END
echo Invalid choice.
goto CONFIRM
:LOCK
ren Private "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
attrib +h +s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
echo Folder locked
goto End
:UNLOCK
echo Enter password to unlock folder
set/p "pass=>"
if NOT %pass%== password here goto FAIL
attrib -h -s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
ren "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" Private
echo Folder Unlocked successfully
goto End
:FAIL
echo Invalid password
goto end
:MDLOCKER
md Private
echo Private created successfully
goto End
:End

5.Setelah di copy kode yang di atas ke dalam text document .lihat pada kata password here(tulisan merah),ganti kata tersebut dengan password yang anda ingin kan.misalnya kucinghitam
contoh nya:
if NOT %pass%== kucinghitam goto FAIL

6.Beri nama text document tadi dengan nama locker.bat . Caranya, pada text document pilih file, pilih save as, untuk file name di isi = locker.bat dan untuk save as type diganti all files, klik save.
 7.Sekarang kembali ke folder yang anda buat tadi ,didalamnya akan anda jumpai dua file baru ,seperti gambar di bawah ini. 


8. Sekarang anda masukankan file/folder yang ingin anda sembunyikan kedalam folder Private .
9. Untuk mengunci sekaligus menyembunyikan folder private (yang berisi file pribadi tadi), tinggal double klik aja file locker, ini akan membuka sebuah perintah untuk mengunci (lock folder) atau tidak. Y/N?
 
10.Ketik Y pada keyboard & tekan enter ,untuk menghilangkan  folder Private(yang berisi data data pribadi tadi)
11.Untuk memunculkan folder Private tadi ,dengan cara double klik aja pada file locker, kemudian isikan passwoard yang anda buat tadi,maka akan muncul folder Private tadi.
 

 Itulah beberapa cara mengunci file/folder di windows 7 tanpa software.Yang ingin komentar mohon berkomentar dengan kata-kata yang sopan.
Okey selamat tinggal & semoga kita berjumpa di lain waktu lagi.
 wassalammualaikum wr.wb.............................................
                     ingat berkomentar dengan sopan ya ;)

 
Copyright © 2015. DYH