推奨:ASPを使用して、オンライン記事翻訳の機能を実現するWebページに多言語サポートを提供したい場合があります。 1つの言語に1つのWebページを使用することは面倒です。幸いなことに、Googleは言語ツール機能を提供します。以下は、複数の言語間でWebページを変換するために使用する方法について説明します。 lan.htm
質問:ASPを使用して3つの最高スコアと3つの最低スコアを削除する方法は?
解決:
1.配列全体を並べ替えて、両端で3つの最大値と3つの最小値を削除します(別のネチズンによって提案されています!)
2。3つの最大数と3つの最小数を選択して削除します。 (私の考え!)
削除される数は3つだけで3つしか小さいので、私の方法はより実現可能であるべきだと思います。そのため、すべての数値を並べ替える必要はありません。特に、多くのデータがある場合、多くのリソースが無駄になります!私が書いた注文は次のとおりです。
| 以下は引用されたコンテンツです。 <%@言語= vbscript codepage = 936%> <% 薄暗いarr arr = array(91,39,46,24,14,56,31,32,56,89) deletemax(ubound(arr)、3)を呼び出します '3つの最大数を削除します! getback() '各数値は-1と呼ばれ、最小数を最大数に変えます! deletemax(ubound(arr)、3)を呼び出します '-1の後に3つの最大数を削除します! getBack() '各番号を復元します kk = 0からubound(arr) '各数値を出力します respons.write(arr(kk)) Response.Write(<br>) 次 sub deletemax(arr_total、willdelete) m = 1の場合はWilldeleteから i = 0からarr_total-m arr(i)> arr(i 1)の場合 swap(arr(i)、arr(i 1))を呼び出す ifを終了します 次 redim preserve arr(arr_total-m) 次 End Sub sub swap(num_a、num_b) '2つの番号を交換します x = num_a num_a = num_b num_b = x End Sub sub getBack() l = 0からubound(arr)の場合 arr(l)= arr(l)*-1 次 End Sub %> |
3つのサブルーチンがあります。
1。Deletemax(arr_total、willdelete)
関数:いくつかの最大数を削除します。ARR_TOTAL:ARRAYの最大利用可能な添え字、WillDelete:削除される最大数の数。
2。スワップ(num_a、num_b)
関数:2つの番号を交換します
3。getBack()
関数:配列の各要素に-1を掛け、最小数を最大数に変換します!
経験:
配列要素を削除する方法を試しました!
次のようなredimを巧みに適用し、ステートメントを保存します。
| 以下は引用されたコンテンツです。 dim a() redim a(10) 「6番目の要素a(5)を削除したい n = 5からUbund(a)-1 a(n)= a(n 1) 次 Redim Preserve a(Ubund(a)-1) |
上記のコードを完了できます。あなたがそれを信じないなら、試してみてください...
共有:ASP基本チュートリアル:ASPの他の一般的に使用されるコンポーネントASPを使用してサーバー側のアプリケーションを作成する場合、ActiveXコンポーネントに依存して、次のような強力なWebアプリケーションの機能に依存する必要があります。データベースに接続したり、データベースをオンラインで操作したりする必要があります。