2تا سوال ( در باره تابع و تسکت باکس)

[Mr FTHEL]

سلام
دوستان چطوری باید یه تابع رو صدا بزنم؟
مثلا یه تابع نوشتم یک سری کارا انجام بده حالا میخوام صداش بزنم

2 چطوری مثلا یه متن بدم بعد بخوام مثلا حرف 4 روم یا حرف 7 رو برام چاپ کنه

ممنون

[محسن واژدی]

سلام علیکم

دوستان چطوری باید یه تابع رو صدا بزنم؟
مثلا یه تابع نوشتم یک سری کارا انجام بده حالا میخوام صداش بزنم
تاپیک های زیر را بررسی کنید:
http://barnamenevis.org/showthread.php?340167
http://barnamenevis.org/showthread.php?347009-مقدارهاي-بازگشتي-يک-تابع
http://barnamenevis.org/showthread.php?351704-صدا-زدن-تابع؟؟


2 چطوری مثلا یه متن بدم بعد بخوام مثلا حرف 4 روم یا حرف 7 رو برام چاپ کنه

برای چاپ کاراکتر چهارم:
Private Sub Command1_Click()
Print Mid(Text1, 4, 1)
End Sub
همچنین برای کاراکتر هفتم نیز به همین صورت عمل میکنیم

موفق باشید

[abolfazl-z]

سلام دوست من
ما تابع را به دو صورت تعریف میکنیم
1. Sub
2. Function
sub = هیچ مقداری را برنمی گرداند.
Function = مقدار بر میگرداند.

مثال Sub :


Public Sub Msg(strCaption As String)
MsgBox strCaption, 0 + 0 + 64
End Sub

نحوه استفاده در برنامه

Call Msg("Salam")

مثال Function:

Public Function Sum(a As Long, b As Long) As Long
Sum = a + b
End Function


نحوه استفاده

Print Sum(10, 10)


خوب برای سوال دومی هم :

a = Mid("Love", 3, 1)

با تابع Mid میتونی اینکار را انجام بدهی.
3 یعنی از کاراکتر سوم شروع کن
و 1 هم یعنی از کاراکتر سه که شروع کردی یکی برو جلو
بعد v را داخل a قرار میدهد.

موفق باشید.:لبخندساده:

[abolfazl-z]

:قهقهه: سلام محسن جان چه تصادفی ؟