v = Adodc1.Recordset.AbsolutePosition
a = Text4.Text + Right(Text1.Text, 5)
If Text1.Text <> "" Thenv = MsgBox("确定要保存该图片吗?", 48 + 4, "提醒")
If v = vbNo Then
Text1.Text = ""
Call ShowPicture
Exit Sub
End If还是我没找到啊  应该也要有个 dim v dim a  ??请教了vbNo?? 是什么意思呢。

解决方案 »

  1.   

    v没声明,是因没用强制显式声明模块中的所有变量Option Explicitv = vbNo的意思就是按下是和否中的否的按钮 如果是按下是的按钮就是vbYes
      

  2.   

    在没有Option Explicit的情况下,没声明的变量,默认类型为变体--Variant。vbYes ,vbNo是vB常数,VB这类常数多得很。
      

  3.   

    如果没有的话说明你的v,a的类型时variant
    vbno就是message box弹出后用户选择了No
      

  4.   


    这断程序可以说毫无章法:
    1、VB中可以不定义而使用一个变量,所以V和a不用定义,它们都是variant变量。
    2、我说它毫无章法是因为:
    v = Adodc1.Recordset.AbsolutePosition'这个v返回分页点,没有看见它使用就到下一个v了。
    .
    .
    v = MsgBox("确定要保存该图片吗?", 48 + 4, "提醒")'这个v返回是msgbox的选择按钮,也就是说你选择了是返回vbYes(6),也就是v=6,选择了否返回vbNo(7),也就是v=7。vbNO是VB常量它等于7小心使用变量尽量不用同的变量名是有好处的。
      

  5.   

    我又想起我公司的程序了,公司老一辈程序估计既没学好初中英语,也没学好小学语文。
    变量不用英语也就罢了,关键是连汉语拼音都不用啊!我的娘啊,直接就a、b、c、s、p...或者双写他们aa、bb、cc、ss、pp...或者在后面加数字a1、b1、c1、s1、p1...
    神啊
      

  6.   

    a1、b1、c1、s1、p1...
    不能说不好 
    是过去一些大型项目使用的规范化定义,只不过需要建立个“数据变量字典”之类的文本
    因为当时使用的是unix系统 中文输入相当困难 不可能向现在这样轻松的加上中文注释
    所以老一辈程序员到了weindow系统 还是沿用了过去习惯的定义方法。
      

  7.   

    看了这段代码,感觉就是好像是截的源代码的一部分
    v,a可以不声明,但要提高周密性声明下也无妨
    vbNo?你好象是做的VBWindows窗体
    那应该是弹出的对话框,选了按键No