---
title: "C++ integer till VB sträng"
type: "forum-thread"
url: "https://www.webforum.nu/amne/dotnet/84903-c-integer-till-vb-sträng"
topic: ".NET"
topic_url: "https://www.webforum.nu/amne/dotnet"
author: "Viktor"
published: "2003-08-31T13:27:38.000Z"
updated: "2003-08-31T14:55:10.000Z"
replies: 2
views: 256
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/84903-c-integer-till-vb-sträng"
---

# C++ integer till VB sträng

## #1 — Viktor, 2003-08-31T13:27Z

Jag har sparat ner en integer till en fil från ett c++ program med hjälp av denna kod

```
int iTest;
WriteFile(hFile,(char*)&iTest,NULL,NULL);
```

och jag vill nu läsa denna fil från ett VB program och skriva ut värdet som står i filen. Hur gör jag det? Värdet står ju inte som klartext utan som en 4 bytes integer.

EDIT: Det är inte VB utan VB Script för Windows Script Host.

/Viktor

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

## #2 — niko, 2003-08-31T14:39Z

Med reservation för att byte-ordningen kanske är annorlunda och att min hjärna inte riktigt funkar idag, men typ:

```
   Const ForReading = 1
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set f = fso.OpenTextFile("dinfil.txt", ForReading)
   str = f.Read(4)
   tal= asc(mid(str,1,1))*256^3 + asc(mid(str,2,1))*256^2 + asc(mid(str,3,1))*256 + asc(mid(str,4,1))
   WScript.Echo "Talet är: " & tal
```

Borde det väl bli?

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

## #3 — Viktor, 2003-08-31T14:55Z

> Borde det väll bli?

Visst fungerar det! Tack!

Behövda ändra på lite, byte ordningen och deklarera variabler

```
Dim str
Dim tal
Dim fso
Dim f
Const ForReading = 1
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("I:\keystrokes.dat", ForReading)
str = f.Read(4)
tal= Asc(Mid(str,1,1)) + Asc(Mid(str,2,1))*256 + Asc(Mid(str,3,1))*256^2 + Asc(Mid(str,4,1))*256^3
GetKeyStrokes = tal
```

/Viktor

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

---

Tråden på webben: https://www.webforum.nu/amne/dotnet/84903-c-integer-till-vb-sträng