استفاده از code module

[vahid_d_0101 31]

با سلام من میخوام یه code module ایجاد کنم و از داخل اکتیویتی هام یه متن را براش بفرستم و اون متن را مثلا در 2 ضرب کنه و داخل تکست اکتیویتی بنویسه ه کار باید بکنم ؟

میدونم مثلا این تابع را درست میکنم

(Sub Vahid(text As String

text = text * 2

end sub

و باید اینجوری تابع را بخونم

mycode.vahid("2"(

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

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

به این حالت مینویسی :

Sub Zarb(Num As String) As String
Num = Num * 2
Return Num
End Sub

نحوه کرفتن مقدار »

EditText1.Text =MyCode.Zarb("3")