´ó¼ÒºÃ£¬ÎÒÊÇÐÂÊÖ£¬ÔÀ´¶¼ÓÃcºÍC#µÄ£¬ÏÖÔÚÓÃvb±à³Ì£¬ºÜ¶àÎÊÌâ¶¼²»Ã÷°×£¬Ï£ÍûÄÜÓöµ½¸ßÊÖ£¬¶à¶àÖ¸½Ì£¬ÏÂÃæÊÇÒ»¸ö³ÌÐòµÄÄâºÏ£¬ºÍ¸ß˹ÏûÈ¥¡£ÎÒ´óѧѧ¹ýÀëÉ¢Êýѧ£¬ÊýÖµ·ÖÎö£¬¾ÍÊDz»Ì«¼ÇµÃÁË£¬Ï£ÍûÄܹ»Ìáµãһϣ¬°ïÎÒ½âÊÍһϣ¬ÎұȽϱ¿£¬Ô½ÏêϸԽºÃ£¬Ð»Ð»¡£
£¬Public Function CurveFitting(X() As Single, Y() As Single, n ......
Êý¾Ý¿âѧ¼®¹ÜÀíÀïÓÐÈýÕÅ±í£º
±íXS°üÀ¨×ֶΣº ѧºÅ£¬ÐÕÃû£¬×¨Òµ£¬ÐԱ𣬳öÉúÈÕÆÚ£¬×Üѧ·Ö£¬±¸×¢
±íXSKC°üÀ¨×ֶΣºÑ§ºÅ£¬ÐÕÃû£¬¿Î³ÌÃû£¬³É¼¨£¬×Üѧ·Ö£¬×¨Òµ
±íKC°üÀ¨×ֶΣº רҵ£¬¿Î³ÌÃû
´°Ìåform1ÀïÓиöDatagrid¿Ø¼þ£¬±àд¿Ø¼þË«»÷ʼþÈçÏ£¬µ¯³ö´°Ìåshowstukc,´°ÌåshowstukcÉÏÓÐÁ½¸ö¿Ø¼þ£¬ADODCºÍDatagrid, ......
ÏÂÃæ´úÂëÁ¬½Ó³ö´í£¡ÔõÑùÔÚËüµÄ»ù´¡ÉÏÐ޸ģ¬Ê¹³ÌÐòÄÜÕý³£ÔËÐÐÄØ£¿
Âé·³´óÏÀÁË£¡
×Ô¼º¶¨ÒåµÄÈ«¾ÖÄ£¿é
Imports System.Data
Imports System.DBNull
Imports System.Data.SqlClient
Module Module1
Public UserName As String
Public pepdom As Integer
......
Dim no As String
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim rs1 As New ADODB.Recordset
Dim sq1 As String
Dim sq2 As String
Private Sub Command1_Click()
no = InputBox("ÇëÊäÈëÎÊÌâºÅ", "ÎÊÌâºÅ")
cn.Open &quo ......
Ïë¸ã¸öСÐ͵ÄÀàËÆERPµÄϵͳ£¬¹¦ÄÜÒ²²»¶à£¬¾ÍÊǾÖÓòÍøÄڵļ¸Ì¨µçÄÔ²é²éÐÅÏ¢£¬´«µã×ÊÁÏɶµÄ£¬×î¶àÔÙ¸ã¸öÄÚ²¿Ð¡ÂÛ̳֮À࣬¹¦Äܲ»¶à£¬ÄÜÌùÎÄ×Ö¾ÍÐС£
ÏÈÓÃVB¸ã£¬ÔÚ±¾»úÔËÐÐͦºÃ£¬»»Ì¨µçÄÔÒ»ÔËÐоͱ¨É¶ÆÆ¿Ø¼þûע²á£¬·³µÃÒªÃü¡£ÔÙÓÃVB.net¸ã£¬ÔÚ±¾»úÔËÐÐÓÖͦºÃ£¬»»Ì¨µçÄÔÒ»ÔËÐоͱ¨É¶Ã»°²×°framework¡£µ½µ×ÒªÕ¦¸ã²ÅÄÜÔÚ±ð ......
ÈçÌ⣺VB ÀïÄܲ»ÄÜÐÞ¸ÄNTFSÎļþ»òÕßÎļþ¼ÐµÄËùÓÐÕß±ÈÈç¸ÄΪSYSTEM»òÕ߸ÄΪ¿Õ
ðÊDz»ÄÜ£¬·¢µ½windows°æÀïÊÔÊÔ¡£
°Ö°ÖÂèÂèÊDz»Äܸĵģ¬ÉúÁËÒÔºó¡£
¿´¡¶±àд°²È«µÄ´úÂë¡·£¬Ö»ÒªVB¿ÉÒÔµ÷WINAPI¿ÉÒÔµ÷SYS COM×é¼þ£¬
¼´Ã»ÎÊÌâ¡£¡£¡£VB¿ÉÒÔÂ𣿴ð°¸Êǿ϶¨µÄ¡£
ºÜÏëÖªµÀ¡£
лл¸÷λµÄÈÈÐÄ
Õâ¸öËÆºõÓеãÄѶȰ ......