vb.net - dim ? - Udvikleren.dk - Programmering, webdesign og grafik

Tags: vb.net

Bruger #3427 @ 12.07.08 21:31

Simpelt problem:

Kode

   Public Sub test()

        If 1 = 2 Then
            Dim a As String = "string"
        Else
            Dim a As Integer = 3
        End If

        Debug.WriteLine(a)

    End Sub

hvordan kan det være man ikke kan "dimme"/oprette variabler i en if ?

edit:
har fundet en løsning på problemet, men vil gerne vide hvorfor man ikke kan oprette en variable sådan ?

Indlæg senest redigeret d. 12.07.2008 23:35 af Bruger #3427

9 svar postet i denne tråd vises herunder
2 indlæg har modtaget i alt 2 karma

Sorter efter stemmer Sorter efter dato

Bruger #10718 @ 13.07.08 14:11

Det som der menes er at fordi du erklærer din variabel inde i din IF sætning, kan du kun bruge den inden for den If sætning.

Hvis du erkærer den før if sætningen, og blot giver den en værdi i if sætningen kan du bruge den i hele funktionen.

Har lavet et lille eksempel her:

Kode

 Public Sub test()

        Dim a As String = ""

        If 1 = 2 Then
             a = "string"
        Else
            a = "3"
        End If

        Debug.WriteLine(a)

    End Sub

Nu er jeg ikke VB mand, men dette burde vist virke

Bruger #12836 @ 14.07.08 08:50

857

Hej Kenneth,

Sikke dog noget SJUSK som du skriver i den sidste kode box...

Kode

dim b
 Public Sub test()

        If 1 = 2 Then
            Dim a As String = "string"
            b = a
        Else
            Dim a As Integer = 3
            b = a
        End If

        Debug.WriteLine(b)

    End Sub

dim b, skal erklæres i funktionen, med mindre du skal bruge den i andre funktioner.

Dim a As String/Integer - Det er SJUSK at bruge det sammen variabelnavn til forskellige typer.

Der er ingen grund til at erklære a.

Tag Sunes kode istedet.

Med venlig hilsen
Ieet

Bruger #2330 @ 13.07.08 09:59

444

Almindeligvis ville du godt kunne oprette variablen, men i et hvert sane programmeringssprog er variabler kun tilstede i det scope de bliver erklæret i, samt alle scopes derunder. Da indholdet af If sætningen er et nyt scope, vil "a" variablen ikke være til stede i funktionens scope, kun i If sætningens.

Bruger #3427 @ 13.07.08 13:54

1.520

Almindeligvis ville du godt kunne oprette variablen, men i et hvert sane programmeringssprog er variabler kun tilstede i det scope de bliver erklæret i, samt alle scopes derunder. Da indholdet af If sætningen er et nyt scope, vil "a" variablen ikke være til stede i funktionens scope, kun i If sætningens.

ja, jeg lavet det sådan her:

Kode

dim b

 Public Sub test()

        If 1 = 2 Then
            Dim a As String = "string"
            b = a
        Else
            Dim a As Integer = 3
            b = a
        End If

        Debug.WriteLine(b)

    End Sub

syndes bare det er lidt fusk.. =/

Bruger #2330 @ 13.07.08 14:04

444

Såvidt jeg ved kan du godt sætte din "dim b" ind i funktionen, så den er i starten af funktionen. Det sagt har jeg ikke programmet i VB, så jeg ved det ikke med sikkerhed.

Bruger #3427 @ 14.07.08 21:30

1.520

Kode

If SSL Then
            Dim pop3Stream As SslStream
            pop3Stream = New SslStream(serverTcpConnection.GetStream(), False)
            pop3Stream.AuthenticateAsClient(Host)
            pop3StreamReader = New StreamReader(pop3Stream)
        Else
            Dim pop3Stream As Stream
            pop3Stream = serverTcpConnection.GetStream()
            pop3StreamReader = New StreamReader(pop3Stream)
        End If

ect, her kan jeg ikke sætte dim pop3Stream uden for ifen da den skal være Stream eller SslStream, og når den er sat inde i ifen, kan den ikke bruges uden for ifen så..

og den skal jo self kunne bruges uden for ifen

Indlæg senest redigeret d. 14.07.2008 21:31 af Bruger #3427

Bruger #2330 @ 14.07.08 22:36

444

Nu kender jeg ikke meget til VB, men i de fleste OOP sprog jeg har arbejdet med ville man sætte "Dim pop3Stream As Stream" uden for ifen, og så ville man kunne tildele en SslStream til denne pop3Stream, forudsat at SslStream nedarver fra pop3Stream.

Bruger #10584 @ 11.11.08 22:23

Synes I gør det mere indviklet end det er.

Her er mit foreslag:

Kode

 Public Sub test()
        Dim a As String
        Dim b As String

        If 1 = 2 Then
            a = "string"
            b = a
        Else
            a = "3"
            b = a
        End If

        Debug.WriteLine(b)

    End Sub

Bruger #10584 @ 11.11.08 22:24

Ups.. dobbeltpost :roll:

Indlæg senest redigeret d. 11.11.2008 22:25 af Bruger #10584

dim ?

Karma barometer (30 dage)

Modtaget

Givet

Favorit hos
Forum tråde
Artikler