text(i).text [بایگانی] - برنامه نویس

mahmoodreza

چهارشنبه 28 بهمن 1383, 21:12 عصر

سلام
آیا راه حلی برای این مشکل دارید ؟

for i= 1 to n-1
text(i).text = rs!answer
rs.movenext
next

و یا حتی چک باکس ؟؟
ممنون میشم کمک کنید
چطوری میتونم که بوده اینکه تعداد تکستباکس ر بدونم بهش مقدار بدم ؟

حامد مصافی

پنج شنبه 29 بهمن 1383, 00:12 صبح

چطوری میتونم که بوده اینکه تعداد تکستباکس ر بدونم بهش مقدار بدم ؟

:گیج: :گیج: :گیج: :گیج:

لطفاً سوالتون رو واضح تر بیان کنید

بمب منطقی

پنج شنبه 29 بهمن 1383, 01:32 صبح

والا من خیلی وقته vb کار نمیکنم ولی تا اونجایی که یادمه باید یک آرایه از نوع Object (نوعش رو دقیق یادم نیست)تولید کنی و بعدشم هم دیگه معلومه باید چیکار کنی...

حامد مصافی

پنج شنبه 29 بهمن 1383, 01:46 صبح

والا من خیلی وقته vb �ار نمی�نم ولی تا اونجایی �ه یادمه باید ی� آرایه از نوع Object (نوعش رو دقیق یادم نیست)تولید �نی و بعدشم هم دیگه معلومه باید چی�ار �نی...

اگه منظور جناب mahmoodreza اینه که تعداد تکست باکس ها رو در زمان اجرا تعیین کنند باید عرض کنم

در زمان طراحی فقط یک تکست باکس روی فرم قرار بدین و Index اون رو برابر صفر بذارین
حالا در زمان اجرا با فرمان زیر می تونین یک تکست باکس جدید ایجاد کنین

Load Text1(Text1.Ubound + 1)

و با دستور زیر یک تکست باکس حذف میشه

Unload Text1(Text1.Ubound)

Hamedm

پنج شنبه 29 بهمن 1383, 08:24 صبح

سلام
آیا راه حلی برای این مشکل دارید ؟

for i= 1 to n-1
text(i).text = rs!answer
rs.movenext
next

و یا حتی چک باکس ؟؟
ممنون میشم کمک کنید
چطوری میتونم که بوده اینکه تعداد تکستباکس ر بدونم بهش مقدار بدم ؟

اگه ممکنه بیشتر توضیح بدین. ممنون.

موفق باشید و پرتوان

ehsan707

پنج شنبه 29 بهمن 1383, 09:06 صبح

حتی اگر کنترل شما آرایه نیست شما میتونید تعداد آنها رو در زمان اجرا در یک حلفه شمارش کنید

for each control
و بعد با یک شرط

if a is textbox

mahmoodreza

جمعه 30 بهمن 1383, 21:13 عصر

BlackDa ممنون

Behrouz_Rad

جمعه 30 بهمن 1383, 21:44 عصر

if a is textbox
این خط صحیح نیست.
حتی اگر منظور شبه کد باشد باید به شکل صحیح نوشته شود.

If TypeOf a Is TextBox Then
'Do Statements

حامد مصافی

شنبه 01 اسفند 1383, 00:41 صبح

if a is textbox
این خط صحیح نیست.
حتی اگر منظور شبه �د باشد باید به ش�ل صحیح نوشته شود.

If TypeOf a Is TextBox Then
'Do Statements

بله جناب ehsan707 بهروز درست میگه در عملگر مقایسه ای Is باید دو شی دو طرف عملگر مساوی باشن نه هم جنس!!!!

for each control

متاسفانه باید بگم که این خط هم ایراد داره
درستش اینه

Dim c As Control
For Each c In Controls
' Do Statements
Next c