Membuat TextBox Menjadi Read Only Tanpa Kehilangan Warna

Kadang-kadang dalam situasi tertentu kita ingin membuat textbox menjadi read only. akan tetapi masalahnya, jika kita membuat textbox tersebut menjadi disable, textbox tersebut akan berubah warna menjadi abu-abu, tidak peduli warna apa pun yang anda berikan.

Salah satu cara mengakalinya adalah menggunakan picturebox, kemudian kita memasukkan textbox tersebut ke dalam picturebox-nya. Sehingga apabila kita ingin membuat textbox tersebut menjadi read only, anda cukup membuat picturebox-nya menjadi disable. Begitu pula sebaliknya, jika ingin mengaktifkan kembali (enable), anda buat picturebox menjadi enable. Anda dapat melihat hasilnya, warna apa pun yang kita berikan pada textbox tersebut tetap akan terlihat.

Menampilkan Propertis Kotak Dialog

Untuk menampilkan properties dari suatu kotak dialog dapat dilakukan dengan cara sederhana. seperti cara dibawah ini hanya dengan membuat suatu declarations, menentukan letak, dan nama file yang akan dilihat propertisnya.

Declarations :
Type SHELLEXECUTEINFO
    cbSize As Long
    fMask As Long
    hwnd As Long
    lpverb As String
    lpFile As String
    lpParameters As String
    lpDirectory As String
    nShow As Long
    hInstApp As Long
    lpIDList As Long
    lpClass As String
    hkeyClass As Long
    dwHotKey As Long
    hIcon As Long
    hProcess As Long
End Type

Membuat Form ke Tengah

Jika anda membuat anak form (Form Child) pada MDI Form, defaultnya form tersebut tidak akan ke tengah. untuk membuat form tersebut ke tengah, anda dapat menggunakan kode berikut ini.

Public Sub CenterForm(frm As Form)
    frm.Top = (Screen.Hight - frm.Height) / 2
    frm.Left = (Screen.Width - frm.Width) / 2
End Sub

Mengetahui Program Kita Sedang Berjalan.

Program visual basic mempunyai fungsi yg dinamakan PrevInstance. jika program yg sama dipanggil dua kali, fungsi tersebut akan bernilai True. Jika anda ingin menghentikan program yg dipanggil sampai dua kali, anda dapat menambahkan baris program berikut.

Private Sub Form_Load()
    If App.PrevInstance Then End
End Sub

Paid To Click

Peluang ini adalah peluang bisnis yang tidak mengharuskan kita mempunyai website atau diharuskan menulis artikel. Peluang bisnis ini adalah peluang bisnis yang paling mudah dan tidak ribet. Pada peluang bisnis ini kita hanya diwajibkan melakukan klik pada iklan yang telah disediakan oleh website tersebut. Peluang ini biasanya disebut dengan Paid To Click (PTC).