求助：vb 变量未定义

初学者好多问题不太懂。按F5运行后，提示变量未定义，(倒数第三行,pic1)，请高手指点
下面是程序前面一部分：
Option Explicit
Dim a, b, c As Integer
Dim y As Single '存储AD 转换值
Dim t As Single
Dim var As Variant '用来从接收缓冲区读取数据
Dim rd(7) As Byte '用来存储接收到的一组字节数据
Dim sd(2) As Byte
Dim nowx As Long
Dim maxplotno As Long
Dim prevalue As Single
Dim plotvalue() As Single
Dim plwidth&, plheight&

Private Sub Command2_Click()
MSComm1.PortOpen = False '单击【结束】按钮后触发此事件
End
End Sub

Private Sub Command1_Click() '单击【发送命令】按钮后触发此事件
sd(0) = 1
sd(1) = 3
sd(2) = 7
MSComm1.Output = sd '利用 Output 属性发送 3 个字节的命令
Timer1.Enabled = True
End Sub

Private Sub Form_Load()
plwidth = Pic1.ScaleWidth
plheight = Pic1.ScaleHeight
maxplotno = 30

vb为什么会变量未定义 变量未定义 变量未定义: 'connstr MD5变量未定义 javascript 变量未定义问题 我用VB编写用户注册代码时,出现with块变量未定义 变量未定义: 'cachetemplate' vb 中 Adodc1未定义 VB子程序未定义错误 vb hour 未定义