Help VB.NET > Public - dim - private array form

salam
daram ru ye soft kar mikonam ke to ye jash be moshkel bar khordam
mikham 50 form az noe arraye ro tarif konam to GENERAL (hamun 1khat paein tar az public class form)

ama be moshkel bar khordam
in code haro ke mizaram kar nemidan error mide va mige arraye nemishe be onvane new azash estefade kard:
public ch(50) as form3 = new form3
ya
public ch(50) as new form3

hala mishe be jaye public , private ya dim estefade kard vali bazam error mide
vali to vb6 in error rokh nemide va kar mikone!

tavajoh dashte bashid ke nemikham form haro intori tarif konam:
public ch(50) as form3
va bad beram to sub va be halate new tabdilesh konam
ch(integer) = new form3

mikham hamash to hamun aval to qesmate general karo yeksare konam (dalil daram vase kardam)

kesi rahi dare?
mc

man motewaje manzuret nashodam khod zani

wali az in use kn
form4 frm = new form(50)

age in nabud bishtr tozih bde Very Happy

ya age kasi midune j bdeeeeeeeeeeeeeeee

mosi in chie namusan ke dadi

man tuye softam ehtiaj be 50 Form yeksan daram
form ha ham bayad be surate arraye bashan (hamin ke tu paranteze: ch(50) )

mikham form ha hamun to qesmate general sakhte beshan.nemikham to sub as new tarifeshun konam
codesh ine:
dim ch(50) as form3 = new form3
in code tuye vb6 kar mide ama to vb.net error mide

migam rahi dige hast ke in karo anjam bedaM?
tnx bro

pas hamine k man dadam

tu C# mishe
from3 frm = new from3[50]

fk knam tu vb ham mishe hamini k bala dadam

ino tu general minevisi
bad tu eventet form o tolid mkni

frm = new form3(5)

mikhasy emt kn
ba y button masalan form3(0) o baz kn bbin mishe ya na

m0si khube goftam ke nemikham to eventa tarif konam
mikham to general kar yeksare kone

Chun vaqti ke to event tarif knim form yekbar show mishe.dafe bad dge baz nemishe arrayash null mishe

to ro nmidunam chera javab nmigiri Very Happy

man ba hamin rawesh multi form neveshtema
manzurto grftam chi migi
fk knam javbetam hamin bashe

dg nmidunam football

manam daqiqan baraye multi form mikham!

shayad c# qaziash farq dashte bashe

dar kol to vb.net:
age form ro tarif kni to general va to yeki az eventa new vasash bezani

bad az inke form show shod age baste she hamun arraye marbut be formemun
masalan ch(sh0mare 15) null mishe va age show ro baraye bare dovom bezani , errore null mide!
vase khodamam ajib bud mituni test k.o.n.i

Quote :

ta jai ke man midunam kheyr . emkan nadare tu general be onvane new tarifesh k.o.n.i va dg nakhad renew k.o.n.i
c# vb fargh nadaran vaghti ye arraye az form misazi va forme morede nzar close beshe dispose mishe va dg nemituni az forme close shode use k.o.n.i vase etesal formha ye topic bahs shod . fek konam moshkelet hamine ke form ke close mishe arrayat itemesh formesh disposede va rahe halet ine
ye sub benevis generat
formaye morede nzareto tush new k.o.n
tu formloadet generate ro call k.o.n
harja khasti az yeki az formaye arrayat use k.o.n.i ham generate ro call k.o.n vase formaye dispos shode tu codaye zir tu bottunclick generat ro var dari soft bug mide vali alan ba genrate har formi harchand bar close beshe ba generat baz ye new jasho tu arrayat migire

Code:: Dim f(50) As Form2
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
generat()
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
generat()
f(Convert.ToInt32(TextBox1.Text)).Show() ' tu textbox1 formi ke mikhay show she ro typ k.o.n
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub
Public Sub generat()
Try
For i = 0 To 50
If f(i) Is Nothing OrElse f(i).IsDisposed Then ' nothing vase dafe aval ke mizani new misaze vaghti ye form close she dispose mishe va dg nemituni azash use k.o.n.i vase hamin baz renew mikonimesh formio ke dispos shode
f(i) = New Form2
f(i).Text = i.ToString
End If
Next i
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub

vase4 in kar 2rahe hal b zehnam mirese...

yeki hamin k dostan goftan...faqat vase in k dispose nashi forme aslito hamishe active bzar...age nmikhay dide she hide k.o.n vali active bashe...

masalan in code zire ye formo create mkone k ba ye button toshe...

Code:: system.object,byval e as system.eventargs)handles _
btnmakeform.click
dim frm as new form
frm.size=new size(300, 200)
frm.text="mdm"
dim btn as new button
btn.text="maziar"
btn.size=new size(100, 30)
btn.location = new point( _
(frm.clientsize.width-btn.width) / 2, _
(frm.clientsize.height-btn.height)/2)
addhandler btn.click, addressof btn_click
frm.controls.add(btn)
frm.show()

ye rahe dgam ine k bshini ye formo designe k.o.n.i... bad code designershon to ye halqe bzari ta n bar vasat tekraresh kone...

» help dar bareye array
» Freebuzz dc killer v2.1 expert (public)
» rahnamaei private bot (vb6)
» private dc mobile
» darkhaste softe Private Bot