PDA

View Full Version : مبتدی: سوال ساده در مورد کی برس



AmiRReZzZzA
جمعه 27 مرداد 1391, 17:22 عصر
سلام دوستان من مبخوام تو فرمم وقتی مثلا 1 دکمه مثل "R" رو زدیم 1 msgbox بیاد ... مرسی
اینم یکی از ازمایشای خودم که جواب نداد :لبخند:
If (e.KeyChar = "r") Then
MsgBox("kar mikone ")

JaVa
جمعه 27 مرداد 1391, 17:30 عصر
سلام و...




Public Class Form1

Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
If e.KeyCode = Keys.R Then
MsgBox("error")
End If
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.KeyPreview = True
End Sub
End Class



موفق باشین.*

AmiRReZzZzA
جمعه 27 مرداد 1391, 17:32 عصر
مرسی u2

JaVa
جمعه 27 مرداد 1391, 18:00 عصر
سلام و...

قانون شماره 17 (http://barnamenevis.org/showthread.php?51814-%D9%82%D9%88%D8%A7%D9%86%DB%8C%D9%86-%DA%A9%D9%84%DB%8C-%D8%B3%D8%A7%DB%8C%D8%AA) رو بخون