Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]


Groups > it.comp.programmare > #85

Probl: Insieme di Variabili, 1 da prendere se.

From "Ettore" <ettor50@nomail.com>
Newsgroups it.comp.programmare
Subject Probl: Insieme di Variabili, 1 da prendere se.
Date 2018-06-10 10:07 +0200
Organization A noiseless patient Spider
Message-ID <pfim7p$t2i$1@dont-email.me> (permalink)

Show all headers | View raw


Buongiorno a tutti voi e buona domenica.
Sto trasferendo in VB.NET Visual Studio 2017, parte dei calcoli che ho in excel.
Ho questo algoritmo "Lettera Domenicale"
=SE(Anno<1600;"n/a";SE(Anno>=10000;"outdate";( 
(CERCA.VERT((RESTO(Anno+8;28)+1);Tavola1!M133:N160;2)))))

HO UNA TAVOLA M133:N160 Questa sotto.
============================================
Numero solare e Lettera Domenicale
n°sol    LettD
1    FE
2    D
3    C
4    B
5    AG
6    F
7    E
8    D
9    CB
10    A
11    G
12    F
13    ED
14    C
15    B
16    A
17    GF
18    E
19    D
20    C
21    BA
22    G
23    F
24    E
25    DC
26    B
27    A
28    G
============================================
Traslandola in VB.NET ho iniziato scrivendo

If (Anno < 1600 Or >1000) Then
letdom = "Outdate"

Come posso proseguire perche' mi accorgo che sono ben 28 dati .E non so come gestirmeli.
GRAZIE.

PS il " (RESTO(Anno+8;28) " diventa
((Anno+8) Mod 28)+1 

Back to it.comp.programmare | Previous | Next | Find similar


Thread

Probl: Insieme di Variabili, 1 da prendere se. "Ettore" <ettor50@nomail.com> - 2018-06-10 10:07 +0200

csiph-web