[ツリー表示へ] [ワード検索] [Home]
タイトル ： Re^2: ネッカフェのPC 投稿日 ： 2009/06/26(Fri) 01:27 投稿者 ： れお
| > > 自分のPCとネッカフェのPCと、色々と相違点があるんですが。 > > 広告の違いとかは関係ありませんが。 > > 故障でしょうか？ > > ソースも違うし。 > > 印刷してメーカーに検査してもらうと回答してもらえるのかなぁ？ > > どなたか、試された人はいますか？ > > > > ん。誰も返事がNothing。 > 今日、久さしぶりにVB無料版2008で遊んだが、システム変更がチョコチョコあるみたい。 > こりゃアンサーも大変ですね。 > Option Strict On > Public Class Form1 > > Dim a As Integer = 7 > Private b As Integer = 8 > > Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click > MsgBox(a) > MsgBox(b) > End Sub > End Class > 以前だと7の数字は初期化されて0になってたが、現状は保持になってる。 > マイクロの社員も日々がんばってますね。 寝る時間がきた// VBの教科書も6冊購入したが、 プロ目線で入門書を書くとゆうのは、いろいろ混乱になりやすい。 opthon stict onも混乱の元だ。 OFFの状態でも信頼性のあるようにすればいいのに。 そこのトコ、マイクロ社員も努力せよ。＾＾ Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click ' Dim price As Integer ' price = TextBox2.Text * 220 + TextBox3.Text * 140 'Label3.Text = price End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click Try Dim price% price = CInt(TextBox2.Text) * 220 + CInt(TextBox3.Text) * 140 Label3.Text = price.ToString Catch ex As Exception MsgBox("エラー") End Try End Sub 初心者は困惑しますね。 |
をクリックするとツリー全体を一括表示します） - ネッカフェのPC - れお 09/06/25-12:37No.9116