امتیاز موضوع:
  • 11 رای - 2.09 میانگین
  • 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 !


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

کد:
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
 فروش نوت بوک asus  خریداری شده از کانادا زیر قیمت بازار مدل Asus RoG G752
قیمت :7 میلیون 400 هزار تومان
فروش فوری با فاکتور رسمی خرید شده از کانادا
شماره تماس با بنده: 09120642214

پاسخ


موضوعات مشابه ...
موضوع نویسنده پاسخ بازدید آخرین ارسال
  سه ....... در نمایس لیست باکس aghamali 0 97 07-11-2017، 10:39 PM
آخرین ارسال: aghamali
  کد یافتن عدد در تکست باکس aghamali 0 69 07-09-2017، 04:00 PM
آخرین ارسال: aghamali
  سورس کدهای ویژوال بیسیک Amin_Mansouri 8 8,732 05-15-2017، 04:35 PM
آخرین ارسال: minarad69
  سورس کد شماره گیری از مودم (ویژوال بیسیک 6 ) Amin_Mansouri 1 4,147 05-07-2017، 06:54 PM
آخرین ارسال: alikorg
  جابجایی در لیست باکس aghamali 0 1,131 03-14-2016، 07:41 PM
آخرین ارسال: aghamali
  چگونه فایل exe با ویژوال بیسیک بسازیم ؟ Amin_Mansouri 4 9,304 08-13-2015، 10:08 PM
آخرین ارسال: Amin_Mansouri
  مشکل با ارور ویژوال بیسیک aghamali 4 3,804 07-03-2015، 11:14 AM
آخرین ارسال: aaaaaaaaa
  سورس کد کار با وب کم (ویژوال بسیک 6) Amin_Mansouri 1 5,968 04-20-2015، 10:10 PM
آخرین ارسال: hackert41389
  انتخاب رندوم از لیست باکس aghamali 0 1,035 04-16-2015، 06:30 AM
آخرین ارسال: aghamali
  مشکل با paste بیسیک 6 aghamali 1 1,479 01-18-2015، 08:53 PM
آخرین ارسال: aghamali

پرش به انجمن:


کاربران در حال بازدید این موضوع: 1 مهمان
This forum uses Lukasz Tkacz MyBB addons.