显示各位数

   Dim stuname as string

      Dim Maths As Integer ,Eng ASinteger , s Integer

      Private Sub command1_Click

       Stuname=InputBox

       Maths= InputBox

        Eng= InputBox

      Compu = InputBox

         Label1.Caption=StuName

         Label1.Text = Maths

        Label2. Text =,Eng    

 Label3.Text = Compu

         Label4. Text = Maths +Eng+ Compu  

         Label5.Text = (Maths +Eng+ Compu)/3

      End Sub

阅读更多
文章标签: integer command
想对作者说点什么? 我来说一句

没有更多推荐了,返回首页

加入CSDN,享受更精准的内容推荐,与500万程序员共同成长!
关闭
关闭