vb編譯錯誤缺少
『壹』 在練習VB過程中出現問題：VB編譯錯誤缺少 列表分隔符或）
n=Val(InputBox("請輸入第" & i & "個數"))
注意用空格分開
『貳』 VB編譯錯誤 缺少行號或標簽或語句或語句結束 在線等 急
Private Sub Form_Load()
Txt1.Text = "您喜歡的水果是：" & Form1.StrA & vbCrLf _
& "您喜歡的飲料是：" & Form1.StrB & vbCrLf _
& "您喜歡的運動是：" & Form1.StrC & vbCrLf
End Sub
『叄』 vb中編譯錯誤 缺少:語法結束什麼意思
就是你編程序的時候只編寫了開始語句 沒有寫結素語句
比如If語句完整的是If開始,End if結束
如果你只寫了if就會出現這樣的情況
你檢查一下哪兒忘了寫了
『肆』 VB運行時出現「編譯錯誤：缺少as"
出現「編譯錯誤：缺少as"的原因是你的語句「open f:\121.w for output as #1」中缺少了引號。應該是這樣的：
open "f:\121.w" for output as #1
因為VB中的冒號「:」用來分割兩個語句，這樣分割以後前面的語句就成了「open f」，是一個不完整的語句，就「缺少as」咯！
你上面的代碼修改後應該是：
Private Sub command1_click()
Dim s As Integer
s = 5
Close #1
Open "f:\121.w" For Output As #1
Print #1, s
Close #1
End Sub
『伍』 VB說編譯錯誤，缺少：語句結束。請問哪裡錯了
模糊的看到 應該是左邊引號後面 沒有加連接符號 用+ 或者&都可以 就不會出現這樣的錯誤了
『陸』 VB 編譯錯誤：缺少：語句結束
後面缺少 end sub 語句 這是按鈕點擊事件，也屬於一個過程，所有過程都必須有 end 來結束
如果你在編寫的時候 直接雙擊窗體上的按鈕，然後在自動生成的事件代碼裡面編寫就不會有這種問題
『柒』 vb程序老是顯示編譯錯誤。缺少：結束語句
給你修改了一下：
Dim FileNames() As String ' 用於保存打開的文件名稱
Dim PlayFileNum As Integer ' 用於計算正在播放的文件序號
Dim TotalFile As Integer '用於統計打開的文件總數
Private Sub cmdOpen_Click() ' 打開
On Error GoTo ExitOpen
CommonDialog1.Flags = cdlOFNAllowMultiselect Or cdlOFNFileMustExist Or cdlOFNExplorer
CommonDialog1.FileName = ""
CommonDialog1.ShowOpen '顯示"打開"對話框
'以vbNullChar作為子字元串的邊界分隔字元串CommonDialog1返回的FileName?
FileNames() = Split(CommonDialog1.FileName, vbNullChar)
If UBound(FileNames) = 0 Then '用戶只打開了一個文件?
Form2!ShockwaveFlash1.Movie = FileNames(0)
TotalFile = 1
PlayFileNum = 0
Else ': 用戶打開了多於一個文件?
Form2!ShockwaveFlash1.Movie = FileNames(0) + " \ " + FileNames(1)
TotalFile = UBound(FileNames)
PlayFileNum = 1
End If
StatusBar1.Panels(1).Text = "共打開了" + Trim(Str(TotalFile)) + "個文件"
cmdPlay_Click
End Sub
-----------------
你的錯誤：
1.注釋要用單引號'分隔注釋和語句。
2.雙引號不能用全形的，要用英文半形的雙引號。
『捌』 VB編譯錯誤 缺少語句結束怎麼辦
1.缺少declare,正確的描述如下
private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
2 declare的說明
Declare 語句
用於在模塊級別中聲明對動態鏈接庫 (DLL) 中外部過程的引用。
語法 1
[Public | Private] DeclareSubnameLib"libname" [Alias"aliasname"] [([arglist])]
語法 2
[Public | Private] DeclareFunctionnameLib"libname" [Alias"aliasname"] [([arglist])] [Astype]
Declare 語句的語法包含下面部分：
部分 描述
Public 可選的。用於聲明對所有模塊中的所有其它過程都可以使用的過程。
Private 可選的。用於聲明只能在包含該聲明的模塊中使用的過程。
Sub 可選的（但Sub 或 Function 二者需選其一）。表示該過程沒有返回值。
Function 可選的（但Sub 或 Function 二者需選其一）。表示該過程會返回一個可用於表達式的值。
name 必需的。任何合法的過程名。注意動態鏈接庫的入口處（entry points）區分大小寫。
Lib 必需的。指明包含所聲明過程的動態鏈接庫或代碼資源。所有聲明都需要Lib 子句。
libname 必需的。包含所聲明的過程動態鏈接庫名或代碼資源名。
Alias 可選的。表示將被調用的過程在動態鏈接庫 (DLL)
中還有另外的名稱。當外部過程名與某個關鍵字重名時，就可以使用這個參數。當動態鏈接庫的過程與同一范圍內的公用變數、常數或任何其它過程的名稱相同時，也可以使用
Alias。如果該動態鏈接庫過程中的某個字元不符合動態鏈接庫的命名約定時，也可以使用 Alias。
aliasname 可選的。動態鏈接庫或代碼資源中的過程名。如果首字元不是數字元號 (#)，則
aliasname 是動態鏈接庫中該過程的入口處的名稱。如果首字元是
(#)，則隨後的字元必須指定該過程的入口處的順序號。
arglist 可選的。代表調用該過程時需要傳遞的參數的變數表。
type 可選的。Function 過程返回值的數據類型；可以是 Byte、布爾、Integer、Long、Currency、Single、Double、Decimal（目前尚不支持）、Date、String（只支持變長）或 Variant，用戶定義類型，或對象類型。
arglist 參數的語法以及語法各個部分如下：
[Optional] [ByVal | ByRef] [ParamArray] varname[( )] [Astype]
『玖』 vb編譯錯誤：缺少變數或過程，不是模塊
編譯錯誤：
缺少變數或過程，不是模塊。
'這個是模塊中的代碼，（不在窗體的代碼區內，在一個模塊文件中）
Public Sub SEND_SERINFO(IP As String, Text As String)
main.wsk1.RemoteHost = IP
main.wsk1.SendData "SER_INFO " + Text
End Sub
'然後在窗體代碼模塊中調用
call send_serinfo(ip,text)
然後進行調試
『拾』 VB 編譯錯誤缺少表達式為什麼
Private Sub Command1_Click()
Dim y%, M%
y = Val(Text1.Text)
Choose後面你掉了一個括弧了
M = Val(Text2.Text)
Print "本年為;"; y; "年"; M; "月"; IIf(Day(DateSerial(y, 3, 0)) = 29, "閏年", "不是閏年")
Print "目前還是"; Choose((M + 2) \ 3, "春", "夏", "秋", "冬"); "天"
Print "本月有; "; Day(DateSerial(y, M + 1, 0)); "天 "
End Sub