ÒÔÏÂΪеĺ¯Êý˵Ã÷£º
£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½
º¯ÊýÃû:RepDetail_Format()
µ÷Óñ¨±í±ØÐëʹÓÿؼþ£º£¨Îı¾¿ò£©
txtRecord_NO ÔÚÖ÷Ìå½Ú ¿É¼û ÓÃÓÚÏÔʾ¼Ç¼ºÅ£¬¿ÉÑ¡
txtTotGrp ÔÚÖ÷Ìå½Ú ²»¿É¼û =Count(*) ÓÃÓÚÈ¡µÃ±¨±íµÄ×ܼǼÊý£¬±ØÐë
txtCurrentPage ÔÚÖ÷Ìå½Ú ²»¿É¼û =[Page] ÓÃÓÚÈ¡µÃµ±Ç°Ò³Êý£¬±ØÐë

²ÎÊý˵Ã÷£º RepName ±¨±íÃû³Æ £¨µ±Ç°±¨±í¿ÉÓà (Me), ÆäËü±¨±í¿ÉÓãº(Reports.±¨±íÃû)ÒýÓã©£¬±ØÐë
txtCurrentPage ±¨±íÖ÷Ìå½ÚÉϵÄ[txtCurrentPage]Îı¾¿ò¿Ø¼þ ,±ØÐë
txtRecordNum ±¨±í¶¨ÒåµÄ˽È˱äÁ¿ Êý¾ÝÀàÐÍ:Integer ÓÃÓڼǼÊýµÄµÝÔö£¬±ØÐë
£¨×¢£ºÔÚ±¨±íÄ£¿é¶¥²¿ÉùÃ÷ £º Private txtRecordNum As Integer £©
txtTotGrp ±¨±íÖ÷Ìå½ÚÉϵÄ[txtTotGrp]Îı¾¿ò¿Ø¼þ £¬±ØÐë
IntPrintLen ±¨±í´òÓ¡µÄÐÐÊý¡£
-----Êý¾ÝÀàÐÍ:Integer £¨×¢£º²»¿É³¬¹ýÿҳÔÊÐíµÄ×î´ó¼Ç¼Êý£©£¬¿ÉÑ¡£¬£¨Ä¬ÈÏ£º25 ÐУ©
DouPageLine ±¨±íÖ÷Ìå¼Ç¼²¿·Ö´òÓ¡³¤¶È¡£
-----Êý¾ÝÀàÐÍ:Double £¨×¢£º²»¿É³¬¹ýÿҳÔÊÐíµÄ×î´ó¼Ç¼Êý£©£¬¿ÉÑ¡£¬£¨Ä¬ÈÏ£º21 CM £©
FontSize ±¨±í¼Ç¼²¿·Ö×ֺš£
-----Êý¾ÝÀàÐÍ:Integer £¨×¢£º²»¿É³¬¹ýÿҳÔÊÐíµÄ×î´ó¼Ç¼Êý£©£¬¿ÉÑ¡£¬£¨Ä¬ÈÏ£º0 ×ֺŲ»±ä£©
txtRecord_NO ¼Ç¼ÐòºÅÎı¾¿òÃû³Æ¡£
-----Êý¾ÝÀàÐÍ:String £¨×¢£º²»¿É³¬¹ýÿҳÔÊÐíµÄ×î´ó¼Ç¼Êý£©£¬¿ÉÑ¡£¬£¨È±Ê¡ÎªÃ»ÓÐʹÓã©

ʹÓ÷½·¨£º
1,Ïȶ¨Òåһ˽È˱äÁ¿£ºPrivate txtRecordNum As Integer,±ØÐë
2,±¨±íÖ÷Ìå½ÚµÄ¸ñʽ»¯Ê¼þÖе÷Óã¨Detail_Format ʼþ£©

µ÷Ó÷½·¨£ºNextRecord=RepDetail_Format(RepName , txtCurrentPage.text , txtRecordNum , txtTotGrp.text , IntPrintLen)
ʹÓÃʾÀý£ºNextRecord = RepDetail_Format(Me, [txtCurrentPage], txtRecordNum, [txtTotGrp], 20)
±¾º¯ÊýÓÉ binuochao (Ðíΰ¾ü) Íê³É¡£ÖÆ×÷ÓÚ2003-06-27 Email:[email protected] QQ:10077241

£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½£½