نجوم المشاركات

السلام عليكم إستخدم دالة vbnewline لعمل سطر جديد وايضا دالة vbcrlf تأدي نفس عمل الدالة السابقة مثال لإستخدام سطر جديد بدالة vbnewline Sub A_ali() S = "TOP" MsgBox "officena" & vbNewLine & S, vbInformation, "WELCOME" End Sub وهذا لإستخدام سطر جديد بدالة vbcrlf Sub B_ali() S = "TOP" MsgBox "officena" & vbCrLf & S, vbInformation, "WELCOME" End Sub وهكذا لمضاعفة المسافة كسطر جديد Sub C_ali() S = "TOP" MsgBox "officena" & vbCrLf & vbNewLine & S, vbInformation, "WELCOME" End Sub والسلام عليكم