小编Com*_*ata的帖子

将unicode字符插入VBA字符串

在Windows 7上使用MS Access 2003,我发现以下函数从ANSI字符串中删除所有重音,更改(例如)señor到senor:

Public Function RemoveAccents(ByVal inputString As String) As String
Const accentString As String = "ÀÁÂÃÄÅÇÈÉÊËÌÍÎÏÏÑÒÓÔÕÖÙÚÛÜÝàáâãäåçèéêëìíîïðñòóóôõöùúûüýÿ"
Const nonAccentStr As String = "AAAAAACEEEEIIIIINOOOOOUUUUYaaaaaaceeeeiiiionoooooouuuuyy"
Dim i As Integer

For i = 1 To Len(accentString)
inputString = Replace(inputString, Mid(accentString, i, 1), Mid(nonAccentStr, i, 1), , , vbBinaryCompare)
Next i
RemoveAccents = inputString
End Function
Run Code Online (Sandbox Code Playgroud)

但是当我尝试将带有Caron(U-010D)(č)(HTMLč)的拉丁小写字母C添加到函数Const accentString时,就像这样,

Const accentString As String = "ÀÁÂÃÄÅÇÈÉÊËÌÍÎÏÏÑÒÓÔÕÖÙÚÛÜÝàáâãäåç" & ChrW$(&H10D) & "èéêëìíîïðñòóóôõöùúûüýÿ"
Const nonAccentStr As String = "AAAAAACEEEEIIIIINOOOOOUUUUYaaaaaacceeeeiiiionoooooouuuuyy"
Run Code Online (Sandbox Code Playgroud)

我无法运行该功能.是否有一种语法允许我调整此函数以从包含不在ANSI字符集中的字符的字符串中去除变音符号?

unicode vba

6
推荐指数
1
解决办法
8272
查看次数

每个jQuery函数

在一份文件中,我有大约25个DIV,其中包含各种名称的表格.DIV都有相同的类名,看起来像这样:

<div class="swoop" style="display:none">
  <form name="myFormXYZ" method="post">
    <input name="caption" type="hidden" value="19">
  </form>
</div>
Run Code Online (Sandbox Code Playgroud)

我想编写jQuery代码,它将使用"swoop"类检查所有DIV,如果任何DIV包含一个名为"caption"的输入字段,其值为x,那么这些DIV的显示属性应设置为"block" ".x将是1到1000之间的整数.

到目前为止,我已经想出了这个:

$('.swoop').each(function() {
    var capt = $( ? ? ? ).attr('value()');
    if (capt == x) {$(this).css.(display','block')}
});
Run Code Online (Sandbox Code Playgroud)

jQuery函数是否可以迭代显示设置为none的DIV?

each jquery

3
推荐指数
1
解决办法
770
查看次数

标签 统计

each ×1

jquery ×1

unicode ×1

vba ×1