孔氏宗亲网
在线情况
13
  • 头像
  • 级别
    • 积分122
    • 经验3586
    • 文章116
    • 注册2004-10-25
    祥虹叔!我的界面快弄好了,不过还有个难题需要您的帮助。就是更换界面背景的程序,看了好多网页,都说要用API函数才能实现,比较复杂。我找了好长时间才找到几句粗略的介绍,其它的控件我还能找到些代码下载下来修改,可关于这个的代码一点都没有。您能帮我一下吗?编程对于我来说真的很新鲜,以后一定多向您请教。
    心在遥远的故乡,我却为何在此流浪!
    在线情况
    14
    • 头像
    • 级别
      • 声望+2
      • 积分343
      • 经验5431
      • 文章283
      • 注册2007-05-11
      令朗,请愿谅,接下来这几天需要在公司里“拼一下命”,待我到周末回你。
      见贤思齐焉,见不贤而内自省也。
      祥字辈,平阳三支(北田支)
      在线情况
      15
      • 头像
      • 级别
        • 财富1
        • 积分1338
        • 经验12652
        • 文章1289
        • 注册2006-08-19
        [QUOTE][B]下面引用由[U]孔祥虹[/U]发表的内容:[/B]

        令朗,请愿谅,接下来这几天需要在公司里“拼一下命”,待我到周末回你。[/QUOTE]


        祥虹爷您辛苦了,一点照顾好自己的身体!

        河洛派
        海纳百川,有容乃大;
        壁立千仞,无欲则刚!
        [url=http://weibo.com/u/1247967804?s=6uyXnP][img]http://service.t.sina.com.cn/widget/qmd/1247967804/4c4453e4/3.png[/img][/url]
        在线情况
        16
        • 头像
        • 级别
          • 积分122
          • 经验3586
          • 文章116
          • 注册2004-10-25
          祥虹叔,您的事可是大事,不要因为我把大事给耽误了,那我可吃罪不起啊。一定要记住,在空闲的时候再抽一小点儿时间帮我考虑问题,保证正常工作!
          心在遥远的故乡,我却为何在此流浪!
          在线情况
          17
          • 头像
          • 级别
            • 积分134
            • 经验1737
            • 文章129
            • 注册2008-02-26
            气氛不错,赞一个
            求同存异,孔家复兴
            在线情况
            18
            • 头像
            • 级别
              • 积分122
              • 经验3586
              • 文章116
              • 注册2004-10-25
              祥虹叔最近很忙,还有哪为宗亲熟悉VB的吗?给我指点一下
              心在遥远的故乡,我却为何在此流浪!
              在线情况
              19
              • 头像
              • 级别
                • 声望+2
                • 积分343
                • 经验5431
                • 文章283
                • 注册2007-05-11
                令朗,
                抱歉,回晚了。我很久未写code了,不敢妄言VB,还是讲讲数据库吧。学数据库其实用MS-Access 是一个不错的起步,简易易学, 而且数据库的设计思路都是一样的。初学者易犯的毛病是将所有图表数据不分类型地统统扔进数据库。100M其实可放很多东西,关键是看你怎么放。举例来讲,图表一般没有被检索的特质,所以图表不应该存入数据库。比如2MBytes的march_sum.jpg 就应存在 C:\db_assist\jpgs\march_sum.jpg 而不是数据库。这个联接(UNC link 或 URL link) 则应存入数据库,以备监索。这样你仅需2Bytes的数据库内存。
                附上的是我随想的设计,试图举例说明而已。

                [img]../images/fileType/jpg.gif[/img]
                [imga]../images/upload/2008/04/23/150115.jpg[/imga]
                见贤思齐焉,见不贤而内自省也。
                祥字辈,平阳三支(北田支)
                在线情况
                20
                • 头像
                • 级别
                  • 积分122
                  • 经验3586
                  • 文章116
                  • 注册2004-10-25
                  祥虹叔!我用VB编的面向对象程序出了点麻烦了。在调试的时候一切都很正常,毛病就出在生成的可执行文件里。该可执行文件启动后进入程序,以及在程序中的一切操作都很正常。问题就出在退出系统的时候。退出时,如果点击“退出系统”按钮也很正常,可是如果点击窗口右上角的小叉叉“X”的时候,程序退出了,但退出以后系统会弹出“**管理系统.exe程序出错,系统将关闭该程序,你需要重新启动程序”。以前从来没有碰到过,上网查了一下,有说是UNload方法后可能跟有语句,有的说是系统中毒,还有其他的一些。可我觉得都不是,我Unload方法后面是不会再跟语句了的。杀毒我也杀了,没杀到什么东西。如果一句一句代码去查找,那有好多页的代码就够看的了,可我也基本上看了一遍,没发现什么异常。我无法了。祥虹叔以前有没有碰到这样的情况呢?真希望你碰到过,呵呵。不管有没有办法解决,我都非常感谢您的回复,祝您和家人身体安康,和和美美!
                  心在遥远的故乡,我却为何在此流浪!
                  在线情况
                  21
                  • 头像
                  • 级别
                    • 积分122
                    • 经验3586
                    • 文章116
                    • 注册2004-10-25
                    祥虹叔好,谢谢你给我举的例子,图示说明也很直观易懂,对我的帮助真的很大。顺便我向您汇报一下,我上面提到的VB中的问题也已经解决了。找了好久,终于解决了,心情激动,及时向您汇报,以免让你再费心思。
                    心在遥远的故乡,我却为何在此流浪!
                    在线情况
                    22
                    • 头像
                    • 级别
                      • 积分122
                      • 经验3586
                      • 文章116
                      • 注册2004-10-25
                       

                      [ 此贴最后由孔令朗在2008-5-11 14:38:11编辑过 ]
                      心在遥远的故乡,我却为何在此流浪!
                      在线情况
                      23
                      • 头像
                      • 级别
                        • 积分122
                        • 经验3586
                        • 文章116
                        • 注册2004-10-25
                        祥虹叔你还好吗?还在拼命的工作啊?要多注意身体哈。小侄向您汇报近期的工程进度:界面基本上可以了,现在到数据库了。我用文本框输入数据insert into 到数据库中,总是弹出类型不匹配,我是新手,只能求助于您了。我上来好多次都遇不到您,我把代码附上吧,如果您上来看到了,恳请不吝赐教哦。
                        代码:
                        Option Explicit
                        Dim con As ADODB.Connection
                        Dim Rec As ADODB.Recordset

                        Private Sub Command1_Click()
                         If Txt0.Text = "" Or Txt1.Text = "" Then MsgBox "请选择父节点和输入子节 点",_vbInformation, "提示!"

                        Set con = New ADODB.Connection
                        con.Open provider=Microsoft.Jet.OLEDB.4.0;DataSource=D:\Kll\VB\510\data
                        \db1.mdb;Persist SecurityInfo=False"

                        If Txt0.Text = "数据目录" And Txt1.Text <> "" Then _
                        Rec.Open "insert into 年度表(年度,年度ID,年度名称) valuse(" + CInt(Txt1.Text) + ",2*" + CInt(Txt1.Text) + "," +Txt1.Text+"年数据 )", con, 1, 3

                         '问题就出在这里,总是提示实时错误'13':类型不匹配”

                        Rec.Update
                        Rec.Close
                        con.Close
                        End Sub

                        德灿宗亲好像也是高手,您若看到,也帮忙解解好吗?其他宗亲谁比较熟悉数据库操作的,也帮我看看吧,我会很感激您的!
                        心在遥远的故乡,我却为何在此流浪!
                        在线情况
                        24
                        • 头像
                        • 级别
                          • 声望+2
                          • 积分343
                          • 经验5431
                          • 文章283
                          • 注册2007-05-11
                          令朗,不好意思,我对VB或.net不熟。得请懂行的宗亲帮忙了。
                          见贤思齐焉,见不贤而内自省也。
                          祥字辈,平阳三支(北田支)
                          Powered by LeadBBS 9.2 licence.
                          Page created in 0.1250 seconds with 10 queries.