Neurochirurgie minim invazivă
"Primum non nocere" este ideea ce a deschis drumul medicinei spre minim invaziv. Avansul tehnologic extraordinar din ultimele decenii a permis dezvoltarea tuturor domeniilor medicinei. Microscopul operator, neuronavigația, tehnicile anestezice avansate permit intervenții chirurgicale tot mai precise, tot mai sigure. Neurochirurgia minim invazivă, sau prin "gaura cheii", oferă pacienților posibilitatea de a se opera cu riscuri minime, fie ele neurologice, infecțioase, medicale sau estetice. 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