Τι χρησιμοποιούμε αντί της string() για επανάληψη του ίδιου χαρακτήρα και πές μου πως μπορώ σε ένα string να του δώσω την μεγαλύτερη τιμή δηλ στο Από- Έως.πχ

txtFields_6.Name="Έως"

If txtFields_6.Text = "" Then txtFields_6.Text = Να γεμίση με την μεγαλύτερη τιμή

παλιά το έκανα έτσι

If txtFields_6.Text = "" Then txtFields_6.Text = 'String(len(txtFields_6.Text), Chr(255))

Ευχαριστώ

---

George Matzouranis

Προσπάθησε να γίνεις πιο σαφείς.
Οι τιμές Μεγαλύτερο-Μικρότερο από που έρχονται???
Από το ίδιο το textBox6???
Θές να κάνεις έλεγχο μεταξύ δύο τιμών(αριθμητικών ή αλφαρηθμιτικών) και να προβάλεις το αποτέλεσμα στο textBox6???

Για επανάληψη του ίδιου χαρακτήρα, μπορείς να πεις κάτι σαν το παρακάτω:

Dim myStr as New String("*", 25)

Θα σου φτιάξει ένα string με 25 αστεράκια.

 

---

Vir prudens non contra ventum mingit

Αυτό δουλεύει ?

Dim myStr as New String(len(txtFields_6.Text), Chr(255))

If txtFields_6.Text = "" Then txtFields_6.Text = myStr
Για να γεμίση το txtFields_6.Text με την μεγαλύτερη δυνατή τιμή

Η υπάρχει κάτι καλύτερο για να γεμίση ενα TextBox με την μεγαλύτερη δυνατή τιμή ?


Ευχαριστώ

---

George Matzouranis

Αν ως "μεγαλύτερη δυνατή τιμή" εννοείς το μήκος που προσδιορίζεται από το MaxLength property του TextBox, τότε μπορείς να πεις

   If txtFields_6.Text = "" Then txtFields_6.Text = New String(txtFields_6.MaxLength, Chr(255))

---

Vir prudens non contra ventum mingit

Την μεγαλύτερη δυνατή τιμή θέλω να τη έχω για τον εξής λόγο
πχ αν σε ένα txtbox δεν βάλει τίποτε κάποιος, στο LostFocus να γεμίση με την μεγαλύτερη δυνατή τιμή ώστε πχ σε ένα ερώτημα Από Κωδικό Πελάτη(txtbox1 - Έως Κωδικό Πελάτη(txtbox2) να φέρει και το μεγαλύτερο Κωδικό Πελάτη

Ελπίζω να έγινα κατανοητός :)

---

George Matzouranis

Ωραία, τώρα λοιπόν γίνεται κατανοητό τι θες να κάνεις...

Αυτό που προσπαθείς να κάνεις εξαρτάται από τις τιμές που παίρνει ο κωδικός πελάτη. Αν για παράδειγμα, ο κωδικός πελάτη είναι της μορφής "ΑΓΦΔ3949", δηλαδή τέσσερα γράμματα και τέσσερα νούμερα, τότε ποιά είναι η μέγιστη τιμή; "ΩΩΩΩ9999"; Αν είναι ένας αύξοντας ακέραιος αριθμός τότε πάλι η μέγιστη τιμή θα είναι ένα νούμερο που εξαρτάται από το μέγιστο μέγεθος του τύπου (16bit / 32bit / 64bit), δηλαδή δεν πρόκειται να είναι "9999999..."

---

Vir prudens non contra ventum mingit

Αναρωτιέμαι γιατί δέν παίρνεις την μεγαλύτερη δυνατή τιμή του κωδικού του πελάτη μέ SQL Statement "Select max(cusid) from customers" μέσα από ένα DataReader για να τον περάσεις στο textBox που θέλεις το event που θέλεις εφόσον αυτό είναι άδειο.
Π.Χ.Dim dbReader as SqlClient.SQLDataReader
Dim dbReadCmd as new SqlClient.SQLCommand("select max(CusId) from Customers",myConnection)

dbReader=dbRead.ExecuteReader
dbReader.read
txtFields_6.Text =dbReader.GetString(0) η GetInt32(0) ανάλογα με το τί είδους πεδίο είναι ο κωδικός (Χαρακτήρας ή Αριθμός)

---

Ιωάννης Μανουσάκης

Αγαπητέ Γιάννη δεν θέλω να πάρω την μεγαλύτερη δυνατή τιμή του κωδικού του πελάτη αλλά στο
where T1.PCODE between '" & txtFields_1.Text & "' and '" & txtFields_2.Text
όπου
T1.PCODE=Κωδικός Πελάτη
το
txtFields_2.Text να γεμίζη με τη μεγαλύτερη δυνατή τιμή ώστε να συμπεριλάβη
και τον τελευταίο πελάτη του αρχείου


Πιστεύω οτι μου απάντησε ο Μάνος

If txtFields_6.Text = "" Then txtFields_6.Text = New String(txtFields_6.MaxLength, Chr(255))

Και πάλι ευχαριστώ

---

George Matzouranis