用子程序结构编写如下程序:从键盘输入一个二位十进制的月份数(01~12),然后显示出相应的英文缩写名。

Answer 1

Public Class Form1
Dim mon() As String =
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
On Error GoTo Handerr
TextBox2.Text = mon(Val(TextBox1.Text))
Exit Sub
Handerr:
MsgBox(mon(0))
End Sub
End Class
..........................黑龙江省巴彦县兴隆镇 张志晨 ..........................................

Answer 2

使用switch语句应该比较简单