جدا سازی هوشمند یک متن

[www.pc3enter.tk]

سلام یک سوال دارم

چه طوری میشه این متن را (تاکید می کنم این متن) 40.693=58.610005 را از هم با برنامه نویسی طوری جدا سازی کنم
که عدد اول را در تکس باس اول
و عدد دوم را در تکس باکس دوم نوشته و یا ذخیره بشه

باتشکر

[vbhamed]

سلام
Dim s$()
s = Split("40.693=58.610005", "=")
Text1 = s(0)
Text2 = s(1)

[www.pc3enter.tk]

سلام خيلي ممنون
منظور از نوع دستور
Dim s$()
چيه وكاربردش به چه شكل عمل ميكنه

[vbhamed]

سلام
این دستور یک آرایه رشته ای بدون تعداد عناصر و ابعاد تعیین می‌کنه و تابع Split بعد از اجرا آرایه ای برمی‌گردونه که اینجا آرایه رشته ای ما بعد می‌گیره و مقادیر در اون جایگزین میشه