我有这个功能:
Function RotatedCW(src(,) As String) As String(,)
Dim maxX As Integer = src.GetUpperBound(0)
Dim maxY As Integer = src.GetUpperBound(1)
Dim oldFocalY = focalY
focalY = focalX
focalX = maxX - oldFocalY
Dim newArray(maxY, maxX) As String
For i = 0 To maxX
For j = 0 To maxY
newArray(j, maxX - i) = src(i, j)
Next
Next
Return newArray
End Function
在评论中你可以看到我需要暂停半秒的地方,这可能吗?
答案 0 :(得分:3)
只需使用超时
function selectkontakt(z){
$("#loadnew").empty();
$("#loadold").empty();
setTimeout(function() {
kontakte();
$("#textarea").show();
}, 500);
}