نمایش نتایج 1 تا 13 از 13

نام تاپیک: درخواست راهنمائی تکست باکس

  1. #1
    کاربر دائمی
    تاریخ عضویت
    آبان 1397
    محل زندگی
    شیراز
    پست
    315

    درخواست راهنمائی تکست باکس

    با سلام و احترام خدمت کلیه اساتید و دوستان گرامی
    در خصوص نحوه اتصال مقادیر یک فیلد به همدیگر و نمایش آنها در یک تکست باکس سوال داشتم که درصورت امکان لطفا راهنمایی بفرمائید . منظور این است که در یک فیلد تعداد 5 نام مانند علی ، حسین و .... داریم می خواهم زمانی که گزارش باز می شود در یک تکست باکس این مقادیر به صورت پیوسته شبیه "" علی-حسین -.... "" نمایش داده شوند . یعنی تمام مقادیر فیلد در یک تکست باکس نمایش داده شود . ممنون
    فایل های ضمیمه فایل های ضمیمه

  2. #2
    کاربر دائمی
    تاریخ عضویت
    آبان 1397
    محل زندگی
    شیراز
    پست
    315

    نقل قول: درخواست راهنمائی تکست باکس

    لطفا اساتید محترم راهنمائی بفرمایند

  3. #3
    کاربر دائمی آواتار mohammadsaleh
    تاریخ عضویت
    شهریور 1386
    محل زندگی
    تهران
    پست
    679

    نقل قول: درخواست راهنمائی تکست باکس

    me.textbox=[a]& " - " & [b]& " - " & [c] & " - " & [d] & " - " & [e]  


    به جای حروف نام تکست باکسهات رو بنویس

  4. #4
    کاربر دائمی
    تاریخ عضویت
    آبان 1397
    محل زندگی
    شیراز
    پست
    315

    نقل قول: درخواست راهنمائی تکست باکس

    استاد گرامی ممنون از راهنمائی شما
    ولی من واقعا متوجه نشدم که این کد را باید درکجا و چجوری بنویسم
    درصورت امکان لطفا نمونه پیوست را اصلاح بفرمائید . ارادتمند

  5. #5
    کاربر دائمی
    تاریخ عضویت
    آبان 1397
    محل زندگی
    شیراز
    پست
    315

    نقل قول: درخواست راهنمائی تکست باکس

    لطفا راهنمائی بفرمائید

  6. #6
    کاربر دائمی
    تاریخ عضویت
    آبان 1397
    محل زندگی
    شیراز
    پست
    315

    نقل قول: درخواست راهنمائی تکست باکس

    اساتید محترم لطفا راهنمائی بفرمایید

  7. #7
    کاربر دائمی
    تاریخ عضویت
    آبان 1397
    محل زندگی
    شیراز
    پست
    315

    نقل قول: درخواست راهنمائی تکست باکس

    اساتید محترم لطفا راهنمائی بفرمایید .یعنی واقعا این موضوع راهی ندارد

  8. #8
    کاربر دائمی آواتار mazoolagh
    تاریخ عضویت
    اردیبهشت 1384
    سن
    71
    پست
    3,030

    نقل قول: درخواست راهنمائی تکست باکس


    Function Concat(TableName As String, FieldName As String) As String
    Dim rs As Recordset
    Dim A As Variant
    Dim i, N As Integer
    Dim X() As String
    Set rs = CurrentDb.OpenRecordset("SELECT " & FieldName & " FROM " & TableName)
    rs.MoveLast
    rs.MoveFirst
    N = rs.RecordCount
    A = rs.GetRows(N)
    ReDim X(N - 1)
    For i = 0 To N - 1
    X(i) = A(0, i)
    Next
    Concat = Join(X, "-")
    rs.Close
    Set rs = Nothing
    End Function

  9. #9
    کاربر دائمی آواتار mazoolagh
    تاریخ عضویت
    اردیبهشت 1384
    سن
    71
    پست
    3,030

    نقل قول: درخواست راهنمائی تکست باکس

    Function Concat2(TableName As String, FieldName As String) As String
    Dim rs As Recordset
    Dim N As Integer
    Dim X() As String
    Set rs = CurrentDb.OpenRecordset("SELECT " & FieldName & " FROM " & TableName)
    rs.MoveLast
    rs.MoveFirst
    N = rs.RecordCount
    ReDim X(N - 1)
    Do While Not rs.EOF
    X(rs.AbsolutePosition) = rs(0)
    rs.MoveNext
    Loop
    Concat2 = Join(X, "-")
    rs.Close
    Set rs = Nothing
    End Function

  10. #10
    کاربر دائمی آواتار mazoolagh
    تاریخ عضویت
    اردیبهشت 1384
    سن
    71
    پست
    3,030

    نقل قول: درخواست راهنمائی تکست باکس

    Function Concat3(TableName As String, FieldName As String) As String
    Dim rs As Recordset
    Set rs = CurrentDb.OpenRecordset("SELECT " & FieldName & " FROM " & TableName)
    Do While Not rs.EOF
    Concat3 = Concat3 + rs(0) + "-"
    rs.MoveNext
    Loop
    Concat3 = Left(Concat3, Len(Concat3) - 1)
    rs.Close
    Set rs = Nothing
    End Function

  11. #11
    کاربر دائمی آواتار mazoolagh
    تاریخ عضویت
    اردیبهشت 1384
    سن
    71
    پست
    3,030

    نقل قول: درخواست راهنمائی تکست باکس


  12. #12
    کاربر دائمی آواتار mazoolagh
    تاریخ عضویت
    اردیبهشت 1384
    سن
    71
    پست
    3,030

    نقل قول: درخواست راهنمائی تکست باکس

    برنامه نمونه
    فایل های ضمیمه فایل های ضمیمه

  13. #13
    کاربر دائمی
    تاریخ عضویت
    آبان 1397
    محل زندگی
    شیراز
    پست
    315

    نقل قول: درخواست راهنمائی تکست باکس

    با سلام و احترام
    ممنون از پاسخگوئی جنابعالی کاملا موضوع حل شد

تاپیک های مشابه

  1. پاسخ: 1
    آخرین پست: یک شنبه 06 فروردین 1396, 09:01 صبح
  2. پاسخ: 2
    آخرین پست: جمعه 31 مرداد 1393, 10:12 صبح
  3. سوال: ساخت چند یوزر پس برای هاست و محدود کردن هاست برای نویسندگان هاست.
    نوشته شده توسط rezanic در بخش توسعه وب (Web Development)
    پاسخ: 0
    آخرین پست: شنبه 04 مرداد 1393, 21:07 عصر
  4. پاسخ: 7
    آخرین پست: سه شنبه 28 آذر 1391, 13:48 عصر

قوانین ایجاد تاپیک در تالار

  • شما نمی توانید تاپیک جدید ایجاد کنید
  • شما نمی توانید به تاپیک ها پاسخ دهید
  • شما نمی توانید ضمیمه ارسال کنید
  • شما نمی توانید پاسخ هایتان را ویرایش کنید
  •