• Downloads
  • ! Read Me !
  • Μαθήματα
  • Φοιτητικά
  • Τεχνικά Θέματα
  • Συζητήσεις
  • Happy Hour!
  • About THMMY.gr
 V  < 
Search:  
Welcome, Guest. Please login or register.
July 30, 2026, 10:14:33 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.
July 30, 2026, 10:14:33 am

Login with username, password and session length

Αναζήτηση

Google

THMMY.gr Web
Πρόσφατα
Οδύσσεια
by mdimitrig
[Today at 09:53:33]

[Διανεμημένη Παραγωγή] Γε...
by Διάλεξις
[July 29, 2026, 21:50:10 pm]

Προσκεκλημένοι στην τελετ...
by okan
[July 28, 2026, 14:46:07 pm]

Πότε θα βγει το μάθημα; -...
by Hyperlaz02
[July 28, 2026, 11:36:56 am]

Των συνειρμών το παίγνιο....
by χηρουλα Αλεξίου
[July 27, 2026, 20:46:20 pm]

Αποτελέσματα Εξεταστικής ...
by Lalson
[July 27, 2026, 19:08:15 pm]

Μουντιάλ 2026
by Nikos_313
[July 22, 2026, 21:41:08 pm]

[Ηλεκτρομαγνητική Συμβατό...
by RivenT
[July 22, 2026, 12:35:05 pm]

Τα παράσιτα ανάμεσά μας
by Immortan Joe
[July 21, 2026, 10:57:48 am]

[Τεχνολογία Ηλεκτροτεχνικ...
by georkala
[July 18, 2026, 19:10:10 pm]

Στοά του ΣΔΟΚ
by GrillOG
[July 18, 2026, 15:49:00 pm]

[Η/Μ Πεδίο I] Γενικές απο...
by George_RT
[July 18, 2026, 10:42:51 am]

[Τηλεπικοινωνιακά Συστήμα...
by sofi
[July 16, 2026, 16:03:45 pm]

Erasmus+ Πρακτική Άσκηση
by anastas1a
[July 15, 2026, 13:33:54 pm]

Έναρξη λειτουργίας Πανεπι...
by Nikos_313
[July 15, 2026, 12:33:40 pm]

[Τεχνολογία Ηλεκτροτεχνικ...
by grepanis
[July 10, 2026, 20:07:29 pm]

Κάμερες στην Πρυτανεία το...
by RivenT
[July 10, 2026, 01:00:04 am]

Ηλεκτρομηχανολογικές Μελέ...
by inverter
[July 06, 2026, 16:21:00 pm]
Στατιστικά
Members
Total Members: 10412
Latest: Vangelissss
Stats
Total Posts: 1431775
Total Topics: 32028
Online Today: 890
Online Ever: 18918
(April 06, 2026, 16:05:31 pm)
Users Online
Users: 17
Guests: 757
Total: 774
pdiamantis
LambisTr
ThanosKoutsoump
christina02
Petross
CodeBro
aggp
Gaspard
gpapmtb
gpr000
Tasos Bot
samamidou
elio
kvas
bsp
Εμφάνιση

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

Νέα!
Πρόγραμμα Επαναληπτικής Εξεταστικής 2025-2026
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 1738 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...