๐Ÿš€ go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: free.it.visual-basic
Article #1722

Non so dove mettere l'array!

#1722
From: Deborah
Date: Wed, 25 Feb 2004 13:07
75 lines
3138 bytes
Nella classe impiegato ho
Nome
Cognome
ID Aziendale
-.....-
VariabilePaga

quindi:


Private mstrNome as String
Private mstrCognome as String
Private mstrIDAziendale as Integer
Private mstrVariabilePaga as Single
-----------------------------------------------------------------
Public Property Let Nome(ByVal vNewValue As String)
mstrNome = Nome
End Property
-----------------------------------------------------------------
Public Property Get Nome() As String
Nome= mstrNome
End Property
-----------------------------------------------------------------
Public Property Let Cognome(ByVal vNewValue As String)
mstrCognome = Cognome
End Property
-----------------------------------------------------------------
Public Property Get Cognome() As String
Cognome= mstrCognome
End Property
-----------------------------------------------------------------
Public Property Let IDAziendale(ByVal vNewValue As Integer)
mstrIDAziendale = IDAziendale
End Property
-----------------------------------------------------------------
Public Property Get IDAziendale() As Integer
IDAziendale= mstrIDAziendale
End Property
-----------------------------------------------------------------


Ora arriva il dubbio
La VariabilePaga dipender๏ฟฝ dalle scelte che l'utente fa nel FormProfilo.

 intColonna = frmProfilo.cboPosizioneLavorativa.ListIndex
 intRiga = frmProfilo.cboGiorniLavorati.ListIndex

 VariabilePaga = mstrVariabilePaga (intRiga, intColonna)


La matrice la devo mettere dentro la PropertyGet della VariabilePaga?
E' giusto come ho scritto qui sotto?


Public Property Let VariabilePaga(ByVal vNewValue As Single)
mstrVariabilePaga = VariabilePaga
End Property
-----------------------------------------------------------------
Public Property Get VariabilePaga() As Single
VariabilePaga= mstrVariabilePaga
  mstrVariabilePaga (0, 0) = 0
  mstrVariabilePaga (0, 1) = 12.25
  mstrVariabilePaga (0, 2) = 7.28
  mstrVariabilePaga (1, 0) = 0
  mstrVariabilePaga (1, 1) = 13.74
  mstrVariabilePaga (0, 2) = 9.54
End Property
-----------------------------------------------------------------






Debby -----)@
Technical Details
Message-ID: <e61%b.585$mt1.290@tornado.fastwebnet.it>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news2.google.com!news.maxwell.syr.edu!tiscali!newsfeed1.ip.tiscali.net!tornado.fastwebnet.it!53ab2750!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: ITALIAN,ASCII
X-Google-Thread: f94ee,3c9aee1441d72c90,start
X-Google-Attributes: gidf94ee,public
X-Google-ArrivalTime: 2004-02-25 05:07:22 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news2.google.com!news.maxwell.syr.edu!tiscali!newsfeed1.ip.tiscali.net!tornado.fastwebnet.it!53ab2750!not-for-mail
Reply-To: "Deborah" <deborah_1973NOSPAM@hotmail.com>
From: "Deborah" <deborah_1973NOSPAM@hotmail.com>
Newsgroups: free.it.visual-basic
Subject: Non so dove mettere l'array!
Lines: 78
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1158
X-MIMEOLE: Produced By Microsoft MimeOLE V6.00.2800.1165
Message-ID: <e61%b.585$mt1.290@tornado.fastwebnet.it>
Date: Wed, 25 Feb 2004 14:07:18 +0100
NNTP-Posting-Host: 23.254.99.33
X-Complaints-To: newsmaster@fastweb.it
X-Trace: tornado.fastwebnet.it 1077714442 23.254.99.33 (Wed, 25 Feb 2004 14:07:22 MET)
NNTP-Posting-Date: Wed, 25 Feb 2004 14:07:22 MET