Question

vb缺少语句结束的问题 Private Sub Command1_Click() list1.AddItem Text1.Text & " " &text2.text& " " &

list1.AddItem Text1.Text & " " &text2.text& " " & Text3.Text & " " & val(text2.text)+val(text3)
显示引号部分有问题

Answer 1

代码中的& 与变量名之间应该有空格隔开，你可以直接复制下面的代码，然后粘贴，
修改如下：
Private Sub Command1_Click()
Dim hh%, mm%, ss%, Totals!
Dim Outstr$
hh = Val(Text1)
mm = Val(Text2)
ss = Val(Text3)
Totals = hh * 3600 + mm * 60 + ss
Outstr = hh & "小时 " & mm & "分 " & ss & "秒"
Outstr = Outstr & vbCrLf & "总计:" & Totals & "秒"
MsgBox Outstr, , "输出结果"
End Sub

Answer 2

Private Sub Command1_Click()
list1.AddItem Text1.Text & " " & text2.text & " " & Text3.Text & " " & val(text2.text)+val(text3.text)
& 前后都要留空格

Answer 3

我说，你好像“&” 前后没加空格。。。