چطور میشه از یه تابع بیشتر از یدونه خروجی گرفت مثلا دوتا خروجی !؟؟؟!

[Shadijon]

ممنون میشم دوستان راهنماییم کنید .

[MohammadGh2011]

لطفا بيشتر توضيح دهيد که ميخوايد چيکار کنيد تا بهتر بشه راهنماييتون کرد


موفق باشيد

[M.T.P]

هر تابع یک خروجی بیشتر نداره ، اما می تونید مقادیری رو به عنوان پارامتر به تابع ارسال کنید و مقدار جدیدی رو به آنها نسبت دهید.



Private Sub Form_Load()
Dim StrNewsText As String
Dim IntNewsID As Integer
Call News(StrNewsText, IntNewsID)
MsgBox StrNewsText & vbCrLf & CStr(IntNewsID)
End Sub

Function News(ByRef sNews As String, ByRef nID As Integer) As Boolean
sNews = "Today news..."
nID = 1000
End Function

[Felony]

میتونید یک Type تعریف کنید که مثلا حاوی چند تا فیلد مختلف باشه و نوع برگشتی تابعتون رو همون Typeدر نظر بگیرید .