[VB.NET] Traduzione di codice C# in VB.NET

[lelo]

come posso 'tradurre' il rigo, scritto in C#:

pen.DashPattern = new float [] {3, 1};

in Visual Basic??

ancora...
this (di C#) corrisponde a Me (di VB) ??? Giusto???
mentre base (di C#) come cambia in VB???

[MItaly]

Originariamente inviato da lelo
come posso 'tradurre' il rigo, scritto in C#:

pen.DashPattern = new float [] {3, 1};

in Visual Basic??

pen.DashPattern = new Single() {3, 1};

ancora...
this (di C#) corrisponde a Me (di VB) ??? Giusto???

Sì.

mentre base (di C#) come cambia in VB???

MyBase.

[lelo]

posso chiedere come trasformare anche:

      colorTemp.SetValue(color.MakeARGB(
         (BYTE)(255 * iColumn / iWidth), 
         color.GetRed(),
         color.GetGreen(),
         color.GetBlue()));

con:
Dim color, colorTemp As Color

[giorgiogio48]

Se intendi Vb.net e non VB6 qui c'è un sito dove si trasforma da C# in VB.net: http://authors.aspalliance.com/aldot...translate.aspx

[oregon]

Anche perche' un thread non puo' essere una "chat per le traduzioni" ...

[MItaly]

      colorTemp.SetValue(color.MakeARGB(
         CByte(255 * iColumn / iWidth), 
         color.GetRed(),
         color.GetGreen(),
         color.GetBlue()));

Dim color, colorTemp As Color

Occhio... le dichiarazioni delle variabili non sono come in C#, in questo modo dichiari color come Object e colorTemp come Color... la dichiarazione esatta è

Dim color As Color, colorTemp As Color

(anche se personalmente eviterei di chiamare una variabile "color", perché, non essendo VB.NET case-sensitive, si rischia di confonderlo con System.Drawing.Color).
Onde evitare errori di questo genere (e non solo) aggiungi all'inizio di ogni file

Option Strict
Option Explicit

.

[dwb]

Originariamente inviato da lelo
posso chiedere come trasformare anche:

      colorTemp.SetValue(color.MakeARGB(
         (BYTE)(255 * iColumn / iWidth), 
         color.GetRed(),
         color.GetGreen(),
         color.GetBlue()));

con:
Dim color, colorTemp As Color

In VB.NET:

colorTemp.SetValue(color.MakeARGB(CType(255 * iColumn / iWidth, [BYTE]), color.GetRed(), color.GetGreen(), color.GetBlue()))

[lelo]

intanto grazie per la dritta del sito...non lo conoscevo, altrimenti non avrei DISTURBATO!!

cmq anche a me traduce con:

colorTemp.SetValue(color.MakeARGB(CType(255 * iColumn / iWidth, [BYTE]),  _
color.GetRed(),  _
color.GetGreen(),  _
color.GetBlue()))

ma, escludendo l'ovvio errore: CType(255 * iColumn / iWidth, [BYTE]) al quale basta eliminare le [], ma
color.GetRed(), ... non esistono, sostituiti con color.R() .... ect..
MakeARGB(...) non esiste e credo che quello relativo sia: FromArgb(...)
ma il mio problema è:
colorTemp.SetValue(....) :master:

[MItaly]

      colorTemp=Color.FromArgb(
         CByte(255 * iColumn / iWidth), 
         color.R,
         color.G,
         color.B);

Ma in ogni caso le differenze tra C# e VB.NET, almeno in questi frammenti di codice, sono puramente sintattiche... se SetValue o le varie Getxxxxx non esistono in VB.NET vorrà dire che non esistono neanche in C#, perché entrambi i linguaggi si appoggiano al medesimo Framework...

[lelo]

grazie per la risposta, sinceramente speravo che mi dicessi qualcosa di diverso da quello che avevo fatto io:

colorTemp = Drawing.Color.FromArgb(CType(255 * ((iHeight - iRow) / iHeight) ^ 3.5, Byte), _
                                        colorPx.R(), _
                                        colorPx.G(), _
                                        colorPx.B())

poichè, il rigo fa parte di un processo per sfumare un'immagine, si viene a creare un fastidioso e antiestetico sfondo di colore nero!!!
Nota: l'elevazione a potenza (3.5) serve per non rendere costante la sfumatura...infatti così il parametro alpha tende a conparire verso la fine.