Visual Basic 10 klausimas.

Sveiki,

Susiduriau su tokia problema.. Iskart pasakau, kad nesu programuotojas, net nei ne pradedantis.. paprasciausiai pasigooglinu, pasimokinu ir pasirasau tai ko man reikia.. o tai buna retai.. Si karta irgi pasirasiau.. ir veikia atrodo.. Rasiau su Visual Basic 2010, pas mane Win8.. Pas mane viskas veikia.. Bet va, nunesiau ant kitos masinos, kur stovi Win7 ir veikia jau ne taip, kaip turi.. tada pagalvojau, kad istaisysiu kaip nors ta klaida, nes namie kitam pc taip pat turiu win7, tai bus galima greitai patikrinti.. O pasirodo ten irgi veikia be problemu...

Na o dabar apie tai, kas ten neveikia man.. pabandysiu istraukt is kodo, tai kas man atrodo svarbu, kad galetumete isivaizduoti kas ten man neveikia.. viskas vyksta taip:

1 - istraukiam string`a is textinio failo paskutines eilutes: Dim kintamasis As String = System.IO.File.ReadLines("failas.txt").Last()) . .. .. Tas stringas atrodo pvz taip: "10,50 $"

2 - tada kita stringa prilyginam pirmo stringo simboliams iki tarpo.. zodziu paimam tik "10,50": Dim kintamasis2 As String = String.Join("", kintamasis.TakeWhile(Function(x) x <> " "c))

3 - tada pakeiciam kablelio zenkla, i taska: kintamasis3 = kintamasis2.Replace(",", ".")

4 - is to kintamojo pasidarom decimal tipo kintamaji: kintamasis4 as decimel = kintamasis3

4 - galiausiai atvaizduojam kintamasis3 pvz texbox`e ar kokioj kitokioj design formoj..

Ir kas gaunasi.. pas mane PC atvaizduoja "10.50" (windows8), kitam mano PC su win7 atvaizduoja irgi taip (10.50)... Bet va yra trecias PC su win7, kuriame savo kintamaji matau taip: "1050"..

Gal kas nors nutuokiate kame cia reikalas? Cia gal kokiu priedu windowsuose nesuinstaliuota tik ar kas? O gal ir kode kazka pataisyt reiketu? Dekingas uz atsakymus :)

Labas. Greičiausiai čia dėl kabliukų/taškiukų problema.

Siūlau pasižiūrėti šiuos nustatymus ir pažiūrėti, kad jiebūtų vienodi:

http://i.imgur.com/dxfr6HW.png

Labas. Greičiausiai čia dėl kabliukų/taškiukų problema.

Siūlau pasižiūrėti šiuos nustatymus ir pažiūrėti, kad jiebūtų vienodi:

http://i.imgur.com/dxfr6HW.png

Gera mintis, jau apsidziaugiau, kad busi issprendes problema, bet vistiek, dabar zaidziau su tais nustatymais pas save...niekaip nepadarau, kad man nerodytu to kablelio arba tasko...

EDIT: Sorry, pazaidziau ilgiau ir gavosi taip, kad ir pas mane rodo be skyrybos zenklu! Aciu! Tikiuos tam kompe tas pats padaryta.. Patikrinsiu snd vakare.

Na, stenis prisitaikyti prie to kompiuterio, kuriame negali nustatymų keisti.

Jei ką, nedaryk replace ir visks bus tvarkoj.

Na, stenis prisitaikyti prie to kompiuterio, kuriame negali nustatymų keisti.

Jei ką, nedaryk replace ir visks bus tvarkoj.

Jau radau begooglindamas..

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

System.Windows.Forms.Application.CurrentCulture = New System.Globalization.CultureInfo("EN-US")

Sita dalyka irasius veikia kaip reikia ant bet kokiu windows nustatymu.. Aciu, kad ant kelio uzvedei :) problema isspresta.