كثيرا ما أنزعج وينزعج غيري من إدراج (البرمجة) في برنامج VB حيث تتسع الصفحة!
وهذا ضعف في البرنامج.
لماذا تتسع الصفحة إذا أدرجت شفرة برمجية؟
الجواب :
لأن مبرمج VB لم يضع حدا لامتداد الحروف، فلهذا فهي تمتد إلى نهاية السطر
/n
هل هناك حل؟
نعم 
هناك دالة wordwrap
تحدد لك نهاية النص، بحيث لا يتجاوز عددا معينا من الحروف، ثم يبدأ سطر جديد، سواء أكتمل السطر السابق أم لم يكتمل.
تطبيق :
هنا في سوالف، عدل المسؤول ( المراقب العام أو غيره ) الملف بحيث يتحول من اليسار إلى اليمين.
لكن يظهر أنه زاد أمرا؛ لأن الحروف تظهر كبيرة بعد إدراج البرمجة.
نرجع إلى موضوعنا .
ضضضضضضضضضضضضضضضضضضضضضضضضضضضضضضضضضضضضضض
هذه 38 ضاد، وهي طول خانة الكتابة.
ومعلوم أن خانة الكتابة أصغر من خانة العرض. لهذا نجعل خانة العرض ضعف خانة الكتابة :
38*2 = 76
فنضع أمرا بحيث يوقف الحروف عند حد 76 ثم يبدأ سطرا جديدا
بحيث لا تتسع الصفحة.
ويمكنك تقليل هذا الحد أو زيادته.
في VB المسؤول عن عرض البرمجة هو ملف :
functions.php
في مجلد
admin
والمتغير :
$foundcode
لهذا نحدد طول هذا المتغير
كود:
$foundcode = wordwrap( $foundcode, 76 );
فتصير البرمجة كاملة :
كود:
// ######################
Start stripbrsfromcode
#######################
function stripbrsfromcode($foundcode) {
$foundcode = wordwrap( $foundcode, 80 );
$foundcode =
str_replace("\\\"","\"",$foundcode);
return "</normalfont><blockquote>
<pre><smallfont>برمجة
:</smallfont><hr><div dir='ltr'>
" . str_replace("<br>", "",
str_replace("<br />", "",
$foundcode) ) . "<hr></pre>
<normalfont></blockquote>";
}
حاولت تطبيق هذا -أيضا- على إدراج برمجة PHP لكنها لم تنفع.
ولعل هذا يرجع إلى أن عرض برمجة PHP له طريقة خاصة تؤثر على عمل دالة
لكن هناك حل 
وهو أن ندرج سطرا إضافيا بعد الحد المطلوب :
كود PHP:
$buffer = wordwrap( $buffer, 55, "\n", 1);
حيث إن $buffer هو المسؤول عن عرض برمجة PHP
ابحث في حدود السطر 804 عن
كود PHP:
$buffer = str_replace(""", "\"", $buffer);
}
ثم حذف
كود PHP:
return "</normalfont><blockquote>
<pre><smallfont>PHP :
</smallfont><hr>$buffer<hr>
</pre></blockquote>
<normalfont>";
وضع بدلا منها :
كود PHP:
$buffer = wordwrap( $buffer, 55, "\n", 1);
return "</normalfont><blockquote>
<pre><smallfont>
PHP :</smallfont><hr>
<div dir='ltr'>$buffer<hr></pre>
</blockquote>
<normalfont>";
وتمتع بتنسيق جميل لا اتساع فيه !
يمكنك الاستفادة من هذه الدالة في تحديد أطوال النصوص المعروضة، لكي لا يفسد النص تنسيق الصفحة
ولكي لا تتعب
فقد اضطررت إلى تقطيع البرمجة السابقة إلى أسطر يدويا لكي تظهر بهذا الشكل
أدرجت ملفا لكي تحصل على النص الأصلي لهذه المشاركة