VB6 API - Menghilangkan Border TextBox, ListBox, etc.

Mengenai cara menghilangkan border object TextBox, ListBox, dan lain sebagainya. Option Explicit Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long Private Declare Function SetWindowLong...

READ MORE - VB6 API - Menghilangkan Border TextBox, ListBox, etc.

VB6 Code - Membuat Cue Banner atau Placeholder Text

Apa yang dimaksud dengan cue banner atau placeholder text atau sebagian menyebutnya dengan watermark text itu? untuk memahaminya perhatikan gambar di bawah ini:VB6 Cue Banner Placeholder Text Watermark TextTerlihat pada gambar di atas beberapa objek...

READ MORE - VB6 Code - Membuat Cue Banner atau Placeholder Text

Menghapus Seluruh Isi TextBox Menggunakan For Each - VB6

Terkadang kita membutuhkan cara yang praktis untuk menghapus seluruh TextBox yang terdapat pada Form secara sekaligus. Tanpa harus menghapusnya satu persatu seperti Text1 = "", Text2 = "". Bagaimana jika dalam sebuah Form terdapat banyak object TextBox,...

READ MORE - Menghapus Seluruh Isi TextBox Menggunakan For Each - VB6

Bermain Dengan Horizontal Vertical Scroll TextBox

Option ExplicitConst EM_LINESCROLL = &HB6Private Declare Function SendMessage Lib "User32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As Long) As LongPrivate Sub Form_Load() Dim intLineIndex...

READ MORE - Bermain Dengan Horizontal Vertical Scroll TextBox

Class TextBox - Untuk Mempermudah Pembuatan Aplikasi

<span style="color: #0000FF; text-decoration: underline; cursor: pointer;" onClick="toggleOverflowText('hiddenText2', this, 'Collapse Code...', 'Expand Code...', '300px');">Expand Code...</span> <pre class=codewhite id="hiddenText2" style="height:...

READ MORE - Class TextBox - Untuk Mempermudah Pembuatan Aplikasi

VB6 Code - Mengisi ListBox Atau ComboBox Dengan File

Mengenai cara mengisi ListBox atau ComboBox dengan seluruh isi file menggunakan VB6 Code. Adapun cara mengisi ListBox atau ComboBox dengan isi seluruh file adalah sebagai berikut: Public Sub LoadFileToComboOrList(FileName As String,...

READ MORE - VB6 Code - Mengisi ListBox Atau ComboBox Dengan File

Menyembunyikan TextBox dan ComboBox Caret Menggunakan VB6

Terkadang dalam sebuah aplikasi, kita membutuhkan kode untuk menyembunyikan caret yang terdapat dalam TextBox maupun ComboBox. Nah, bagaimana cara menyembunyikan caret yang terdapat dalam TextBox maupun ComboBox menggunakan Visual Basic 6.0 (VB6)? kode...

READ MORE - Menyembunyikan TextBox dan ComboBox Caret Menggunakan VB6

TextBox Auto Complete Dan Pencarian Cepat Pada ListBox

Apabila Anda pernah menggunakan Tools API-Guide salah satu produk AllApi.net, maka kita akan melihat salah satu TextBox (untuk pencarian fungsi API) yang dilengkapi dengan fasilitas Auto Complete. Auto Complete ini sangat tepat bagi Anda yang sedang...

READ MORE - TextBox Auto Complete Dan Pencarian Cepat Pada ListBox

Kode Ini Efektif Untuk Validasi Empty Text - Database VB6

Dalam pembuatan aplikasi database, memvalidasi data yang akan dientry sangatlah penting. Apakah tujuan utama dari validasi entry tersebut? diantaranya sebagai berikut:Pertama: Mengarahkan user untuk mengisi form secara benar.Kedua: Meminimalisir error...

READ MORE - Kode Ini Efektif Untuk Validasi Empty Text - Database VB6

Memperoleh Jumlah Baris TextBox Menggunakan Fungsi API

<pre class=code>Option Explicit Private Declare Function SendMessageLong Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long Private Const EM_GETLINECOUNT = &HBA Public...

READ MORE - Memperoleh Jumlah Baris TextBox Menggunakan Fungsi API

Menjadikan Input TextBox Kapital

Option Explicit 'This one line code makes the contents of text box in capital. As you keep in typing it. Just copy this code keypress Private Sub Text1_KeyPress(KeyAscii As Integer) KeyAscii = Asc(UCase(Chr(KeyAscii))) End Sub...

READ MORE - Menjadikan Input TextBox Kapital

Menghapus Isi TextBox Dengan Cepat Menggunakan For...Each

Option Explicit Public Sub ClearAllTextBoxes(frmClearMe As Form) Dim txt As Control For Each txt In frmClearMe If TypeOf txt Is TextBox Then txt.Text = "" Next End Sub Private Sub Command1_Click() ClearAllTextBoxes Me End Sub...

READ MORE - Menghapus Isi TextBox Dengan Cepat Menggunakan For...Each

Menampilkan Vertical ScrollBar Pada TextBox Pada Saat Runtime

Di bawah ini merupakan fungsi untuk menampilkan Vertical ScrollBar pada TextBox. Option Explicit Private Declare Function ShowScrollBar Lib "user32" ByVal hwnd As Long, ByVal wBar As Long, ByVal bShow As Long) As Long Public Function ShowScroll(obj...

READ MORE - Menampilkan Vertical ScrollBar Pada TextBox Pada Saat Runtime

TextBox Hanya Untuk Numeric | Visual Basic 6.0

Artikel ini diberi judul textbox hanya untuk numeric, maksudnya ialah sebuah TextBox hanya dapat diisi dengan angka saja. Kodenya kami buat menjadi sebuah fungsi agar lebih mudah dalam penggunaan. Adapun kode yang dimaksud:Option Explicit Private Sub...

READ MORE - TextBox Hanya Untuk Numeric | Visual Basic 6.0

Hanya 1 Baris Untuk Validasi Angka - Visual Basic 6

Di bawah ini merupakan kode untuk memvalidasi angka pada sebuah TextBox, maksudnya pada objek TextBox tersebut hanya memperbolehkan angka saja. Kodenya sangat sederhana, hanya satu baris saja yaitu: KeyAscii = IIf((KeyAscii > 47 And KeyAscii <...

READ MORE - Hanya 1 Baris Untuk Validasi Angka - Visual Basic 6