成都创新互联坚持“要么做到，要么别承诺”的工作理念，服务领域包括：成都网站设计、成都做网站、企业官网、英文网站、手机端网站、网站推广等服务，满足客户于互联网时代的金乡网站设计、移动媒体设计的需求，帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴！
在C++里面设置修饰符__stdcall即可，然后添加va_list和结束标识。
private sub cmd_pd_click() if prime(val(txt_sz.text) = true then lbl_cx = txt_sz + "是素数" else lbl_cx = txt_sz + "不是素数" end if end sub 你的函数是带参数的，调用的时候却没带参数！！！
能function myfun(a:integer; b:integer=1; c:integer=2): integer;这里的myfun函数调用时可以传递1至3个参数，按顺序赋值给a、b、c。规则：默认参数的定义要放在所有参数的声明的最后、如果没有被赋值，默认参数将被按照定义初始化、如果要给后面的默认参数赋值，在他前面的所有参数必须赋值（比如要给c赋值，就必须给b也赋值）
如果a,b是字符串值sql.add('update xxx set a='+#39+'a'+#39+', b='+#39+'b'+#39)如果a,b是字符串变量sql.add('update xxx set a='+#39+a+#39+', b='+#39+b+#39)
定义的时候加上Optional关键字，就可以了要注意的是，可选参数后面如果还有其他的参数，则必须都是可选参数。另外，定义可选参数，需要定义默认值。如果调用时，没有指定这个可选参数的值，则使用默认值Public Sub AddItem(ByVal Item As String, Optional ByVal Index As integer=0) Combo1.AddItem Item, IndexEnd Sub
函数定义好了，就跟vb内部函数一样，用函数名(参数1，参数2，...)调用就行。
Public Sub AddItem(ByVal Item As String,optional ByVal Index As Variant)if IsMissing(index) then Combo1.AddItem Itemelse Combo1.AddItem Item, Indexend ifend sub
