(保存时窗体文件名设置为“2.1 取学号中间4位.frm”,工程文件名设置为“2.1 取学号中间4位.vbp”)
这个要求你就自己写吧! 我只能给你上面的代码
数学方法 ,也就把上面的 200912345678 当成一个数
Dim val1 As Double
val1 = 200912345678#
val1 = Int(val1 / 10000) Mod 10000
msgbox val1
字符处理方法
msgbox mid("200912345678",5,4)
不会吧.老师的作业在这里做.不厚道.