IBM Lotus Symphony


‏‎RTrim Function [Runtime]‎‏

يتم حذف المسافات التي توجد في نهاية تعبير مجموعة حروف.

أنظر أيضا: LTrim Function

الصيغة:

RTrim (Text As String)

القيمة المرتجعة:

مجموعة حروف

المعاملات:

النص: أي تعبير من مجموعة حروف.

أكواد الخطأ

5 استدعاء غير صحيح للاجراء

مثال:

Sub ExampleSpaces

Dim sText2 as String,sText as String,sOut as String

sText2 = " <*Las Vegas*> "

sOut = "'"+sText2 +"'"+ Chr(13)

sText = Ltrim(sText2) REM sText = " <*Las Vegas*> "

sOut = sOut + "'"+sText +"'" + Chr(13)

sText = Rtrim(sText2) REM sText = " <*Las Vegas*> "

sOut = sOut +"'"+ sText +"'" + Chr(13)

sText = Trim(sText2) REM sText = " <*Las Vegas*> "

sOut = sOut +"'"+ sText +"'"

MsgBox sOut

end sub


التعليق التقييمي عن البرنامج | المزيد من المطبوعات الفنية | العلامات التجارية