---
title: "Grafisk räknare"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/13749-grafisk-räknare"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "JonasT"
published: "2002-01-13T09:08:00.000Z"
updated: "2002-01-13T15:04:00.000Z"
replies: 7
views: 743
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/asp/13749-grafisk-räknare"
---

# Grafisk räknare

## #1 — JonasT, 2002-01-13T09:08Z

Hej!
Jag undrar hur man ska göra föra att tex. jag har ett värde som är lagrat i ex poang. Hur gör jag för att när jag skriver \<%=poang%\> så blir siffrorna mina bilder jag valtut för varje siffra..?
Tacksam för svar.

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

## #2 — Rinaldo, 2002-01-13T09:21Z

<http://script.webforum.nu/wf/Forum1/HTML/000043.html>

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

## #3 — JonasT, 2002-01-13T09:34Z

har försökt att ladda ner den men det funkar inte....just därför jag frågade istället..

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

## #4 — Wiberg, 2002-01-13T10:17Z

```

function img_convert(txt)
txt = replace(txt, "1", "<img src=""1.gif"">")
txt = replace(txt, "2", "<img src=""2.gif"">")
' osv eller lägg allt i en loop
img_convert = txt
end function
```

```
<%=img_convert(poang)%>
```

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

## #5 — Erik Juhlin, 2002-01-13T11:49Z

Så här då alltså. :)

```
Function img_convert(txt)
	Dim i
	txt = CStr(txt)
	For i = 0 To 9
		txt = Replace(txt, CStr(i), "<img src=""" & i & ".gif"">")
	Next 'i
	img_convert = txt
End Function
```

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

## #6 — iceM2, 2002-01-13T11:53Z

```
Function img_convert(txt)
Dim i
txt = CStr(txt)
For i = 0 To 9
txt = Replace(txt, CStr(i), "<img src=""" & i & ".gif"">")
Next 'i	
img_convert = txt
End Function
```

För mig ser det ut som du har missat en dubbelfnutt, borde det inte vara...

```
Function img_convert(txt)
Dim i
txt = CStr(txt)
For i = 0 To 9
txt = Replace(txt, CStr(i), "<img src=""" & i & ".gif""[b]"[/b]>")
Next 'i	
img_convert = txt
End Function
```

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

## #7 — Pace, 2002-01-13T13:50Z

Nej, där ska det enbart vara två st (2) fnuttar.

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

## #8 — Erik Juhlin, 2002-01-13T15:04Z

Ett tips är att räkna fnuttarna. Det ska alltid vara ett jämnt antal fnuttar. :)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/13749-grafisk-räknare