Memindahkan Posisi Kontrol Button Atau TextBox Pada Saat Aplikasi Running – Kode VB Net

Ketika Project dijalankan (runtime), maka posisi Kontrol seperti button ataupun textbox tidak bisa diubah menggunakan pointer mouse. Namun ada cara khusus untuk memindahkan posisi Kontrol saat runtime. Misalnya Anda ingin memindahkan Kontrol Button (Button1), maka anda tinggal tuliskan kode berikut ini:

Baca lebih lanjut

Mengubah String atau Teks Menjadi Suara – Kode VB Net

Text To Speech
Kode VB .Net mengubah teks menjadi suara

Jika anda mengetahui fitur Text to Speech atau Speech Recognition yang ada pada Windows 7, maka anda pun bisa membuat aplikasi serupa di visual basic .net dengan amat mudah. Syntax yang saya jelaskan ini dapat mengubah bentuk teks atau string pada aplikasi anda menjadi bentuk suara. Jadi seolah-olah program yang anda buat sendiri mampu membaca teks yang diinputkan kemudian aplikasi anda berbicara dengan lantang menggunakan speaker komputer apa yang telah dibacanya. Misalkan jika anda menginputkan sebuah kalimat pada textbox: “Thank you very much – for trying feylopelis software corporation..” maka speaker anda akan berbunyi mengeluarkan suara seperti apa yang tertera pada textbox. Hebat bukan?

Suara yang dikeluarkan bawaan dari Windows yaitu Microsoft Anna suara seorang wanita yang berdialek bahasa Inggris US. Namun sayangnya belum tersedia suara yang berdialek bahasa Indonesia.

Untuk source code nya silahkan langsung saja anda ikuti tutorial dibawah ini:

Baca lebih lanjut

Membuat Label Berjalan atau Bergerak di Form – Kode VB Net

Label Berjalan VB .Net
Label Berjalan VB .Net

Cara membuat label berjalan atau bergerak di form visual basic .net amatlah mudah. Silahkan ikuti tutorial berikut ini :

1. Tambahkan kontrol berikut kedalam form anda:

  • Satu buah Label (Label1) dan
  • Satu Timer (Timer1)

2. Ubah nilai properti dari kontrol Timer1 sebagai berikut :

  • Enabled = True
  • Interval = 10

3. Tulislah salah satu kode berikut di event Timer_Tick :

'Kode label bergerak dari kanan ke kiri
Label1.Left -= 2
If Label1.Left = -(Label1.Width) Then Label1.Left = Me.ClientRectangle.Width

'Kode label bergerak dari kiri ke kanan
Label1.Left += 2
If Label1.Left = Me.ClientRectangle.Width Then Label1.Left = -(Label1.Width)

'Kode label bergerak dari bawah ke atas
Label1.Top -= 2
If Label1.Top = -(Label1.Height) Then Label1.Top = Me.ClientRectangle.Height

'Kode label bergerak dari atas ke bawah
Label1.Top += 2
If Label1.Top = Me.ClientRectangle.Height Then Label1.Top = -(Label1.Height)

Menjadikan Kontrol Selalu Berada ditengah Form Saat di Resize – Kode VB Net

Bila anda menghendaki suatu kontrol misalkan textbox atau button agar selalu berada di tengah form saat di resize. Berikut cara melakukannya. Tulislah salah satu kode berikut ini di event Form_Load dan di event Form_Resize :

' Jika ingin mempertahankan posisi vertikal
Button1.Left =(Me.ClientRectangle.Width / 2) - (Button1.Width / 2)
 
' Jika ingin mempertahankan posisi horisontal
Button1.Top = (Me.ClientRectangle.Height / 2) - (Button1.Height / 2)