这个要求如何实现！

这个要求怎么实现！！
我的要求：有2个div：div1和div2，其中div2在div1里面，现在要在div2中添加100个table，这些table只能水平排列，而且div2只能出现水平滚东条，如果有多个div2，div1只能出现垂直滚动条。怎么实现

下面是我的代码：

Private Sub Command5_Click()
    Dim w1 As String, i As Long
    w1 = "<div id='div1' style='overflow-y:auto;>" ''' 只能出现垂直滚动条
    w1 = w1 & "<div id='div2' style='overflow-x:auto;>" '' 只能出现水平滚动条
    For i = 1 To 100
        '''这100个table只能在div2中水平排列，不能折行！
        w1 = w1 & "<table border='1' cellspacing='0' cellpadding='0' style='float:left' width='100' height='100'>"
        w1 = w1 & "<tr><td>...</td></tr>"
        w1 = w1 & "</table>"
    Next
    w1 = w1 & "</div>"
    w1 = w1 & "</div>"
    WB.Document.body.innerHTML = w1
End Sub

------解决方案--------------------
这个是样式表的问题 在 div2 中添加样式就能解决 
建议去 样式表专区问下 或者 直接转过去