---
title: "Ett kodexempel sökes!"
type: "forum-thread"
url: "https://www.webforum.nu/amne/dotnet/65849-ett-kodexempel-sökes"
topic: ".NET"
topic_url: "https://www.webforum.nu/amne/dotnet"
author: "Cheezes"
published: "2003-01-23T00:23:57.000Z"
updated: "2003-01-26T23:13:26.000Z"
replies: 6
views: 294
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/dotnet/65849-ett-kodexempel-sökes"
---

# Ett kodexempel sökes!

## #1 — Cheezes, 2003-01-23T00:23Z

Vad menas med att man deklarerar sin konstantdeklaration i huvudet på formuläret (som Private)? Vart ska det placeras exakt någonstans??

Ge mig, snälla, ett längre kodexempel, som inkluderar Private Const i denna kod.

Permalänk: https://www.webforum.nu/p/65849

## #2 — Nexus86, 2003-01-23T10:59Z

Högst upp i kodfönstret utanför eventuella subs (ex. Private Sub Form_Load()) ska det stå 

```
Private Const konstantens_namn = "konstantens värde"
```

Permalänk: https://www.webforum.nu/p/925324

## #3 — Cheezes, 2003-01-23T22:06Z

> **Nexus86 skrev:**
>
> Högst upp i kodfönstret utanför eventuella subs (ex. Private Sub Form_Load()) ska det stå 
>
> ```
> Private Const konstantens_namn = "konstantens värde"
> ```

Tillhör alltså kodraden (Private Const), hemma i kodfönstrets listruta, där det står General-Declarations eller ska det stå Form-Load i denna listruta??

 :l 

Tills dess...

//Cheezes

Permalänk: https://www.webforum.nu/p/925857

## #4 — Cheezes, 2003-01-23T23:41Z

När jag la in min konstantdeklaration, under Option Explicit i kodfönstrets listruta; General-Declarations, så fick jag en felmeddelanderuta.
Det stod si så här:

"Compile error.

Member already exists in a object module from which this object module derives."

Vad vill VB:n tala om för mig? Varför  funkar det ej??  :( 

//Cheezes

Permalänk: https://www.webforum.nu/p/925902

## #5 — Nexus86, 2003-01-25T01:43Z

På vilken rad fick du det och vad är koden på den raden?

Permalänk: https://www.webforum.nu/p/926735

## #6 — Cheezes, 2003-01-26T22:47Z

> **Nexus86 skrev:**
>
> På vilken rad fick du det och vad är koden på den raden?

På rad två, så gav det en gul markering över "a As Integer ="

Här är koden:

```
Option Explicit

Private Const [B]a As Integer =[/B] 13
Private Const b As Integer = 27
Private Const c As Integer = 8
Private Const d AS Integer = 19
Private Const e As Integer = 9

Private Sub pris_Click()
   
   Dim pris As Integer
   If a.Value Then
   pris = a
   Else
   pris = b
   End If
   
   If c.Value = Checked Then
   pris = pris + c
   End If
   
   If d.Value = Checked Then
   pris = pris + d
   End If
   
   If e.Value = Checked Then
   pris = pris + e
   End If
   
   txtSumma.Text = pris
   
End Sub
```

MVH
/Cheezes

Permalänk: https://www.webforum.nu/p/927945

## #7 — Nexus86, 2003-01-26T23:13Z

Det som blir fel är att du har döpt dina konstanter till samma som någon kontroll är. T.ex. så har du

Private Const a As Integer = 13

och

a.Value

Ska du ha reda på vad a har för värde tar du bara a helt upp-och-ner.

Sen eftersom du har **Private Sub pris_Click()** så antar jag att du även har en kontroll som heter pris. Då kan du inte ta

Dim pris As Integer

VB bryr sej inte om stora och små bokstäver som många andra språk. T.ex. Pris = pris = PRiS. Den ser ingen skillnad på detta.

Permalänk: https://www.webforum.nu/p/927959

---

Tråden på webben: https://www.webforum.nu/amne/dotnet/65849-ett-kodexempel-sökes