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

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.
August 02, 2025, 18:55:26 pm

Login with username, password and session length

Αναζήτηση

Google

THMMY.gr Web
Πρόσφατα
Αποτελέσματα Εξεταστικής ...
by Ma8hths Indou
[Today at 17:30:47]

[Τηλεπικοινωνιακά Συστήμα...
by Thanasis_pap
[Today at 17:06:37]

Άδεια ασκήσεως επαγγέλματ...
by The Web
[Today at 13:25:49]

[Τομέας Ηλεκτρονικής] Μαθ...
by Nikos_313
[Today at 09:51:26]

[Τομέας Ενέργειας] Μαθήμα...
by Nikos_313
[Today at 01:40:22]

Οι μπράβοι του πρύτανη
by Διάλεξις
[Today at 01:30:18]

[Διανεμημένη Παραγωγή] Γε...
by Διάλεξις
[Today at 01:04:15]

Πρακτική Άσκηση ΤΗΜΜΥ 201...
by Διάλεξις
[Today at 00:59:05]

Ηλεκτρομηχανολογικές Μελέ...
by inverter
[August 01, 2025, 20:35:12 pm]

Νέα Δημοκρατία (and Co. I...
by Katarameno
[August 01, 2025, 15:13:09 pm]

Πρόγραμμα Σπουδών Ακαδημα...
by PolarBear
[August 01, 2025, 15:03:05 pm]

Aναζωπύρωση των εχθροπραξ...
by Katarameno
[July 31, 2025, 21:15:48 pm]

Καμμένα...!!
by Godat
[July 31, 2025, 21:07:58 pm]

[ΑΝΤΙΣΤΑΣΗ] Ανακοίνωση γι...
by Katarameno
[July 31, 2025, 20:31:30 pm]

Αρχείο Ανακοινώσεων [Arch...
by Nikos_313
[July 31, 2025, 15:33:28 pm]

ΤΗΜΜΥ-Σκάκι
by L
[July 31, 2025, 13:24:56 pm]

Τι ακούτε αυτήν τη στιγμή...
by Giopan
[July 30, 2025, 17:07:32 pm]

Τα παράσιτα ανάμεσά μας
by Katarameno
[July 30, 2025, 13:47:28 pm]

Ρώτα κάτι τον επόμενο
by Giopan
[July 29, 2025, 16:04:23 pm]

Πότε θα βγει το μάθημα; -...
by chatzikys
[July 29, 2025, 13:52:51 pm]
Στατιστικά
Members
Total Members: 9988
Latest: kyrlef
Stats
Total Posts: 1427644
Total Topics: 31739
Online Today: 142
Online Ever: 2093
(April 17, 2025, 08:47:49 am)
Users Online
Users: 14
Guests: 98
Total: 112
Retroman07
Nekt
nikosgk
Saint_GR
lapin
amastron
prigians
sassi
filkilkis
vaggelisx
gkg
Katarameno
Εμφάνιση

Νέα για πρωτοετείς
Είσαι πρωτοετής;... Καλώς ήρθες! Μπορείς να βρεις πληροφορίες εδώ. Βοήθεια για τους καινούργιους μέσω χάρτη.
Κατεβάστε εδώ το 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 1396 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...