『求助』地磅称重与eveloper的接口

地磅型号：METTLER TOLEDO 8142PRO+（梅特勒-托利多）
软件：后台数据库：Oracle 8.0
         开发工具：Developer 2000
地磅与电脑的连线接口：地磅的COM口与电脑的COM口
用QBASIC语言可以在计算机屏幕上显示地磅仪表当前的称重读数
程序如下：
Cls
locate 10,10
Print "8142Pro+ HOST demo(press esc to exit)"
Open "COM1:9600,N,CS0,DS0,CD0" For Random As #1
Do
Print #1, Chr$(2) + "2UB" + Chr$(13)
Line Input #1, b$
w$ = Mid$(b$, 5, 6)
locate 12,10
Print "display weight:"; w$; "Kg"
Loop Until inkey$ = Chr$(27)
Close #1
system

请问，如何在DEVELOPER FORM 编程，直接在FORM中取地磅仪表的称重读数，或用其他的方法将地磅的称重读数写入FORM中。
哪位大大如有这方面的经验，还望不吝赐教。