ada nih contoh dari Destroyer_maniac ( Rifa Hammet) fungsi class seperti itu..
dia dah bikin ...

kalo mau download aja prog GL dari files programmer VB
disitu ada kok ... cara bikin fungsinya.. kulik2 lagi




M.
M.> Dear,
M.> Sorry telat, mungkin saya bisa bantu, mudah2 an yang dimaksud sama 
M.> pak.Dwi sama dengan yang saya maksud.
M.> Text box pakai array index, buat text box 1, lalu di copy, sehingga 
M.> membentuk index,
M.> jadi kita tinggal ketik di prosedur diatas sehingga otomatis mempunyai
M.> perlakuan yang sama,
M.> atau pakai perintah 'select case index' untuk membedakan text box yang
M.> diinginkan.

M.> Private Sub Text1_KeyPress(Index As Integer, KeyAscii As Integer)

M.> End Sub


M.> Rgds/ Ridwan

M.> dwi saputro wrote, On 8/31/2006 1:49 PM:

>>terimakasih atas respon teman-teman,
>>
>>tapi saya rasa kurang fleksibel kalo tiap2 text box
>>kita kasi koding tersebut , coba bayangkan kalo ada 10
>>textbox/combobox dalam satu form dimana kita memakai
>>form sebanyak 10 atau mungkin lebih, kita tidak
>>mungkin menulisnya satu-satu ditiap textbox.
>>
>>apakah ada yang secara global, jadi kita koding di
>>form load atau di module untuk semua text box?
>>
>>regards
>>dwi
>>
>>
>>--- Yulianto <[EMAIL PROTECTED]> wrote:
>>
>>  
>>
>>>Saya coba sempurnakan dikit,
>>>  Kalo tombol A (huruf a dan A)
>>>  If UCase(Chr(KeyAscii)) = "A" Then KeyAscii = 0
>>>   
>>>  tp klo hanya huruf 'A', maka (hapus fungsi
>>>UCase())
>>>  If Chr(KeyAscii) = "A" Then KeyAscii = 0
>>>   
>>>   
>>>  semoga membantu.
>>>
>>>Toni Rahayu <[EMAIL PROTECTED]> wrote:
>>>          
>>>
>>>Dear dwi...
>>>Untuk mendisable huruf a pake ini :
>>>
>>>Private Sub Text1_KeyPress(KeyAscii As Integer)
>>>If KeyAscii = 97 Then KeyAscii = 0
>>>End Sub
>>>
>>>'Ket : KeyAscii dari hurup a adalah 97, untuk key
>>>lainnya anda bisa cari sendiri
>>>khan ?
>>>
>>>Salam
>>>
>>>dwi saputro <[EMAIL PROTECTED]> on 28/08/2006
>>>04:06:03 PM
>>>
>>>Please respond to [email protected]
>>>
>>>To: [email protected]
>>>cc: (bcc: Toni Rahayu/IT/domino_srv)
>>>
>>>Subject: [Programmer-VB] tolong dong.. help please..
>>>
>>>para vbers,
>>>saya pemula dalam vb, saya mau tanya bagimana cara
>>>men
>>>disable salah satu key di keyboard,
>>>contoh jika saya mau waktu program saya jalan, maka
>>>program akan otomatis mendisable salah satu key di
>>>keyboard misal tombol A.
>>>
>>>dan umpama jika saya memilih salah satu submenu pada
>>>program, maka program akan otomatis membuka windows
>>>explorer dengan address sesuai dengan yang saya
>>>define
>>>sebelumnya.
>>>
>>>sebelumnya Terima Kasih atas infonya
>>>
>>>__________________________________________________
>>>Do You Yahoo!?
>>>Tired of spam? Yahoo! Mail has the best spam
>>>protection around
>>>http://mail.yahoo.com
>>>
>>>
>>>             para vbers, 
>>>saya pemula dalam vb, saya mau tanya bagimana cara
>>>men
>>>disable salah satu key di keyboard,
>>>contoh jika saya mau waktu program saya jalan, maka
>>>program akan otomatis mendisable salah satu key di
>>>keyboard misal tombol A.
>>>
>>>dan umpama jika saya memilih salah satu submenu pada
>>>program, maka program akan otomatis membuka windows
>>>explorer dengan address sesuai dengan yang saya
>>>define
>>>sebelumnya.
>>>
>>>sebelumnya Terima Kasih atas infonya
>>>
>>>__________________________________________________
>>>Do You Yahoo!?
>>>Tired of spam? Yahoo! Mail has the best spam
>>>protection around 
>>>http://mail.yahoo.com 
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>>Toni Rahayu
>>>PT. Omedata Electronics
>>>IT Department
>>>Hunting : (62-22) 6030805 Ext 121
>>>Faxs : (62-22) 6030896
>>>Homepage : http://toni.rahayu.tripod.com
>>>
>>>
>>>
>>>
>>>
>>>
>>>              
>>>---------------------------------
>>>Yahoo! Messenger with Voice. Make PC-to-Phone Calls
>>>to the US (and 30+ countries) for 2ยข/min or less.
>>>    
>>>
>>
>>
>>__________________________________________________
>>Do You Yahoo!?
>>Tired of spam?  Yahoo! Mail has the best spam protection around 
>>http://mail.yahoo.com 
>>
>>
>>Wahana Programmer Groups Links
>>
>>
>>
>> 
>>Yahoo! Groups Links
>>
>>
>>
>> 
>>
>>
>>
>>
>>  
>>



Salam, 
ChipMunks (Copy Paste Programmer)
mailto: [EMAIL PROTECTED]
Yahoo : Henqy



Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanaprogrammer.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [EMAIL PROTECTED]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahanaprogrammer
 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/Programmer-VB/

<*> To unsubscribe from this group, send an email to:
    [EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
 



Kirim email ke