我的Chrome浏览器有问题。当我使用“div”和顶部和底部边框制作自定义“hr”标签时,边框之间有一条白色的1px线... IE和Firefox做得很好。
.nav_links_container_line {
border-top: 1px solid #096ebd;
border-bottom: 1px solid lightgrey;
}
<br><br><br><br>
<div class="nav_links_container_line"></div>
我尝试不同的东西(溢出,高度0px),但没有成功。 我的Chrome浏览器是最新的(版本62.0.3202.94)
谢谢 西蒙
答案 0 :(得分:0)
使用真实'include reference to Microsoft Outlook XX.0 Object Library
Public Sub copyInbox()
Dim ns As Outlook.Namespace
On Error GoTo hell
Dim sourceFolder As Outlook.MAPIFolder
Dim copyToFolder As Outlook.MAPIFolder
Dim subfolder As Outlook.MAPIFolder
Dim objItem As Outlook.MailItem
Dim objItemCopy As Outlook.MailItem
Set ns = Application.GetNamespace("MAPI")
Set copyToFolder = ns.Folders("MASTER PST").Folders("Inbox")
'Personal folder called 'MASTER PST' with inbox subfolder must exist
For Each sourceFolder In ns.Folders
For Each subfolder In sourceFolder.Folders
If Trim(UCase(subfolder.Name)) = "INBOX" Then
For Each objItem In subfolder.Items
'modified below to use copy as per MSDN
'https://msdn.microsoft.com/en-us/vba/outlook-vba/articles/mailitem-copy-method-outlook
Set objItemCopy = objItem.Copy
objItemCopy.Move copyToFolder
Next
End If
'copy items in subfolders in inbox can be added here
Next
Next
Exit Sub:
hell:
MsgBox Err.Description, vbExclamation, Err.Source
End Sub
怎么样?有了这个,我没有遇到你的渲染问题,实际上使用var ks0 = getField("ks0");
var ks1 = getField("ks1");
var auft1 = getField("auft1");
if(event.change === ks0)
{
getField("ks1").value = getField("ks0").valueAsString;
getField("auft1").value = "100%";
}
更有意义。
<hr/>
hr
答案 1 :(得分:0)
实际上,这不是一个白色的空间,你使用浅灰色到底部,并且顶部和底部都附着边缘,它的幻觉就像有空白区域一样。如果您想要自定义hr底部的阴影,那么您可以使用以下css -
.nav_links_container_line {
border-top: 1px solid #096ebd;
box-shadow: 0px 2px 10px #000;
}