爱问知识人 爱问教育 医院库

VB问题

首页

VB问题

Option Explicit
'定义一个职员的数据类型
Private Type Employee
    empName As String                                                '职员姓名
    empAge As Integer                                                '职员年龄
    empAddr As String                                                '职员住址
End Type

Dim emp1 As Employee                                                 '声明一个Employee类型的变量
Private Sub From_Load()
    emp1.empName = "吴经纬"                                          'emp1对象empName成员赋值
    emp1.empAge = "21"                                               'emp1对象empAge成员赋值
    emp1.empAddr = "上海"                                            'emp1对象empaddr成员赋值
    
    Print                                                            '输出结果
    Print emp1.empName & " " & emp1.empAge & " " & emp1.empAddr

End Sub
输入以上语句后按F5运行,窗口显示空白。(AutoRedraw以改为Ture)

提交回答
好评回答

类似问题

换一换
  • 软件 相关知识

  • 电脑网络技术
  • 电脑网络

相关推荐

正在加载...
最新资料 推荐信息 热门专题 热点推荐
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200

热点检索

  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
返回
顶部
帮助 意见
反馈

确定举报此问题

举报原因(必选):