C# と VB.NET の質問掲示板

申し訳ありません、魔界の仮面弁士様への直接の質問です。OCR Vb6 でグーグルで検索すると魔界の仮面弁士様の
サンプルコードが沢山ひっかかってきます。

Private Sub ShowResult(ByVal Words As MODI.Words)
    Dim wd As MODI.Word
    Dim w As Integer
    For w = 0 To Words.Count - 1
        Set wd = Words(w)
        List1.AddItem CStr(w + 1) & ":" & wd.Text
        Dim r As MODI.MiRect
        For Each r In wd.Rects
            Dim s As String
            s = "(" & CStr(r.Left) & "," & CStr(r.Top) & ")-"
            s = s & "(" & CStr(r.Right) & "," & CStr(r.Bottom) & ")"
            List1.AddItem vbTab & s
        Next
    Next
End Sub

Private Sub Command1_Click()
    Command1.Enabled = False
    Set D = New MODI.Document
    D.Create Text1.Text
    Dim i As MODI.Image
    Set i = D.Images(0)
    Set Picture1.Picture = i.Picture
    Command2.Enabled = True
    hasCancelRequest = False
    On Error Resume Next
    i.OCR Combo1.ItemData(Combo1.ListIndex)
    If Err.Number <> 0 Then
        MsgBox "&H" & Hex(Err.Number) & Err.Description, vbExclamation, Err.Source
    Else
        If Not hasCancelRequest Then
            Me.Caption = App.EXEName
        End If
        Text2.Text = i.Layout.Text 'ここでvb6を道連れにクラッシュ
        ShowResult i.Layout.Words
    End If
    Command1.Enabled = True
    Command2.Enabled = False
End Sub

Document Imagingでは正しく文字を読み出せています。
そこで質問です。魔界の仮面弁士様の環境では正しくプログラムは動いていますか？？各種掲示板には｢動いた」という
レスが１つもないので途方に暮れています。

■No92336 (WebSurfer さん) に返信
> ■No92334 (はたさん さん) に返信

> 上にも書きましたが、type="month"、type="number" はブラウザ依存です。特に type="month"
> は以下の記事の「ブラウザーの対応の扱い」に書いてあるように問題ありです。そこは問題な
> いのですか？
> 
すみません、ちゃんと確認せずに回答してしまいました。
確認したところ例1の方でした。
ドロップダウンリストを使って値を取得することができなかったので、魔界の仮面弁士さんの回答
にあった通りリストボックスに変更したところ実装できました。

実際のコード
function fnChangeDate() {
    var num = parseInt(document.getElementById('テキスト1').value, 10);
    var ym = document.getElementById('テキスト2').value;
    var dt = new Date(ym + '-01');
    if (document.getElementById('リストボックス').selectedIndex == 0) {
        dt.setFullYear(dt.getFullYear() + num);
    } else {
        dt.setMonth(dt.getMonth() + num);
    }
    var y = dt.getFullYear();
    var m = dt.getMonth() + 1;
    var txt = y+'/'+(m < 10 ? '0' + m : m);

    document.getElementById('ラベル').innerText = txt;
}

■No92343 (はたさん さん) に返信

そもそもの話が通じてないようです。

> 実際のhtml↓
> <asp:TextBox ID="テキスト1" runat="server" ClientIDMode="Static"></asp:TextBox>
> <asp:ListBox ID="リストボックス" runat="server" ClientIDMode="Static"Rows="1">
>     <asp:ListItem Value="Month">ヶ月</asp:ListItem>
>     <asp:ListItem Value="Year">年</asp:ListItem>
> </asp:ListBox>
> <asp:TextBox ID="テキスト2" runat="server" ClientIDMode="Static"></asp:TextBox>
>  <asp:Label ID="ラベル" runat="server" ClientIDMode="Static"></asp:Label>

それを最初の質問の一番最初に書いてほしかったのですよ。

JavaScript は html ソースに対して適用するものということは分かりますよね？

ということは、html シース（またはその基になる .aspx ファイルのソース）を提示した
上でないと、それに適用する JavaScript の話はできないということは分かりますか？

例えて言うと、.aspx ファイルのコードを提示しないで、.aspx.cs または .aspx.vb の 
C# または VB.NET のコードをどう書いたらいいのかという質問をしているのと同じと言
ったら分かってもらえますか？

もし次に質問される機会がありましたら、上記のことをよく考えて、最初の質問に十分な
情報を提供していただくようお願いします。