חיבור תוכן label

[sss1sss1]

חיבור תוכן label

איך אני מחבר נגיד label1=2 label2=8 label3=88 עשיתי label4=label1+label2+label3 וזה מצמיד לי רק את כל הספרות ... אני רוצה שיתן לי את התוצאה של הכל ביחד ועד שאלה קטנה איך אני עושה שבתוך משתנה מסויים יהיה כתובת לתמונה שנמצאת נגיד ב "c:\aaa.gif" ? תודה על העזרה

 

[davidea]

תעשה כך

label4=cint(lable1)+cint(label2)=cint(lable3)​

אבל יש לשים לב לדברים הבאים: cint היא פונקציה שלוקחת מחרוזת (מלל) וממירה אותו למספר שלם. (לחיצה על F1 כאשר עומדים על cint תציג גם את שאר פונציות ההמרה). מובן שחייבים לבדוק האם המחרוזת המוממרת היא אמנם מספר בעזרת הפונקיה isnumeric. אז הקוד המלא והנכון יהיה:

if isnumeric (lable1) and isnumeric (lable2) and isnumeric(lable3) then label4=cint(lable1)+cint(label2)=cint(lable3) else msgbox "at least one of the lables is not numeric" end if​

בהצלחה

 

[sss1sss1]

עוד שאלה בקשר לאימג'

אני רוצה לקבוע מתוך הקוד איזה תמונה תיהיה ב Image1 איך אני מגדיר זאת ? תמונה נגיד מ"c:\aaa" תודה על העזרה

 

[davidea]

נניח שבעת לחיצה על לחצן כלשהו...

תעלה את התמונה הרצויה:

Private Sub Command1_Click() Picture1.Picture = LoadPicture("C:\aaa\mypic.gif") End Sub​

הפונקציה LoadPicture מעלה את התמונה אותה מצמידים לערך Picture. בהצלחה

 

[גולשגולש]

VB מפרש את ה-label כל מחרוזת

נסה

label4.caption = cint(cint(label3.caption)+cint(label2.caption))​

אביב