[the viper]

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

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

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

[3amo]

السلام عليكم ورحمة الله
تفضل اخي
انشاء كائن تكست بوكس و انشاء كومند عبر الاكواد

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]

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



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

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


وشكرا