PDA

View Full Version : حرفه ای: ایجاد حلقه تکرار برا ی چند تکست باکس مشابه



ATA_TABRIZ
پنج شنبه 09 مرداد 1399, 13:19 عصر
با سلام
دوستان من فرمی دارم که در آن چند فیلد مشابه با نام های RS1 , RS2,......RS10 است میخواهم با ا ستفاده از حلقه for از شرطی که دارم به شکل زیر استفاده کنم

for i =1 to 10
If me."RS" & i <>0 Then
..
..
..
end if

next i

لطفا نحوه تایپ قسمت مشخص شده راهنمایی بفرمائید
ممنون از لطف شما دوستان عزیز

eb_1345
پنج شنبه 09 مرداد 1399, 16:47 عصر
با سلام
دوستان من فرمی دارم که در آن چند فیلد مشابه با نام های RS1 , RS2,......RS10 است میخواهم با ا ستفاده از حلقه for از شرطی که دارم به شکل زیر استفاده کنم

for i =1 to 10
If me."RS" & i <>0 Then
..
..
..
end if

next i

لطفا نحوه تایپ قسمت مشخص شده راهنمایی بفرمائید
ممنون از لطف شما دوستان عزیز


سلام
کد رو بصورت زیر تغییر بده !



For i = 1 To 10
If Me("RS" & i) <> 0 Then
'....
'....
End If
Next i

ATA_TABRIZ
شنبه 11 مرداد 1399, 11:23 صبح
ممنون از لطف و راهنمائی شما حل شد