• Downloads
  • ! Read Me !
  • Μαθήματα
  • Φοιτητικά
  • Τεχνικά Θέματα
  • Συζητήσεις
  • Happy Hour!
  • About THMMY.gr
 V  < 
Search:  
Welcome, Guest. Please login or register.
September 17, 2025, 23:36:29 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.
September 17, 2025, 23:36:29 pm

Login with username, password and session length

Αναζήτηση

Google

THMMY.gr Web
Πρόσφατα
Aναζωπύρωση των εχθροπραξ...
by Katarameno
[Today at 22:43:28]

best username in THMMY.gr
by Katarameno
[Today at 20:35:29]

Αποτελέσματα Εξεταστικής ...
by ilazarit
[Today at 19:59:41]

Ποιον πάροχο να επιλέξω?
by Katarameno
[Today at 19:16:50]

Ποιο τραγούδι ακούσατε 5+...
by Katarameno
[Today at 17:16:08]

[Τηλεπικοινωνιακά Συστήμα...
by chatzikys
[Today at 16:07:13]

Πρόγραμμα Σπουδών Ακαδημα...
by sg31a
[Today at 11:35:11]

Εργασία στην METLEN, Γνώμ...
by ChrisKaloy-Kakou
[Today at 00:51:50]

Συμβάσεις και εταιρείες
by Nikos_313
[September 16, 2025, 23:02:05 pm]

[Στοχαστικά Σήματα και Δι...
by Nikos_313
[September 16, 2025, 22:54:08 pm]

Μέλος του μήνα - Ιούλιος ...
by Katarameno
[September 16, 2025, 19:37:40 pm]

Ευρωμπάσκετ 2025
by Katarameno
[September 16, 2025, 02:46:49 am]

Πότε θα βγει το μάθημα; -...
by Katarameno
[September 16, 2025, 01:08:33 am]

Τι ακούτε αυτήν τη στιγμή...
by Katarameno
[September 15, 2025, 22:10:40 pm]

Users <=22 OR >=222
by Mr Watson
[September 14, 2025, 19:36:18 pm]

[ΑΡΑΓΕ Attack] ΝΑ ΕΠΙΣΤΡΕ...
by Aris★
[September 14, 2025, 14:31:33 pm]

[Τομέας Ηλεκτρονικής] Μαθ...
by Nikos_313
[September 14, 2025, 13:29:36 pm]

Των συνειρμών το παίγνιο....
by chatzikys
[September 14, 2025, 13:20:18 pm]

Καλός βαθμός στην σχολή
by Σουλης
[September 14, 2025, 13:00:41 pm]

Τα παράσιτα ανάμεσά μας
by okan
[September 14, 2025, 03:20:17 am]
Στατιστικά
Members
Total Members: 10013
Latest: nataliaef
Stats
Total Posts: 1428141
Total Topics: 31767
Online Today: 440
Online Ever: 2093
(April 17, 2025, 08:47:49 am)
Users Online
Users: 27
Guests: 332
Total: 359
cealexop
tasos potsakis
stavros0201
Ulmo
papatmaria
Stelios V.
Atha_kri
noimaginationforthis
MeTheWizard
Saint_GR
Pcsc
iliaspapam
fungi
PJiffy
nikos.a
Sotirisbikos
Darth Anna
G.V.
dorapangeiou
Petross
ntina
The Web
Gaspard
Domnious
Nikos_313
Εμφάνιση

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

Νέα!
Η γραμματεία είναι ανοιχτή καθημερινά 12:00-13:30 Tongue
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 1453 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...