ramon51的部落格

-2012網頁遊戲排行榜註冊網址：http://yx.cmwebgame.com/?member=af000035173

＝＝＝＝＝＝本站特別聲明＝＝＝＝＝＝＝
＝＝＝本文推薦的遊戲並非官方網站＝＝＝
＝＝單純為快速註冊遊戲的連結網址＝＝＝
請各位網友不要誤會本站推薦的遊戲連結是官網！

在此特別聲明！望各位朋友不要誤會了！祝各位遊戲愉快！

先向樹哥大大說抱歉, 因為必須用圖對照物件位置, 只好用回答的

剛好有 2008 所以換我改成 2008 版好了.

物件名稱先比對下圖


全部程式碼如下

Public Class Form1
    Dim optstr As String, chk As String
    Dim optv As Integer, sum As Integer, i As Integer


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        sum = 0
        chk = ""

        If RadioButton4.Checked = True Then
            chk = "wii + 矽膠套 7990"
            sum = 7990
        ElseIf RadioButton5.Checked = True Then
            chk = "wii + 手把 12300"
            sum = 12300
        ElseIf RadioButton6.Checked = True Then
            chk = "wii + fit 13580"
            sum = 13580
        End If

        If CheckBox1.Checked = True Then
            chk = chk & vbNewLine & "方向盤 550元"
            sum = sum + 550
        End If
        If CheckBox2.Checked = True Then
            chk = chk & vbNewLine & "色差端子880元"
            sum = sum + 880
        End If

        chk = chk & vbNewLine & "--------------------------" & vbNewLine & "總計: " & sum & "元"

        MsgBox(chk)
    End Sub

End Class

S99,s99,s99聯盟行銷,s99聯盟行銷學校,s99聯盟行銷切貨,s99 購物,行銷學習,行銷學校,聯盟行銷,網路行銷,行銷創業,網路創業,通路,通路王,