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

    assegnazione modifica variabili!

    ho scritto questo codice per il mio programma uando una structure:
    Public agio(0 To 19), agio2(0 To 19), agi As ragio
    Public numgiocatori As Integer = 0
    Public a, b As Integer
    Public str(0 To 20) As String

    Structure ragio
    Public cognome As String
    Public nome As String
    Public cap As Boolean
    Public nmaglia As Integer
    Public ruolo1 As String
    Public ruolo2 As String
    Public datan As Date
    Public via As String
    Public nc As Integer
    Public località As String
    Public ntel As String
    Public cel As String
    Public email As String
    Public datatess As Date
    Public ntess As String
    Public note As String
    Public esiste As Boolean
    End Structure


    Private Sub Applica_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Applica.Click
    For a = 0 To numgiocatori
    str(a) = ListBox2.Items.Item(a).ToString
    Next
    ListBox2.Sorted = True
    For a = 0 To numgiocatori
    For b = 0 To numgiocatori
    If ListBox2.Items.Item(a).ToString = str(b) Then
    agio2(a) = agio(b)
    End If
    Next
    Next
    agio = agio2
    end sub


    ma la riga
    agio2(a) = agio(b)
    mi cambia i valori sia della struttura agio2(a), sia di agio2(b)... com'è possibile?

  2. #2
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    24,472

    Moderazione

    Indica il linguaggio nel titolo, come da Regolamento, e racchiudi il codice tra i "tag" CODE (pulsante #) in modo che sia leggibile.
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

    Home | Blog | Delphi Podcast | Twitch | Altro...

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.