Latihan 2 Sistem Basis Data

 

 

COMMAND BUTTON ENTER
with thisform

.text5.value=.text1.text

.text6.value=.text2.text

.text7.value=.text3.text

.text8.value=.text4.text

Endwith

COMMAND BUTTON CLEAR

with thisform

.text1.value=""

.text2.value=""

.text3.value=""

.text4.value=""

.text5.value=""

.text6.value=""

.text7.value=""

.text8.value=""

.text1.setfocus()

Endwith

COMMAND BUTTON EXIT

thisform.release()

HASIL RUN