• Downloads
  • ! Read Me !
  • Μαθήματα
  • Φοιτητικά
  • Τεχνικά Θέματα
  • Συζητήσεις
  • Happy Hour!
  • About THMMY.gr
 V  < 
Search:  
Welcome, Guest. Please login or register.
June 18, 2025, 00:25:44 am

Login with username, password and session length
Links
  Thmmy.gr portal
   Forum
   Downloads
   Ενεργ. Λογαριασμού
   Επικοινωνία
  
  Χρήσιμα links
   Σελίδα τμήματος
   Βιβλιοθήκη Τμήματος
   Elearning
   Φοιτητικά fora
   Πρόγραμμα Λέσχης
   Πρακτική Άσκηση
   Ηλεκτρονική Εξυπηρέτηση Φοιτητών
   Διανομή Συγγραμμάτων
   Ψηφιακό Καταθετήριο Διπλωματικών
   Πληροφορίες Καθηγητών
   Instagram @thmmy.gr
   mTHMMY
  
  Φοιτητικές Ομάδες
   ACM
   Aristurtle
   ART
   ASAT
   BEAM
   BEST Thessaloniki
   EESTEC LC Thessaloniki
   EΜΒ Auth
   IAESTE Thessaloniki
   IEEE φοιτητικό παράρτημα ΑΠΘ
   SpaceDot
   VROOM
   Panther
  
Πίνακας Ελέγχου
Welcome, Guest. Please login or register.
June 18, 2025, 00:25:44 am

Login with username, password and session length

Αναζήτηση

Google

THMMY.gr Web
Πρόσφατα
Πρακτική Άσκηση ΤΗΜΜΥ 201...
by chris_p30
[Today at 00:22:48]

[Μεταφορά και Διανομή ΗΕ]...
by Nikos_313
[Today at 00:10:29]

Ισραήλ - Ιράν: Πόλεμος στ...
by Katarameno
[June 17, 2025, 21:32:50 pm]

[Ψηφιακά Ολοκληρωμένα Κυκ...
by tzortzis
[June 17, 2025, 21:25:42 pm]

[Εφ.Θερμοδυναμική] Γενικέ...
by PAPARI69
[June 17, 2025, 20:59:13 pm]

[Γραφική] Λυμένα θέματα
by okanpala
[June 17, 2025, 18:56:22 pm]

Τι ακούτε αυτήν τη στιγμή...
by Katarameno
[June 17, 2025, 14:25:00 pm]

Αντικατάστασης πυκνωτή σε...
by george14
[June 17, 2025, 13:58:20 pm]

Πότε θα βγει το μάθημα; -...
by tzortzis
[June 17, 2025, 13:19:53 pm]

Αποτελέσματα Εξεταστικής ...
by george14
[June 17, 2025, 12:08:25 pm]

[ΨEE] Γενικές απορίες και...
by Juror8
[June 17, 2025, 12:06:57 pm]

[Οργάνωση Υπολογιστών] Γε...
by RAFI
[June 16, 2025, 22:46:54 pm]

[Σ.Π.Η.Ε.] Γενικές απορίε...
by Nikos_313
[June 16, 2025, 19:49:00 pm]

[ΘΤΠΑ] Γενικές απορίες κα...
by Nikos_313
[June 16, 2025, 16:56:56 pm]

[Αρχές Οικονομίας] Να επι...
by _Trob
[June 16, 2025, 13:28:21 pm]

[Σ.Α.Π.Γ.] Εργασία 2025
by Nikos_313
[June 16, 2025, 12:13:45 pm]

[Διανεμημένη Παραγωγή] Γε...
by Διάλεξις
[June 16, 2025, 01:56:37 am]

[Σ.Π.Η.Ε.] Παλιά θέματα -...
by nmpampal
[June 15, 2025, 06:43:15 am]

Το thmmy.gr στο instagram...
by Mr Watson
[June 15, 2025, 00:50:23 am]

[Λογισμός ΙΙ] Απορίες σε...
by el mariachi
[June 14, 2025, 20:47:07 pm]
Στατιστικά
Members
Total Members: 9961
Latest: Poli
Stats
Total Posts: 1426702
Total Topics: 31710
Online Today: 205
Online Ever: 2093
(April 17, 2025, 08:47:49 am)
Users Online
Users: 41
Guests: 149
Total: 190
abunchofcells
ElectroShock
filkilkis
Rithan
gtapalis
Karkarias
Captain
sofoklhs_pizza
Akis Papanikolaou
chris_p30
engineer2030
chriskazakos
bit11
rafail zisiadis
Βασιλης
giorgosss03
christina02
κοτζακ
Nianaro
soktas
Aftzidou
kriton
gkarapip
maestros
alexlabis
ThanosV
Nikos_313
mitsos753905
chaniotism
gcheristanidhs
mpaltzak
ANDVRONTZOS
IBOURAS
Διάλεξις
Εμφάνιση

Νέα για πρωτοετείς
Είσαι πρωτοετής;... Καλώς ήρθες! Μπορείς να βρεις πληροφορίες εδώ. Βοήθεια για τους καινούργιους μέσω χάρτη.
Κατεβάστε εδώ το Android Application για εύκολη πρόσβαση στο forum.
Ανεβάζετε τα θέματα των εξετάσεων στον τομέα Downloads με προσοχή στα ονόματα των αρχείων!

Νέα!
Ανεβάζετε τα θέματα των εξετάσεων στον τομέα Downloads
με προσοχή στα ονόματα των αρχείων!
THMMY.gr > Forum > Ηλεκτρονικοί Υπολογιστές και Τεχνικά Θέματα > Περί Υπολογιστών... > Software > Προγραμματισμός (C, VB, Delphi, PHP, ASP...) (Moderators: chatzikys, PolarBear) > Απορία σε VBS
0 Members and 1 Guest are viewing this topic.
Pages: [1] Go Down Print
Author Topic: Απορία σε VBS  (Read 1352 times)
Wade
Veteran
Καταστραμμένος
******
Gender: Male
Posts: 5795



View Profile WWW
Απορία σε VBS
« on: April 23, 2007, 18:05:13 pm »

Έχω μια απορία στη Visual Basic Script...  Μήπως ξέρει κανένας κάποια εντολή που να δέχεται ένα string με αριθμητικούς χαρακτήρες (π.χ. "4") και να επιστρέφει την αριθμητική τιμή (στην προκειμένη περίπτωση 4);
Logged

JAs0n-X
Αbsolute ΤΗΜΜΥ.gr
*******
Gender: Male
Posts: 2861


Rhodes [Sattelite image]


View Profile
Re: Απορία σε VBS
« Reply #1 on: April 23, 2007, 23:27:48 pm »

δεν ξερω visual basic αλλα επειδη δεν σου απανταει και κανενας ας κανω μια προσπαθεια...

ψαξε στην κλαση Int ή Int16 ή οτι εχει τελος παντων μηπως εχει συναρτηση Parse

σε C# για παραδειγμα αυτο που λες γινεται:

Int16.Parse(string);
Logged

J=X
--------------------------------------------
Ο Χριστος πεθανε
Ο Μαρξ πεθανε...
και εγω τελευταια δεν αισθανομαι καλα !
Wade
Veteran
Καταστραμμένος
******
Gender: Male
Posts: 5795



View Profile WWW
Re: Απορία σε VBS
« Reply #2 on: April 25, 2007, 16:29:46 pm »

Αν κανένας ενδιαφέρεται ακόμα, βρήκα μια απλή λύση για το πρόβλημα: Η συνάρτηση Round(expression) κατά κάποιο περίεργο τρόπο δέχεται αυτά τα αριθμητικά strings και επιστρέφει την αριθμητική τιμή τους.  Έχει το μειονέκτημα ότι χειρίζεται σωστά μόνο τους ακέραιους, αλλά μπορεί να γίνει ένα τέχνασμα για να λυθεί το πρόβλημα με τους δεκαδικούς:

Σε νέα μεταβλητή (παράδειγμα dec_digits), εκχωρούμε την τιμή length(expression)-InStr(expression,",") , η οποία δείχνει το πλήθος των δεκαδικών ψηφίων.  Μετά κάνουμε replace(expression, ",", "") στο αρχικό string, το κάνουμε round και διαιρούμε τον ακέραιο που προκύπτει με το 10*dec_digits και έχουμε τον αρχικό αριθμό.
Logged

JAs0n-X
Αbsolute ΤΗΜΜΥ.gr
*******
Gender: Male
Posts: 2861


Rhodes [Sattelite image]


View Profile
Re: Απορία σε VBS
« Reply #3 on: April 25, 2007, 22:43:50 pm »

Quote from: Wade on April 25, 2007, 16:29:46 pm
Αν κανένας ενδιαφέρεται ακόμα, βρήκα μια απλή λύση για το πρόβλημα: Η συνάρτηση Round(expression) κατά κάποιο περίεργο τρόπο δέχεται αυτά τα αριθμητικά strings και επιστρέφει την αριθμητική τιμή τους.  Έχει το μειονέκτημα ότι χειρίζεται σωστά μόνο τους ακέραιους, αλλά μπορεί να γίνει ένα τέχνασμα για να λυθεί το πρόβλημα με τους δεκαδικούς:

Σε νέα μεταβλητή (παράδειγμα dec_digits), εκχωρούμε την τιμή length(expression)-InStr(expression,",") , η οποία δείχνει το πλήθος των δεκαδικών ψηφίων.  Μετά κάνουμε replace(expression, ",", "") στο αρχικό string, το κάνουμε round και διαιρούμε τον ακέραιο που προκύπτει με το 10*dec_digits και έχουμε τον αρχικό αριθμό.

μμ πρακτικο ! Tongue
Logged

J=X
--------------------------------------------
Ο Χριστος πεθανε
Ο Μαρξ πεθανε...
και εγω τελευταια δεν αισθανομαι καλα !
Wade
Veteran
Καταστραμμένος
******
Gender: Male
Posts: 5795



View Profile WWW
Re: Απορία σε VBS
« Reply #4 on: April 25, 2007, 22:46:45 pm »

...Και κάτι ακόμα: Μόλις ανακάλυψα ότι υπάρχει ειδική συνάρτηση που μετατρέπει τα strings σε integers, η CInt(expression) Tongue
Logged

Emfanever
Καταστραμμένος
********
Gender: Male
Posts: 5284


Πολίτης


View Profile
Re: Απορία σε VBS
« Reply #5 on: July 31, 2008, 20:29:31 pm »

Κάπως αργά (lol!), αλλά for the record η συνάρτηση που ζητάς(ζητούσες) πρέπει να είναι η Val(string)
Logged
Pages: [1] Go Up Print
Jump to:  

Powered by SMF | SMF © 2006-2009, Simple Machines LLC
Scribbles2 | TinyPortal © Bloc | XHTML | CSS
Loading...