CARA: Mengkonversi Format waktu singkat ke format yang berbeda pada Access 2000

Terjemahan Artikel Terjemahan Artikel
ID Artikel: 210185 - Melihat produk di mana artikel ini berlaku.
Perbesar semua | Perkecil semua

Pada Halaman ini

RINGKASAN

Artikel ini menunjukkan kepada Anda bagaimana untuk membuat contoh fungsi yang dapat Anda gunakan untuk format Format properti yang waktu singkat pengaturan untuk yang setara desimal, untuk mengkonversi menit untuk waktu singkat, atau untuk mengkonversi waktu singkat ke menit.Microsoft menyediakan contoh pemrograman hanya sebagai ilustrasi, tanpa jaminan apa pun baik tersurat maupun tersirat. Termasuk, namun tidak terbatas pada, jaminan tersirat mengenai kelayakan untuk diperdagangkan atau kesesuaian untuk keperluan tertentu. Artikel ini mengasumsikan bahwa Anda telah terbiasa dengan bahasa pemrograman yang ditunjukkan dan dengan alat yang digunakan untuk membuat dan mendebug prosedur. Teknisi dukungan Microsoft dapat membantu menjelaskan fungsionalitas prosedur tertentu, namun mereka tidak akan memodifikasi contoh untuk memberikan fungsionalitas tambahan atau menyusun prosedur untuk memenuhi persyaratan khusus Anda.

Konversi waktu singkat ke Format desimal

Berikut contoh fungsi mengkonversi waktu singkat ke format desimal. Dalam format desimal, kisaran nilai waktu berlaku dari.0 (00: 00:00) untuk 999999 (23: 59:59). Nilai numerik yang merupakan sebagian kecil dari satu hari. Anda dapat mengkonversi nilai numerik menjadi jam, menit dan detik oleh mengalikan nilai numerik oleh 24. Hal ini ditunjukkan pada langkah 2. Pada membuat contoh fungsi, ikuti langkah berikut:
  1. Buat modul dan ketik baris berikut di bagian Deklarasi jika tidak sudah ada:
    Option Explicit
    					
  2. Jenis prosedur berikut:
    Function TimeToDec(MyTime)
       TimeToDec = CDbl(MyTime) * 24
    End Function
    					
  3. Untuk menguji fungsi ini, ketik baris berikut di jendela segera, dan kemudian tekan ENTER:
    ?TimeToDec(#6:30#)
    						
    Perhatikan bahwa jendela segera kembali 6,5.

    CATATAN: Jika Anda tidak kalikan CDbl(MyTime) oleh 24, jendela segera kembali 0.270833333333333

Mengkonversi menit untuk waktu singkat Format

Untuk membuat contoh fungsi yang mengubah menit ke format waktu singkat, Ikuti langkah berikut:
  1. Buat modul dan ketik baris berikut di bagian Deklarasi jika tidak sudah ada:
    Option Explicit
    					
  2. Jenis prosedur berikut.
    Function MinToTime(MyMinute)
       MinToTime = MyMinute \ 60 & ":" & Format((Abs(MyMinute Mod 60)),"00")
    End Function
    					
  3. Untuk menguji fungsi ini, ketik baris berikut di jendela segera, dan kemudian tekan ENTER:
    ?MinToTime(390)
    						
    Perhatikan bahwa jendela segera kembali 6: 30.

Mengubah waktu singkat untuk menit

Untuk membuat contoh fungsi yang mengubah waktu singkat untuk menit, ikuti langkah-langkah berikut:
  1. Buat modul dan ketik baris berikut di bagian Deklarasi jika tidak sudah ada:
    Option Explicit
    					
  2. Jenis prosedur berikut:
    Function TimeToMin (MyTime)
       TimeToMin = CInt(CDbl(MyTime) * 24 * 60)
    End Function
    					
  3. Untuk menguji fungsi ini, ketik baris berikut di jendela segera, dan kemudian tekan ENTER:
    ?TimeToMin(#6:30#)
    						
    Perhatikan bahwa jendela segera kembali 390.



REFERENSI

Untuk informasi tambahan tentang menghitung nilai-nilai tanggal/waktu, silakan lihat artikel berikut pada Basis Pengetahuan Microsoft:
210276 ACC2000: Menyimpan, menghitung dan membandingkan Data tanggal/waktu
210604 ACC2000: Fungsi untuk menghitung dan menampilkan nilai-nilai tanggal/waktu
Untuk informasi lebih lanjut tentang cara memformat tipe data tanggal/waktu, klik Microsoft akses bantuan pada Bantuan menu, jenis format properti - tanggal jenis di kantor asisten atau jawaban Wizard, dan kemudian klik Mencari untuk melihat topik.










Note This is a "FAST PUBLISH" article created directly from within the Microsoft support organization. The information contained herein is provided as-is in response to emerging issues. As a result of the speed in making it available, the materials may include typographical errors and may be revised at any time without notice. See Terms of Use for other considerations.

Properti

ID Artikel: 210185 - Kajian Terakhir: 19 September 2011 - Revisi: 2.0
Berlaku bagi:
  • Microsoft Access 2000 Standard Edition
Kata kunci: 
kbhowto kbhowtomaster kbprogramming kbmt KB210185 KbMtid
Penerjemahan Mesin
PENTING: Artikel ini diterjemahkan menggunakan perangkat lunak mesin penerjemah Microsoft dan bukan oleh seorang penerjemah. Microsoft menawarkan artikel yang diterjemahkan oleh seorang penerjemah maupun artikel yang diterjemahkan menggunakan mesin sehingga Anda akan memiliki akses ke seluruh artikel baru yang diterbitkan di Pangkalan Pengetahuan (Knowledge Base) dalam bahasa yang Anda gunakan. Namun, artikel yang diterjemahkan menggunakan mesin tidak selalu sempurna. Artikel tersebut mungkin memiliki kesalahan kosa kata, sintaksis, atau tata bahasa, hampir sama seperti orang asing yang berbicara dalam bahasa Anda. Microsoft tidak bertanggung jawab terhadap akurasi, kesalahan atau kerusakan yang disebabkan karena kesalahan penerjemahan konten atau penggunaannya oleh para pelanggan. Microsoft juga sering memperbarui perangkat lunak mesin penerjemah.
Klik disini untuk melihat versi Inggris dari artikel ini:210185

Berikan Masukan

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com