bonjour
j'ai créer une fonction VB la suivante je veux placer cette fonction en dehors de la form qui inclus les textbox et les combobox je veux la déclarer dans un module qu'il est la procédure d'exploite les combobox dans une fonction placé dans un module?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
    Public function CCresult()
        Dim a(6), b(6) As Char
        a = ComboBox9.SelectedItem
        b = ComboBox11.SelectedItem
        s0(0) = App.Bus.GetSignal(c, b + "C1_All_CCResult_" + a + d, "DU1_CC")
        s0(1) = App.Bus.GetSignal(c, b + "C1_All_CCResult_" + a + d, "DU1_Database_CC")
        s0(2) = App.Bus.GetSignal(c, b + "C1_All_CCResult_" + a + d, "DU1_Download_CC")
        s0(3) = App.Bus.GetSignal(c, b + "C1_All_CCResult_" + a + d, "DU2_CC")
        s0(4) = App.Bus.GetSignal(c, b + "C1_All_CCResult_" + a + d, "DU2_Database_CC")
        s0(5) = App.Bus.GetSignal(c, b + "C1_All_CCResult_" + a + d, "DU1_Download_CC")
        TextBox13.Text = s0(0).Value
        TextBox1.Text = s0(3).Value
        TextBox2.Text = s0(1).Value
        TextBox3.Text = s0(4).Value
        TextBox4.Text = s0(2).Value
        TextBox9.Text = s0(5).Value
 
    End function