您的位置:程序门 -> vb ->



新手求助: 关于微调控件的问题


[收藏此页] [打印本页]选择字色:背景色:字体:[][][]


新手求助: 关于微调控件的问题
发表于:2007-10-16 20:00:00 楼主
我写了如下函数,旨在从一个文件中读取数据,存储到一个结构体的数组里:
public   function   readspline(ns   as   integer)   as   integer

        dim   sg()   as   splinegeneral                       'dynamic   array
        redim   preserve   sg(ns   -   1)                       'the   content   of   the   array   will   be   kept
        ......................................
end   function

splinegeneral是结构体,私有的。sg()是它的动态实例.

然后程序运行时,有一个微调控件,举例说,把它调为1时,就在相应的文本框xxx内显示sg(1).xxx的内容。
请问红色部分的功能应该如何实现?应该写在哪里?我现在写的如下。只要一按微调,程序就在黄色处终止。

private   sub   spinbutton37_change()
                textbox61.text   =   spinbutton37.value
                spinbutton37.min   =   1
                spinbutton37.max   =   textbox60.text
               
                'msgbox   (spinbutton37.value)
                textbox23.text   =   sg(spinbutton37.value).prg_name

        end   if
甚至写textbox23.text   =   sg(1).prg_name也是这样。
end   sub


快速检索

最新资讯
热门点击