mover.prg

MSComm控件资料,Visual Basic 6.0(以下简称VB) 是一种功能强大、简单易学的程序设计语言。它不但保留了原先Basic语言的全部功能

*  Program...........: MOVER.PRG
*  Author............: Menachem Bazian, CPA               
*  Project...........: Visual Codebook 3.0                
*  Created...........: June 01, 1995 - 17:05:04
*  Copyright.........: (c) Flash Creative Management, Inc     , 1995
*) Description.......: A wrapper for the standard mover dialog
*  Calling Samples...: 
*  Parameter List....: taFullList - Array with the full list in it
*                    : taSelectedList - Array to hold the selected items
*                    : tlNoSort
*  Major change list.: 

#INCLUDE 'INCLUDE\APPINCL.H'

PARAMETERS taFullList, taSelectedList, tlNoSort
LOCAL loMoverForm

loMoverForm  = CREATEOBJECT("moverform")
loMoverForm.cSelectedListRowSource  = "taSelectedList"
loMoverForm.cFullListRowSource      = "taFullList"
loMoverForm.MoverContainer_Dialog1.lstFullList.lSorted = !tlNoSort
loMoverForm.Refresh()

loMoverForm.Show(WIN_MODAL)

RETURN