ABA


"המרת מספר לשעה"
גירסת הדפסה        
קבוצות דיון פיתוח, תיכנות ובניית אתרים נושא #12515 מנהל    סגן המנהל    מפקח   Winner    צל"ש   מומחה  
אשכול מספר 12515
marsel
חבר מתאריך 31.8.03
40 הודעות
   18:09   04.10.05   
אל הפורום  
  המרת מספר לשעה  
 
   כיצד ניתן להמיר מספר נתון לשעה ודקות לדוגמא 1122 ל-11:22 ב-vb.


                                שתף        
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

  האשכול     מחבר     תאריך כתיבה     מספר  
  אני לא מכיר פונקציה כזאת .. אבל jossepe_4u  05.10.05 19:25 1

       
jossepe_4u 
חבר מתאריך 18.3.02
258 הודעות
   19:25   05.10.05   
אל הפורום  
  1. אני לא מכיר פונקציה כזאת .. אבל  
בתגובה להודעה מספר 0
 
   ערכתי לאחרונה בתאריך 05.10.05 בשעה 19:25 בברכה, jossepe_4u
 
לא בעיה לרשום קוד קצר...

Dim Len1 As Integer

Len1 = Len(Text1.Text) ' מחזיר את אורך המספר שהמשתמש הקיש

If Len1 = 3 Then
Label1.Caption = Left(Text1.Text, 1) & ":" & Right(Text1.Text, 2)
ElseIf Len1 = 4 Then
Label1.Caption = Left(Text1.Text, 2) & ":" & Right(Text1.Text, 2)
Else
MsgBox "הקש שעה ב3 או 4 ספרות! "
End If

ואתה יכול להוסיף גם פונקציה לבדיקת תקינות "השעה"


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

תגובה מהירה  למכתב מספר: 
 
___________________________________________________________________

___________________________________________________________________
למנהלים:  נעל | תייק בארכיון | מחק | העבר לפורום אחר | מחק תגובות | עגן אשכול
       



© כל הזכויות שמורות ל-רוטר.נט בע"מ rotter.net