跳到主要內容
程式語言 / 程式語言實作六

2c00-0924-3

 

Public Class Form1

    Dim a, b As Single

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        a = InputBox("請運算式子如下: 3 ^ 2 mod 2 + 9 *2", "請回答")

        b = 3 ^ 2 Mod 2 + 9 * 2

        If b = a Then MsgBox("答對了", MsgBoxStyle.DefaultButton1) Else MsgBox("答錯了", MsgBoxStyle.AbortRetryIgnore)

 

    End Sub

End Class

 

消息公佈欄

時間類別單位標題發佈點閱
跳至網頁頂部