ایجاد اشیا مانند Label و CheckBox در هنگام اجرای برنامه ساخته شده

[alireza_s22]

سلام . می خوام هنگامی که برنامه رو ساختم و دارم اجرا می کنم اشیاءی مانند Label و CheckBox رو با زدن یک دکمه داخل برنامه بسازم و خصوصیاتش هم درون برنامه تغییر بدم:خجالت:

[mostafa_golden]

سلام . می خوام هنگامی که برنامه رو ساختم و دارم اجرا می کنم اشیاءی مانند Label و CheckBox رو با زدن یک دکمه داخل برنامه بسازم و خصوصیاتش هم درون برنامه تغییر بدم:خجالت:

سلام دوست عزیز

شما باید برنامه نویسی شی گرا بلد باشید مثل برای یک کنترل یک کلاس بنویسید . البته تا جایی که من میدانم . :متفکر:

[dataking]

سلام
Dim TextBox1 As New TextBox()
With TextBox1
.Location = New Point(64, 40)
.Size = New Size(100, 20)
.TabIndex = 0
.Text = "TextBox1"
End With
Controls.Add(TextBox1)

تو دات نت کار میکنه تو
وی بی 6 امتحان نکردم اگه نشد بگو تا مشکلتو حل کنم

[dataking]

فقط به جای تکس باکس نوع کنترلت را بنویس

[mostafa_golden]

فقط به جای تکس باکس نوع کنترلت را بنویس


سلام دوستان من این کارو کردم این پیغام رو داد.:متفکر:

Run-time error '91':
Object variable or With block variable not set


Dim CommandButton1 As VB.CommandButton
With CommandButton1
.Caption = "Command1L"
.Height = 735
.Left = 1920
.TabIndex = 0
.Top = 960
.Width = 1575
End With

[alireza_s22]

سلام دوستان کار نکردن و Error میده لطفا کمکم کنید شدیدا نیاز دارم:افسرده:

[butterfly8528]

سلام دوستان عزیز .


Option Explicit

Dim WithEvents cmdTest As VB.CommandButton
Dim WithEvents chkTest As VB.CheckBox

Private Sub Form_Load()
Set cmdTest = Controls.Add("VB.CommandButton", "cmdTest", Me)
cmdTest.Move 100, 100
cmdTest.Caption = "Click Me"
cmdTest.Visible = True

Set chkTest = Controls.Add("VB.CheckBox", "chkTest", Me)
chkTest.Move 100, 1000
chkTest.Caption = "Click Me"
chkTest.Visible = True
End Sub

Private Sub cmdTest_Click()
MsgBox "ArshamSoft"
End Sub

Private Sub chkTest_Click()
MsgBox "ArshamSoft"
End Sub
موفق باشید .

[xxxxx_xxxxx]

پیش از ایجاد تاپیک جستجو کنید. در همه تاپیک های زیر مورد همین موضوع بحث شده.

ايجاد text box (http://barnamenevis.org/forum/showthread.php?t=213180)
ساختن کنترل با کد (http://barnamenevis.org/forum/showthread.php?t=40667)
ساخت کنترل آرایه ای در هنگام اجرای برنامه (http://barnamenevis.org/forum/showthread.php?t=172605)
ايجاد اشياء هنگام run time (http://barnamenevis.org/forum/showthread.php?t=168314)
ساخت شی جدید (http://barnamenevis.org/forum/showthread.php?t=200945)
ایجادیک شی درزمانRuntime بروی فرمی غیرازفرم جاری؟ (http://barnamenevis.org/forum/showthread.php?t=80284)
ایجاد یک کنترل در زمان اجرا (http://barnamenevis.org/forum/showthread.php?t=9188)
تکنیکهای VB (http://barnamenevis.org/forum/showthread.php?t=1391)
ساختن object های vb6 به تعداد دلخواه (http://barnamenevis.org/forum/showthread.php?t=1163)

تاپیک قفل شد.