ولد ابوظبي
زيزوومي جديد
- إنضم
- 9 أغسطس 2009
- المشاركات
- 1,065
- مستوى التفاعل
- 5
- النقاط
- 0
- الإقامة
- الامارات العربية المتحدة
- الموقع الالكتروني
- avira2010.mousika.org
غير متصل
قم بمتابعة الفيديو أدناه لمعرفة كيفية تثبيت موقعنا كتطبيق ويب على الشاشة الرئيسية.
ملاحظة: قد لا تكون هذه الميزة متاحة في بعض المتصفحات.
ولاكني اريد رابط تحميل:er:
[RIGHT]Private Sub TextEV1_KeyPress(ByVal sender As Object, _
ByVal e As KeyPressEventArgs) Handles TextBox1.KeyPress
If e.KeyChar = CChar("r") Then e.Handled = True
End Sub[/RIGHT]
[RIGHT]If e.KeyChar = CChar("r") Then e.Handled = True[/RIGHT]
[RIGHT]Private Sub TextEV2_KeyPress(ByVal sender As Object, _
ByVal e As KeyPressEventArgs) Handles TextBox2.KeyPress
If Char.IsNumber(e.KeyChar) Then e.Handled = True
End Sub[/RIGHT]
[RIGHT]Private Sub TextEV3_KeyPress(ByVal sender As Object, _
ByVal e As KeyPressEventArgs) Handles TextBox3.KeyPress
If Char.IsNumber(e.KeyChar) = False Then e.Handled = True
End Sub[/RIGHT]
[RIGHT]Private Sub TextEV4_KeyPress(ByVal sender As Object, _
ByVal e As KeyPressEventArgs) Handles TextBox4.KeyPress
If Char.IsLetter(e.KeyChar) = False Then e.Handled = True
End Sub[/RIGHT]
[RIGHT]Private Sub TextEV5_KeyPress(ByVal sender As Object, _
ByVal e As KeyPressEventArgs) Handles TextBox5.KeyPress
If Char.IsLetter(e.KeyChar) Then e.Handled = True[/RIGHT]
[RIGHT]Private Sub TextEV6_KeyPress(ByVal sender As Object, _
ByVal e As KeyPressEventArgs) Handles TextBox6.KeyPress
If Char.IsLetterOrDigit(e.KeyChar) = False Then e.Handled = True
End Sub[/RIGHT]
[RIGHT]Private Sub TextEV7_KeyPress(ByVal sender As Object, _
ByVal e As KeyPressEventArgs) _
Handles TextBox7.KeyPress
If Char.IsNumber(e.KeyChar) = False Then
If e.KeyChar = CChar(".") Then
e.Handled = False
Else
e.Handled = True
End If
End If
End Sub[/RIGHT]
[RIGHT]Private Sub TextEV7_KeyPress(ByVal sender As Object, _
ByVal e As KeyPressEventArgs) _
Handles TextBox7.KeyPress
If Char.IsNumber(e.KeyChar) = False Then
If e.KeyChar = CChar(".") Or e.KeyChar = CChar _
("-") Or e.KeyChar = CChar("+") Then
e.Handled = False
Else
e.Handled = True
End If
End If
End Sub[/RIGHT]
[RIGHT]Private Sub TextEV8_KeyPress(ByVal sender As System.Object, _
ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles _
TextBox8.KeyPress, TextBox9.KeyPress, TextBox10.KeyPress
If Char.IsNumber(e.KeyChar) = False Then e.Handled = True
End Sub[/RIGHT]
[RIGHT]Private Sub TextEV9_KeyPress(ByVal sender As Object, _
ByVal e As KeyPressEventArgs) Handles TextBox11.KeyPress
If Char.IsLower(e.KeyChar) Then e.Handled = True
End Sub[/RIGHT]
[RIGHT]Private Sub TextEV10_KeyPress(ByVal sender As Object, _
ByVal e As KeyPressEventArgs) Handles TextBox12.KeyPress
If Char.IsLower(e.KeyChar) = False Then e.Handled = True
End Sub[/RIGHT]
السلام عليكم اريد طرح سؤال لقد قمت بتحميل
visual web developper 2008
ولكن عند فتح لهذا البرنامج لم اجد قسما للديزاين ولم اجد صندوق الادوات الذي يحمل اشكال لصناعة الصفحة هل يعني ذلك ان التحميل غير كامل او ماذا افيدوني شكرا.
شكرا على حسن المتابعة ولكني فعلت ذلك قبل ان ارسل تلك الرسائل شكرا لك هل يمكن ان اسألك عن برنامج :q:اذا ماكان في ازعاج بما أنني سأمت من ذلك البرنامج وجدت برنامج أخر اسمه واب ماتريكس فهل لديك خبرة في استخدام هذا البرنامج:er:اهاا:q:
لاظهار الادوات اعمل الاتي :-
- قائمة view
- اختر toolbox
شكرا على حسن المتابعة ولكني فعلت ذلك قبل ان ارسل تلك الرسائل شكرا لك هل يمكن ان اسألك عن برنامج :q:اذا ماكان في ازعاج بما أنني سأمت من ذلك البرنامج وجدت برنامج أخر اسمه واب ماتريكس فهل لديك خبرة في استخدام هذا البرنامج:er: