vb提示编译错误,语法错误 求指教?
发布网友
发布时间：2022-05-13 14:44
我来回答
共1个回答
热心网友
时间：2023-08-08 19:17
Public Sub 产品出库()
Dim i As Long
Dim j As Integer
Sheets("出库记录表").Select '选择工作表"出库记录表"
If Cells(4, 1).Value = "" Then '判断"产品名称"项是否为空
MsgBox """产品名称"" 项请勿置空！", vbOKOnly & vbExclamation, "信息提示"
Exit Sub
End If
i = Val(Sheets("出库记录表").Cells(1, 2).Value)
For j = 1 To 6
Cells(i + 8, j).Value = Cells(4, j).Value
Next j '在"出库记录表"的末尾添加新记录
End Sub
vb里面 字符串要用两个 " 来表示""，"产品名称" 要这样写""产品名称""。
你的写法：
MsgBox ""产品名称" 项请勿置空！", vb会认为字符串在 产字前就结束了，所有出错。
excel打开或关闭VBA编辑器自动语法检查功能
1.在VBA编辑器中，单击菜单“工具→选项”，弹出“选项”对话框。2.选择“编辑器”选项卡，取消选择“自动语法检测”选项。3.单击“确定”按钮。这样设置后，对于有语法错误的语句，回车后VBA编辑器虽不会弹出错误提示对话框，但仍会将其显示为红色 ...
vb6.0程序运行的时候显示编辑错误求大神指教
Case "保存"'判断其Text内容否填写,没有则提示 If Text1.Text = "" Or Text2.Text = "" Or Text3.Text = "" Or Text4.Text = "" Or Text5.Text = "" Then MsgBox "请输入其商品编号,名称,型号,单价,数量!", "48", "提示"Exit Sub End If End Select End Sub ...
vb求指教到底哪里错了,要怎么改,拜托了
这个代码，首先是 isinteger(text)肯定不行。函数是系统内定的，不是随便写就有的。如果是要检测文本是否整数，用 if Int(val(text1)) <> val(text)val()函数是把text转成数字，Int（）函数是取整数部分。可以想象，如果一个数的整数部分和自己相等，那这个数肯定是整数，反之带有小数。另外，回车...
VB登陆系统设计代码错误 求指教!!!
如果你确信select语句没有写错的话，我想应该是没有事先设置数据库的连接串吧
跟vb有关的,程序运行的时候系统提示说“无效的过程调用或参数_百度知 ...
Private Sub Command2_Click()Dim a(26) As Integer Dim c As String '加这句试试
VB程序代码求指教
1，采用VBA，在WORD或者EXCEL里。2，你自己编写文本编辑器。二，按照你的要求：1，程序要有设置时间的功能。2，每次输入信息完毕，进行文件保存。3，文件格式分为上下两大块，中间用设置的时间突出显示作为分隔；4，保存的时候，首先判断当天是否已经有保存的文件，如果有就打开现有文件，如果没有，保存为...
geany编译时提示语法错误
语法错误：例如，第一关就根本不能够通过的。内存泄露错误：语句中缺少标点等，这些错误导致在编译时：这一类错误就属于严重错误。虽然编译器能够让你的源程序编译通过，但是你的运行程序一旦执行，就会出现程序崩溃，无法实现你的程序功能等现象）那要根据你的具体源程序和具体的出错信息（你的编译出错信息...
打开excel时,弹出“运行时错误‘438’,对象不支持该属性或方法”求高手...
这个是VBA代码问题。你先新建一个工作薄，然后打开，把信任中心里面的宏禁掉。然后按ALT+F11可以按F8逐步运行看下哪段代码出了问题。或者吧所有代码截图出来，让大伙帮忙看看怎么更改。
求大侠帮忙看看这程序,我用VB2010编写编译后错误提示说(—)下划线应为...
把那个 _ 去掉就好了。那个是换行用的，题主这已经在同一行里了。
VB求指教—在窗体上画一个名称为Command1的命令按钮,并编写如下程序
答案是D，你虽然调用了F 程序，其中的x，y都被加了2，但是属于两个程序，由于你之前定义了x为公共函数，所以，x的值会随着程序的运算不断被重新赋值，而y不是公共函数，所以最终结果应该是x=12，y=5。
