出来るのだASP Q&A掲示板(過去LOG)
訪問数 52046
昨日 889
今日 776 【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。 |
![]() ![]() ![]() ![]() ![]() |
[5698] Re:セレクトボックスの作動について |
投稿者:よーえつさん 2006/02/26 18:15:45 |
悩みました。 フォームから取得したデータは、0-9のような半角数字でもStringで認識されるようです。>僕が知らなかっただけ? なのでIntegerに変換したら動くようになりました。 Sub optYear(StartPoint, EndPoint, SelectPoint) For i = StartPoint to EndPoint If i = CInt(SelectPoint) Then <=ここですね tagYear = tagYear & "<OPTION value='" & i & "' selected>" & i & "</OPTION>" & vbCRLF Else tagYear = tagYear & "<OPTION value='" & i & "'>" & i & "</OPTION>" & vbCRLF End If Next End Sub |
![]() ![]() ![]() |
![]() ![]() ![]() ![]() ![]() |
TreeBBS For ASP V.0.1.3 |