منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
مساعده بطريقة انشاء كائن عبر الاكواد او انشاء تكست بوكس او ليبل عبر الاكواد - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : مساعده بطريقة انشاء كائن عبر الاكواد او انشاء تكست بوكس او ليبل عبر الاكواد (/showthread.php?tid=7085)



مساعده بطريقة انشاء كائن عبر الاكواد او انشاء تكست بوكس او ليبل عبر الاكواد - the viper - 22-11-12

اريد طريقة انشاء كائن عبر الاكواد او انشاء تكست بوكس او ليبل عبر الاكواد

او انشاء كومندا او اي شي اخر عبر الاكواد مع المثال لو سمحتوا

وراح اكون شاكر لكم



مساعده بطريقة انشاء كائن عبر الاكواد او انشاء تكست بوكس او ليبل عبر الاكواد - 3amo - 22-11-12

السلام عليكم ورحمة الله
تفضل اخيCool
انشاء كائن تكست بوكس و انشاء كومند عبر الاكواد
PHP كود :
Option Explicit
Private WithEvents btnObj As CommandButton
Private WithEvents txtObj As TextBox
    
    
Private Sub btnObj_Click()
    
On Error Resume Next
    Set txtObj 
Controls.Add("VB.textbox""txtObj")
    
With txtObj
        
.Visible True
        
.RightToLeft True
        
.Alignment 2
        
.Width 2000
        
.Text "ÇáÓáÇã Úáíßã"
        
.Top 2000
        
.Left 1000
    End With
End Sub
    
Private Sub Form_Load()
    
Set btnObj Controls.Add("VB.CommandButton""btnObj")
    
With btnObj
        
.Visible True
        
.Width 2000
        
.Caption "Click"
        
.Top 1000
        
.Left 1000
    End With
End Sub 



مساعده بطريقة انشاء كائن عبر الاكواد او انشاء تكست بوكس او ليبل عبر الاكواد - the viper - 23-11-12

جزاك الله خير اخي الكريم



ممكن طلب اريد ان اعرف عن انواع المتغيرات

فاريد مثال عن متغير single
ومثال عن متغير double
ومثال عن متغير currency وهذا يكون تحويل العملات
ومثال عن متغيرvariant


وشكرا