Visualizzazione dei risultati da 1 a 3 su 3
  1. #1

    vb net richiamo sub da form generico

    un saluto a tutti
    vi espongo un problema che non riesco a risolvere, fiducioso che
    qualcuno avra' voglia di aiutarmi
    ho diverse form ed in ciascuna ho sempre presente una sub
    con lo stesso nome ma che ovviamente fa cose diverse
    per richiamarla utilizzo una codice di questo tipo

    codice:
        Private Sub Sub1(ByVal _NomeForm As Form)
            If _NomeForm Is Form1 Then
                Form1.sub()
            ElseIf _NomeForm Is Form2 Then
                Form1.sub()
                .
                .
                .
            End If
        End Sub

    la domanda e' la seguente: esiste il modo di fare qualcosa del tipo
    codice:
        Private Sub Sub1(ByVal _NomeForm As Form)
            Dim NewForm as Form = _NomeForm
            _NomeForm.sub()
        End Sub

    tenendo conto che il form potrebbe anche essere in un progetto diverso

    spero di essere stato chiaro

  2. #2
    Non ho ben capito lo scopo di inserire in form diversi Sub con lo stesso nome che fanno cose diverse.

    Io le inserirei semplicemente come Sub pubbliche in un Modulo, chiamando ognuna in un modo diverso dall' altra, con un nome che si riferisca sinteticamente a quello che fanno.

    Così per richiamarle non è affatto necessario definire il Form che le contenga.

  3. #3
    Utente di HTML.it
    Registrato dal
    Jan 2011
    Messaggi
    237
    Quote Originariamente inviata da Luberto Mario Visualizza il messaggio
    un saluto a tutti
    vi espongo un problema che non riesco a risolvere, fiducioso che
    qualcuno avra' voglia di aiutarmi
    ho diverse form ed in ciascuna ho sempre presente una sub
    con lo stesso nome ma che ovviamente fa cose diverse
    per richiamarla utilizzo una codice di questo tipo

    codice:
        Private Sub Sub1(ByVal _NomeForm As Form)
            If _NomeForm Is Form1 Then
                Form1.sub()
            ElseIf _NomeForm Is Form2 Then
                Form1.sub()
                .
                .
                .
            End If
        End Sub

    la domanda e' la seguente: esiste il modo di fare qualcosa del tipo
    codice:
        Private Sub Sub1(ByVal _NomeForm As Form)
            Dim NewForm as Form = _NomeForm
            _NomeForm.sub()
        End Sub

    tenendo conto che il form potrebbe anche essere in un progetto diverso

    spero di essere stato chiaro
    Ciao
    Se sbaglio, i guru mi correggeranno ma ti direi.. dovresti usare le interfaccie.
    http://www.pierotofy.it/pages/guide/...Le_Interfacce/

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.