Newsgroup: it.comp.lang.visual-basic
Titolo: Help per apertura nuova form da selezione in Flex Grid

Ciao a tutti...eccomi di nuovo qua...! :-)
si parla sempre del db di cui qualche post prima! :-)
Superati i prob di connessione...a oparte ancora qualche litigio con alcuni
campi della tabella...sorge un nuovo prob..
ottenuti i dati e piazzati in un flex grid...dal click su di una riga..devo
ottenere dei dati da altre tabelle in base al codice che e' nel flex grid
stesso..
anzitutto come lo ottengo? uso levento  _click e seleziono la colonna per es 1
in base alla riga su cui faccio il click o sbaglio?
Credo sia cosi...correggetemi se sbaglio....
Quello che vorrei fare  poi e' aprire una nuova form che abbia solo un flex
grid e un pulsante di chiusura e che contenga i nuovi dati.
Il mio prob..come faccio a " passare" alla nuova form il codice da
ricercare????
-- 
Posted from 
www.spectec.it
 [213.26.104.98] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ricercare????
Qua non mi sono spiegatio benissimo....volevo dire..che devo fare? mattere il
codice che ottengo in una variabile? Ma poi questa variabile come la "passo "
nella nuova form?
Oppure conviene che faccia la ricerca sotto l'evento click del pulsante che mi
deve
aprire la nuova form...? Ma se faccio cosi'..devo passare alla nuova form o
tutti i dati che ottengo...
oppure l'intera flex grid piena di dati! :-(
Boh.? Help please!


 ha scritto nel messaggio
news:896047f0b11e76c37a8...@mygate.mailgate.org...


 sono anche io un newbie. :-))
Bene....nmeglio aiutarsi a vicenda allora! :-))))
mm....con l'evento click come mi hai detto tu..riesco ad ottenere il
codice....e quindi un passo e' sistemato..
invece non riesco cmq a "passare" il codice che ottnego alla nuova form! :-(
In ogni caso quando mi va a fare la select...vede la variabile cmq vuota! E la
ho dichiarata globale..!
Non so che pesci prendere cavoletti di Bruxelles!! :-(


Puoi postare il codice?


 
Private Sub LstDesc_Click()
LstDesc.Col = 1
cod1 = LstDesc.Text
End Sub
Con questo attribuisco alla variabile il valore della colonna 1..e fin qua ci
siamo!Tieni presente che
cod1, intero..e' dichiarato globale...
poi...in un pulsante a parte..richiamo la nuova form..che ha questo codice...
Tralscio la creazione del flex grid..
Dim ConProva As ADODB.Connection
Dim RstProva As ADODB.Recordset
Set ConProva = New ADODB.Connection
Set RstProva = New ADODB.Recordset
Dim StringaConn As String
StringaConn = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security
Info=False;Data Source=C:\Prova.mdb"
ConProva.Open StringaConn
RstProva.Open "Select * from tabdoin  WHERE codeid3 like '*" & cod1 & "*' order
by codeid3;", ConProva
 With RstProva
        Do While Not .EOF
                FgxIn.AddItem vbTab & !Codeid3 & vbTab & !Description & vbTab &
!Traduzione
                .MoveNext
                If IsNull(RstProva) Then
                 MsgBox "Nessun valore trovato"
                 Exit Sub
                 End If
        Loop
End With
 
RstProva.Close
ConProva.Close
il cod1 rimane nullo.....anzi..empty...! :-(


 wrote:
Nella nuova form creati un metodo con il quale passi la variable, es:
******** codice di NuovaForm *******
dim cod1 as text		' dichiara variabile golobale nella form
public sub passacodice( byval codice as text )
	cod1 = codice
end sub
private sub form_load( )
	' qui ti apri il record set prendendo come argomento
	' cod1
	' poi ti disegni come ti pare la griglia
end sub
******* fine Nuova Form ******
per passare il valore dalla form1 alla NuovaForm fai cosi
****** codice di Form1 ********
Private Sub cmdApriNuovaForm_click()
	NuovaForm.passacodice(  flexgrid.TextMatrix(flexgrid.Row,
colonna_che_ti_pare)
	NuovaForm.show
end sub
***** fine codice Form1 ********


 ***** fine codice Form1 ********
Grazie mille!!!!!! :-)))

 
Qua invece....mi riferisco a quello che gli passi tra parentesi....al posto id
flexgrid metto il nome del mio flexgrid..ma quello della vecchia form?
Cioe' praticamente iol riferimento a dove prendere il valore?



flexgrid e' propio il nome che ho dato al controllo,ovvero nella form
principale (Form1) ho un controllo mshflexgrid che si chiama flexgrid.
flexgrid si trova nella form principale, con
flexgrid.Textmatrix(flexgrid.Row, colonna_che_ti_pare)
passi il contenuto della cella posizionata sulla colona che vuoi tu della
riga corrente, al metodo passacodice della NuovaForm.
Spero di essermi spiegato.
Ciao, alla prossima