jannati
شنبه 23 اسفند 1382, 14:05 عصر
دوستان سلام
من یک برنامه نوشتم که اطلاعاتی را از databaseمیخونه ودر یک treeviewقرار میده.برای هر level هم یک علامت تعریف کردم.مثلا برای سرفصلها M.حالا مشکلم اینجاست که وقتی دفعه اول databaseرو میخونه سرفصل رو سرجاش مینویسه.اما در فصلهای بعدی هرچی margin rightرو ست میکنم زیر اولین زیر فصل نمینویسه.لطفا کد زیر رو یه نگاهی بکنید:
Case sMENU
iCurLevel = iCurLevel + 1
iCurMenu = iCurMenu + 1
sReturn = sReturn _
& "<IMG SRC=""images/bullet-plus.png"" ID=MI-" & iCurMenu & "><SPAN ID=MT-" & iCurMenu & ">" & Trim(rsMenu(3)) & "</SPAN><BR>" _
& vbCrLf _
& String(iCurLevel, vbTab) _
& "<DIV ID=C-" & iCurMenu & " STYLE=""margin-left:" & iaMarginLeft(iCurLevel) & "; display:None;"">"
در اینجا iaMrginleftیک آرایه است که مقادیر 10و15و20و...را دارد.
کسی میتونه کمک کنه؟ :cry: :?
من یک برنامه نوشتم که اطلاعاتی را از databaseمیخونه ودر یک treeviewقرار میده.برای هر level هم یک علامت تعریف کردم.مثلا برای سرفصلها M.حالا مشکلم اینجاست که وقتی دفعه اول databaseرو میخونه سرفصل رو سرجاش مینویسه.اما در فصلهای بعدی هرچی margin rightرو ست میکنم زیر اولین زیر فصل نمینویسه.لطفا کد زیر رو یه نگاهی بکنید:
Case sMENU
iCurLevel = iCurLevel + 1
iCurMenu = iCurMenu + 1
sReturn = sReturn _
& "<IMG SRC=""images/bullet-plus.png"" ID=MI-" & iCurMenu & "><SPAN ID=MT-" & iCurMenu & ">" & Trim(rsMenu(3)) & "</SPAN><BR>" _
& vbCrLf _
& String(iCurLevel, vbTab) _
& "<DIV ID=C-" & iCurMenu & " STYLE=""margin-left:" & iaMarginLeft(iCurLevel) & "; display:None;"">"
در اینجا iaMrginleftیک آرایه است که مقادیر 10و15و20و...را دارد.
کسی میتونه کمک کنه؟ :cry: :?