• 33 Vote(s) - 2.27 Average
  • 1
  • 2
  • 3
  • 4
  • 5
غیر فعال کردن کلیک راست تکست باکس (ویژوال بیسیک 6)
#1
Disable TextBox control's right click context menu to appear without using any API.... There are several other hard ways to do this (like SendMessage, Hooking etc.) But here is the most simple three line code you can use in your application - No API !
Only thing to remember while using this code is - there should at least be one more control on your VB form other than your text box control and textbox's tabindex should not be 0 !


با سورس زیر یاد میگیرید چه چگونه کلیک راست را بر روی تکست باکس غیر فعال کنید :

Code:
Dim bIsRightClk As Boolean
Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

If Button = 2 Then
     bIsRightClk = True
End If

End Sub
Private Sub Form_Load()
     bIsRightClk = False
End Sub
Private Sub Text1_GotFocus()
   If bIsRightClk = True Then
          Text1.Enabled = False
          Me.SetFocus
          Text1.Enabled = True
   End If
End Sub

گروه دور همی پارسی کدرز
https://t.me/joinchat/GxVRww3ykLynHFsdCvb7eg
  Reply


Possibly Related Threads...
Thread Author Replies Views Last Post
  سه ....... در نمایس لیست باکس aghamali 0 823 07-11-2017، 10:39 PM
Last Post: aghamali
  کد یافتن عدد در تکست باکس aghamali 0 698 07-09-2017، 04:00 PM
Last Post: aghamali
  سورس کدهای ویژوال بیسیک Amin_Mansouri 8 12,483 05-15-2017، 04:35 PM
Last Post: minarad69
  سورس کد شماره گیری از مودم (ویژوال بیسیک 6 ) Amin_Mansouri 1 5,118 05-07-2017، 06:54 PM
Last Post: alikorg
  جابجایی در لیست باکس aghamali 0 1,860 03-14-2016، 07:41 PM
Last Post: aghamali
  چگونه فایل exe با ویژوال بیسیک بسازیم ؟ Amin_Mansouri 4 11,612 08-13-2015، 10:08 PM
Last Post: Amin_Mansouri
  مشکل با ارور ویژوال بیسیک aghamali 4 5,518 07-03-2015، 11:14 AM
Last Post: aaaaaaaaa
  سورس کد کار با وب کم (ویژوال بسیک 6) Amin_Mansouri 1 7,013 04-20-2015، 10:10 PM
Last Post: hackert41389
  انتخاب رندوم از لیست باکس aghamali 0 1,638 04-16-2015، 06:30 AM
Last Post: aghamali
  مشکل با paste بیسیک 6 aghamali 1 2,233 01-18-2015، 08:53 PM
Last Post: aghamali

Forum Jump:


Users browsing this thread: 1 Guest(s)