PROGRAM APLIKASI MATA KULIAH

ini adalah tampilannya: 



dan ini adalah skripnya :

object: form1        procedure: activate
==================================
thisform.text1.Value = ''
thisform.text2.Value = ''
thisform.text3.Value = 0
thisform.text1.setfocus ()


object: command3   procedure:  clik
=================================
SELECT matakuliah
IF FOUND()
     replace matakuliah.kode WITH thisform.text1.value
     replace matakuliah.mt_kuliah WITH thisform.text2.value
     replace matakuliah.sks WITH thisform.text3.value
     thisform.grid1.Refresh()
ELSE
APPEND BLANK
     replace matakuliah.kode WITH thisform.text1.value
     replace matakuliah.mt_kuliah WITH thisform.text2.value
     replace matakuliah.sks WITH thisform.text3.value
     thisform.GRID1.REFRESH()
endif


object: COMMAND4       procedure: CLIK
===============================
THISFORM.RELEASE

Menampilkan Aplikasi Microsoft Office di Dalam Form

Bila di posting Cara Mudah Menampilkan Dokumen PDF di Form, kita telah mencoba untuk menampilkan dokumen pdf ke dalam form, berikut ini kita akan mencoba membuka dokumen Microsoft Office (doc, docx, xls, xlsx, ppt, ptx) ke dalam form. Cara yang digunakan secara garis besar hampir sama dengan menampilkan dokumen pdf yaitu memanfaatkan Active X Microsoft Web Browser, tetapi ada beberapa hal lain yang harus dilakukan khususnya bila aplikasi Microsoft Office yang terinstal di dalam Sistem Operasi adalah Microsoft Office 2007 keatas. Di bawah ini adalah contoh tampilan form yang digunakan untuk menampilkan Aplikasi Microsoft Office Word.

Berikut ini adalah langkah - langkah yang teman - teman dapat ikuti, untuk dapat menggunakan kontrol ActiveX Microsoft Web Browser untuk menampilkan dokumen Microsoft Office :