تبلیغات
آموزش نرم افزار های تخصصی - نمایش مقادیر تکس باکس بصورت tooltip و نمایش موقعیت رکورد جاری بر روی فرم
tooltip  در فرم


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

در ادامه مطلب همراه من باشید . 

1. ابتدا جدول خود را با هر نوع رکورد و مشخصاتی که مد نظر دارید را طراحی و ذخیره نمایید .

2. از جدول خود یک فرم تهیه نموده و فیلدهای مورد نظر را درون فرم خود قرار دهید .

3.در حالت طراحی فرم خود کلیدهای ترکیبی ALT+F11  را فشرده تا وارد محیط کد نویسی شوید .

4. از منوی Insert  گزینه module  را انتخاب نموده و در محیط مزبور قطعه کدهای زیر را وارد نمایید .

Public Sub sShowToolTip(frm As Form)
Dim ctl As Control, i As Integer
    On Error Resume Next
    For Each ctl In frm.Controls
        With ctl
            If .ControlType = acTextBox Then
                .ControlTipText = .Value

            ElseIf .ControlType = acComboBox Then
                If .ColumnCount = 2 And .Value <> "" Then
                    .ControlTipText = .Column(.BoundColumn)
                End If
            End If
        End With
    Next ctl
    Set ctl = Nothing:    Set frm = Nothing
End Sub
حال ماژول خود را ذخیره نموده و دوباره وارد محیط طراحی فرم خود شوید .
5. یک برچسب برای نمایش موقعیت رکورد جاری بر روی فرم ایجاد نموده نام آن را بصورت lblnavigate   و در خاصیت caption آن عبارت موقعیت رکورد  را وارد نمایید


6. در پنجره property sheet  شی فرم را انتخاب نموده و در رویداد current  آن کدهای زیر را وارد نمایید .
ویژگی های فرم

Private Sub Form_Current()
    Call sShowToolTip(Me)
   
       If Me.NewRecord Then
        Me!lblNavigate.Caption = "رکورد جدید"
    Else
        With Me.RecordsetClone
            .Bookmark = Me.Bookmark
            Me!lblNavigate.Caption = "رکورد " & _
                    .AbsolutePosition + 1 _
                    & " از " & .RecordCount
        End With
    End If

End Sub
حال فرم خود را اجرا نموده و نتیجه کار را مشاهده نمایید .


در صورت وجود هر  سوال و مشکلی در قسمت نظرات پرسیده شود تا پاسخ داده شود .


طبقه بندی: آموزش ACCESS، ترفند Access ،
برچسب ها:نمایش موقعیت رکورد در جدول اکسس، tooltip، مقادیر تکس باکس،
تاریخ : سه شنبه 12 دی 1396 | 11:36 ب.ظ | نویسنده : امید شهری | نظرات()
.: Weblog Themes By Bia2skin :.