Blog Business Review Gadget Games General Highlight Humour Internet Mailbox Opinion Tips&Tricks Tutorial

Microsoft Visual Basic 6.0: Buat Tombol Menyalin Teks



Author: DHINATACOM
Posted: 01.08.2007 at 13:45.
Last Updated: 01.08.2007 at 23:23.
11 Komentar.

Ketika kita membuat suatu aplikasi dengan Visual Basic 6.0, pastilah tidak asing dengan kata Textbox. Textbox sering digunakan untuk memasukkan data teks. Biasanya untuk menyalin kata pada Textbox, kita hanya sekadar menekan tombol kombinasi [Ctrl] + C atau menggunakan context menu pada textbox tersebut. Maka kalau tadi ada dua cara menyalin teks pada Textbox , sekarang kita buat satu cara lagi untuk melakukannya yaitu dengan menggunakan tombol Copy seperti yang ada pada Microsoft Office atau WordPad.

Langkah-langkah pembuatannya sebagai berikut :

1. Buka aplikasi  Visual Basic 6.0 lewat [Start] > [All Programs] > [Microsoft Visual Studio 6.0] > [Microsoft Visual Studio 6.0].

2. Pada jendela New Project, pilih tab New.

3. Pada tab New, pilihlah Standard EXE dan klik [ Open ] untuk membuka Jendela Project1 – Form1 (Form).

4.   Buat 1 Textbox dan  1 CommandButton

5. klik [View] > (Code) untuk membuka jendela Project1 – Form1 (Code)

6. Ketikkan kode program berikut ini :

  1. Dim i, j As Integer
  2.  
  3. Private Sub Command1_Click()
  4. Dim str As String
  5. str = Text1.Text
  6.  
  7. Text1.Text = Mid(Text1.Text, Text1.SelStart _
  8. + 1, Text1.SelLength)
  9.  
  10. Clipboard.Clear
  11. Clipboard.SetText (Text1.Text)
  12.  
  13. Text1.Text = str
  14. Text1.SelStart = Len(Text1.Text)
  15.  
  16. Text1.SetFocus
  17. Text1.SelStart = i
  18. Text1.SelLength = j
  19.  
  20. End Sub
  21.  
  22. Private Sub Form_Load()
  23.  
  24. End Sub
  25.  
  26. Private Sub Text1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
  27. i = Text1.SelStart
  28. j = Text1.SelLength
  29. End Sub

7. Untuk melihat hasilnya simpan dan jalankan dengan menekan [F5].

Sekarang coba ketik kalimat pada Textbox. Kemudian, blok kalimat dengan mouse dan selanjutnya klik CommandButton untuk menyalin. Untuk melihat hasil salinan, coba tempel di Notepad. Mudah bukan ?



komentar pembaca DHINATACOM

  1. Oyonks says:

    Dimana saya bisa mendownload Visual basic 6.0??

    Tolong ya kasih link rinciannya ke email saya (Oyonks_gol@yahoo.com). soalnya saya cari di google dan yahoo, tetap ga berhasil…

  2. ludi says:

    salaman Makasih GAN….

  3. Pharmg458 says:

    Hello! bkbagae interesting bkbagae site!

  4. Salam hormat, ada game puzzle, yakni game kuis jawaban acak versi 1.1.0 untuk melatih ketelitian dan konsentrasi, dapat di download di http://www.ciauldownload.blogspot.com , terima kasih

  5. 283872 727314They call it the self-censor, merely because youre too self-conscious of your writing, too judgmental. 819668

  6. 628980 391302Once I originally commented I clicked the -Notify me when new feedback are added- checkbox and now every time a remark is added I get four emails with exactly the same comment. Is there any indicates you possibly can remove me from that service? Thanks! 533864

  7. informático says:

    894305 530587Whoah this weblog is magnificent i truly like reading your articles. Keep up the excellent paintings! You realize, lots of persons are looking round for this data, you could aid them greatly. 494314

  8. houzz ppc says:

    470194 320934you got a quite outstanding web site, Sword lily I discovered it via yahoo. 314128

  9. 807468 94770We dont trust this remarkable submit. Nevertheless, I saw it gazed for Digg along with Ive determined you can be appropriate so i ended up being imagining within the completely wrong way. Persist with writing top quality stuff along these lines. 643063

  10. 577253 857493i could only wish that solar panels cost only several hundred dollars, i would really like to fill my roof with solar panels- 664482

D . ( . P . diem . piss . kaget . nocomment . malu . mimpi . licik . ide . yess . tipi . tendang . sombong . sinchan . sial . senam . nyerah . ngiler . nggaya . nangis . musik . males . love . konslet . kembar . gatau . damn . bye . ayuk . belajar . tutupkuping . tolong . terharu . strees . serang . sendiri . ngakak . mimisan . mati . mantap . kesel . keren . kartukuning . kartumerah . fiuhhh . cendol . salaman . recseller . maho . marah . najis . kiss . bingung . berduka . takut . ngacir . ngacir2 . janganribut . capedeh .

Petunjuk komentar:
1. Tolong tulis komentar yang berhubungan dengan topik artikel. Jangan mengirim SPAM!
2. Komentar yang tidak berhubungan atau SPAM akan dihapus.
3. Klik gambar emoticon diatas untuk menampilkannya pada komentar Anda.

Catatan: Beberapa emoticon yang ditampilkan merupakan hak cipta dari Kaskus.

home DHINATACOM


Home Article Index Contact Disclaimer F.A.Q


langganan majalah DHINATACOM
Artikel Terbaru

Internet Hemat dengan Paket Simpati di Bawah 1 GB

Membuat Jaringan Multimedia Server Dengan PC Windows dan Smartphone Android

Disclaimer . Contact Info . Privacy Policy . F A Q . Servis Komputer Tangerang
DHINATA.COM © 2008-2017 oleh Yoki DHINATA. Theme: D-Magz 3.1
Desain Tema oleh Yoki DHINATA. My Copyright Is Not Your Right To Copy.
Powered by WordPress. Hak Cipta Dilindungi.
home DHINATACOM