Sunday, 13 November 2011

Calculator Sederhana Visual Basic 6.0 Part II

4.Berikutnya, tinggal membuat coding untuk kalkulator tersebut. Jika Anda mengikuti semua
setting properties seperti di posting sebelumnya Calculator Sederhana Visual Basic 6.0 Part I , maka codingnya  seperti ini:
Private Hasil As Double
Private Const opNol = 0
Private Const opTambah = 1
Private Const opKurang = 2
Private Const opKali = 3
Private Const opBagi = 4
Private Operator As Integer
Private NilaiBaru As Boolean

Private Sub Hapus()
 Dim txt As String
 Dim min_len As Integer
     txt = TxtDisplay.Text
 If Left$(txt, 1) = "-" Then
    min_len = 2
 Else
    min_len = 1
 End If
 If Len(txt) > min_len Then
    TxtDisplay.Text = Left$(txt, Len(txt) - 1)
 Else
    TxtDisplay.Text = "0?"
 End If
End Sub

Calculator Sederhana Visual Basic 6.0 Part I

lagi-lagi tugas lagi-lagi tugas..
mungkin kalo nggak ada tugas, gak pernah posting.. hehehehehe..

kali ini saya mau posting tugas dari dosen saya Ir.Tateng Sukondar, MT yaitu "Calculator Sederhana Menggunakan Visual Basic 6.0"
langsung aja gan..

1.Buka program VB 6.0 (VisualBasic 6.0) lalu pilih Standard EXE


Saturday, 12 November 2011

Memprotect Folder Tanpa Software


Udah lama gak posting.. hehe
Mungkin
agan-agan udah banyak yang tau cara yang ingin saya postingin ini. Akan tetapi, saya tetap akan memposting tutorial ini untuk buat agan-agan yang masih belum tahu.

Mungkin ada sebagian agan-agan yang kadang ngerasa resah dan risih dengan file-file privacynya ketika komputer,flashdisk, atau laptop kita ada yg minjem..
maka kali ini saya mau bagi-bagi tutorial buat memPROTECT folder tanpa menggunakan software/ (manual)..langsung aja..

untuk mengunci folder tanpa sofware ini sangatlah mudah, caranya adalah sebagai berikut :
1. Bukalah program Notepad(ketik "Notepad" di menu RUN lalu ENTER) atau new text document.txt di directory mana saja di computer atau laptop anda.
2. Setelah itu copy-paste script di bawah ini ke notepad tadi :

Tuesday, 8 November 2011

Mitos Bisnis Amoral

Mengungkapkan suatu keyakinan bahwa antara bisnis dan moralitas atau etika tidak ada hubungan sama sekali Etika justru bertentangan dengan bisnis dan akan membuat pelaku bisnis kalah dalam persaingan bisnis yang ketat Orang bisnis tidak perlu memperhatikan imbauan-imbauan, norma-norma dan nilai moral

Argumen:
v  Bisnis adalah suatu persaingan, sehingga pelaku bisnis harus berusaha dengan segala cara dan upaya untuk bisa menang
v  Aturan yang dipakai dalam permainan penuh persaingan, berbeda dari aturan yang  dikenal dalam kehidupan sosial sehingga tidak bisa dinilai dengan aturan moral dan sosial
v  Orang bisnis yang mau mematuhi aturan moral atau etika  akan berada pada posisi yang tidak menguntungkan
Mitos bisnis amoral tidak sepenuhnya benar
q  Beberapa perusahaan ternyata bisa berhasil  karena memegang teguh kode etis dan komitmen moral tertentu
q  Bisnis adalah bagian aktivitas yang penting dari masyarakat, sehingga norma atau nilai yang dianggap baik dan berlaku di masyarakat ikut dibawa serta dalam kegiatan bisnis
q  Harus dibedakan antara legalitas dan moralitas
Suatu praktek atau kegiatan bisnis mungkin saja diterima secara legal karena ada dasar hukum, tetapi tidak diterima secara moral (monopoli?)
Etika harus dibedakan dari ilmu empiris
Etika tidak mendasarkan norma atau prinsipnya pada kenyataan faktual yang terus berulang. 
Menurut Hume :dari kenyataan yang ada (is) tidak bisa ditarik sebuah perintah normatif (ought)
contoh : sogok, suap,kolusi, monopoli,nepotisme
Berbagai aksi protes yang mengecam berbagai pelanggaran dalam kegiatan bisnis menunjukkan bahwa bisnis harus dijalankan secara baik dan tetap mengindahkan norma-norma moral