ارسال دو مقدار متفاوت

[farshid_king_r 12]

سلام

یادمه تو برنامه نویسی سی ++ که میخوندم یه روشی بود به این شکل:

sub jam
retunrn "Yes"
end sub

sub jam (jam as string)

end sub


sub jam (abc as int )

end sub



button1_click
dim f as string
f= jam

---

i=3

f = jam(3)

---

aaa as string
aaa="farshid
aaa= jam("test") + aaa
end sub

یعنی خودش تشخیص میداد که اگه رشته هست به بخش مربوط به رشته بفرسته ، اگه int هست به بخش خودش ، و ...

الان دقیق یادم نمیاد به چه شکل بود *dntknow*

خواهشا از دوستان اگه کسی میدونه راهنمایی کنه و اگه هم معادلش رو تو b4a میدونین که چه بهتر

ممنون

[مجید آرتا 5,874]

متوجه نشدم چی میگید ولی یک تابعی هست که اگه رشته بهش بدی و اون رشته عدد باشه میتونی عملیات ریاضی روش انجام بدی و در غیر این صورت نه :

[/b][b]	Dim S As String = "2"[/b]
[b]	If IsNumber(S) = True Then[/b]
[b]	 S = Power(S,2)[/b]
[b]	Else[/b]
[b]	Msgbox(S,"")[/b]
[b]   End If[/b][b]

امیدوارم منظورتونو بد متوجه نشده باشم