تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
تحويل نعم ولا في اداة CHECKBOX الى نص
#1
السلام عليكم ورحمة الله و بركاته

سؤال في تحويل اداة CHECKBOX الى نص في تقرير الكريستال ريبورت 2008

اليكم الصور وخطوات التنفيذ المشكلة هي في حالة ان الاداة CHECKBOX = FALSE
لا تظهر الكتابة وفي حالة ان CHECKBOX = TRUE لا توجد مشكلة اي تظهر الكتابة


الملفات المرفقة صورة/صور
                   
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم

في الشطر لا تستخدم Else استخدم if وجرب (اقصد في التقرير)

تحياتي
الرد }}}}
تم الشكر بواسطة: aftfm
#3
لم افهم

الشرط هو

كود :
IF{DTDevice.Care}= TRUE THEN "نعم"
ELSE
"لا"

يعني لا بد من ELSE
ممكن تعدل الكود
الرد }}}}
تم الشكر بواسطة:
#4
السلام عليكم

بدل الا Else اكتب

PHP كود :
if{DTDevice.Care}=False Then "لا" 

تحياتي
الرد }}}}
تم الشكر بواسطة:
#5
إذا كنت تقصد هكذا فهو يعطيني خطأ

كود :
IF{DTDevice.Care}= TRUE THEN "نعم"
if{DTDevice.Care}=False Then "لا"
الرد }}}}
تم الشكر بواسطة:
#6
طيب اخي العزيز ارفق المثال لنرى المشكلة ان امكن
الرد }}}}
تم الشكر بواسطة: aftfm
#7
تفضل اخي العزيز هذا المثال

في حالة أن السجل الذي به حقل E_OK =True
يظهر نعم
اما في حالة أن السجل الذي فيه حقل E_OK= False
لا يظهر شي


الملفات المرفقة
.rar   ExamHedDataGrid1.rar (الحجم : 154.24 ك ب / التحميلات : 45)
الرد }}}}
تم الشكر بواسطة:
#8
للمعلومية

عندما اجلب البيانات من خلال الاستعلام من قاعدة البيانات بدون استخدام DataSet , وعمل جدول بداخلها

لا توجد مشاكل
المشكلة فقط في حالة إذا استخدمت DataSet وعمل جدول به
لكن كيف يظهر في حالة أنه True و لا يظهر في حالة False
الرد }}}}
تم الشكر بواسطة:
#9
وهذا مثال للتوضيح


الملفات المرفقة
.rar   ExamHedDataGrid2.rar (الحجم : 177 ك ب / التحميلات : 38)
الرد }}}}
تم الشكر بواسطة:
#10
.....

بناءً على المثال ExamHedDataGrid2

لإظهار كلمات "نعم" و "لا" في الحقل E_OK
كود :
If {DataTable1.E_OK}
Then "نعم"
Else "لا"

منقول
لإظهار علامات صح "" وخطأ "x" في الحقل E_OK مع تغيير نوع خط الحقل إلى Wingdings
كود :
If {DataTable1.E_OK}
Then chr(252)
Else chr(251)


فقط لحل مشكلة مثالك ExamHedDataGrid2...
كود :
Do While i < DataGridView1.Rows.Count
    t = ds.Tables("DataTable1")
    dr = t.NewRow
    If DataGridView1.Rows(i).Cells(0).Value IsNot Nothing Then
        dr(0) = DataGridView1.Rows(i).Cells(1).Value.ToString
        dr(1) = DataGridView1.Rows(i).Cells(2).Value.ToString
        dr(2) = DataGridView1.Rows(i).Cells(3).Value.ToString
    End If
    t.Rows.Add(dr)
    i += 1
Loop

منقول
يمكنك استخدام الطريقة التالية بدلا من طريقتك
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Try

        Dim sql As String = " SELECT * FROM [tbl1] "
        Using da As New OleDbDataAdapter(sql, Con)
            Using dt As New DataTable

                da.Fill(dt)

                Dim rpt As New CrystalReport1
                rpt.SetDataSource(dt)

                Dim frmPrint As New frmPrint
                frmPrint.Text = "بيان بكافة الأجهزة"

                frmPrint.CrystalReportViewer1.ReportSource = rpt
                frmPrint.ShowDialog()
            End Using
        End Using
    Catch ex As Exception
        MsgBox(ex.Message)
    End Try
End Sub

.....
الرد }}}}
تم الشكر بواسطة: aftfm , Sajad


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  لا اجد اداة reprotviewer في صندوق الادوات coderarab 2 133 23-08-16, 10:12 PM
آخر رد: coderarab
  كيفية التحكم في اداة Parameters aftfm 0 476 18-01-15, 08:03 AM
آخر رد: aftfm
  [سؤال] تحويل الارقام وعمل المسلسل ؟ Mido9 13 2,751 25-01-14, 06:32 PM
آخر رد: العزابي
  [سؤال] سؤالي بخصوص اداة report viewr abid 6 1,380 15-01-14, 01:32 AM
آخر رد: myalsailamy

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم