Chirurgia cranio-cerebrală minim invazivă
Tehnicile minim invazive impun utilizarea unei tehnologii ultramoderne. Endoscoapele operatorii de diverse tipuri, microscopul operator dedicat, neuronavigația, neuroelectrofiziologia, tehnicile avansate de anestezie, chirurgia cu pacientul treaz reprezintă armamentarium fără de care neurochirurgia prin "gaura cheii" nu ar fi posibilă. Folosind tehnicile de mai sus, tratăm un spectru larg de patologii cranio-cerebrale. www.neurohope.ro |
TextBox to Integer
Last Updated: May 31 2012 04:42, Started by
dustcp
, May 08 2012 00:20
·
0
#1
Posted 08 May 2012 - 00:20
Salut! Vreau ca dintr-un textbox sa export datele ca integer printr-un buton intr-un excel, in sheet 2 pentru a folosi baza de date in alt program ulterior. Eu am incercat sa fac ceva, problema este ca daca modific datele din textbox. cand deschid fisierul excel respectiv, imi deschide si un "book" precedent, inainte sa fie modificat.
Puteti sa ma ajutati? Folosesc Visual Basic 6.3. |
#3
Posted 31 May 2012 - 04:42
sa inteleg ca vrei sa scapi de caractere si sa ramai doar cu cifre?
vezi poate te ajuta functia asta: Public Function ConvertesteInNumar(ByVal strNumar As String) As String Dim a As Integer Dim buf As String For a = 1 To Len(strNumar) If IsNumeric(Mid(strNumar, a, 1)) Then buf = buf & Mid(strNumar, a, 1) Next a ConvertesteInNumar = CDbl(buf) End Function msgbox "TextBox=" & ConvertesteInNumar(Text1.text) & vbcrlf & _ "String=" & ConvertesteInNumar(plictiseala2viata4ever2167 'z@_@x '45) Edited by horohoro, 31 May 2012 - 04:47. |
Anunturi
▶ 0 user(s) are reading this topic
0 members, 0 guests, 0 anonymous users