Advertisement

学生信息管理系统中班级信息流程的添加

阅读量:
这里写图片描述

第一步:信息加载

在组合框中增加信息(AddItem属性)

复制代码
    Private Sub Form_Load()
    comboGrade.AddItem "初中一年级"
    comboGrade.AddItem "初中二年级"
    comboGrade.AddItem "初中三年级"
    comboGrade.AddItem "高中一年级"
    comboGrade.AddItem "高中二年级"
    comboGrade.AddItem "高中三年级"
    
    End Sub
    
      
      
      
      
      
      
      
      
      
    

第二步:文本框判断

2.1 判断各个文本框中是否包含文字内容(若未检测到文字则弹出相应提示,若存在文字内容则进入后续第三步处理流程)

复制代码
    If Not Testtxt(txtClassno.Text) Then
        MsgBox "请输入班号!",

全部评论 (0)

还没有任何评论哟~