µÚÒ»·¶ÎÄÍø - רҵÎÄÕ·¶ÀýÎĵµ×ÊÁÏ·ÖÏíÆ½Ì¨

¾«Æ·½âÎö£ºÕã½­Ê¡¶«ÑôÖÐѧ2018-2019ѧÄê¸ß¶þ3Ô½׶ÎÐÔ¼ì²âÐÅÏ¢¼¼ÊõÊÔÌ⣨ԭ¾í°æ£©

À´Ô´£ºÓû§·ÖÏí ʱ¼ä£º2025/11/22 17:52:16 ±¾ÎÄÓÉloading ·ÖÏí ÏÂÔØÕâÆªÎĵµÊÖ»ú°æ
˵Ã÷£ºÎÄÕÂÄÚÈݽö¹©Ô¤ÀÀ£¬²¿·ÖÄÚÈÝ¿ÉÄܲ»È«£¬ÐèÒªÍêÕûÎĵµ»òÕßÐèÒª¸´ÖÆÄÚÈÝ£¬ÇëÏÂÔØwordºóʹÓá£ÏÂÔØwordÓÐÎÊÌâÇëÌí¼Ó΢ÐźÅ:xxxxxxx»òQQ£ºxxxxxx ´¦Àí£¨¾¡¿ÉÄܸøÄúÌṩÍêÕûÎĵµ£©£¬¸ÐлÄúµÄÖ§³ÖÓëÁ½⡣

Çë»Ø´ðÏÂÁÐÎÊÌâ:

£¨1£©ÈçͼaËùʾ£¬Èô¸ÃµêÆÌÖ»ÓÐÏúÊÛ±íÖеÄÉÌÆ·£¬ÇëÓù«Ê½Çó³ö¸ÃµêÆÌËùÓвúÆ·µÄ³É±¾·ÑÓÃ,ÒªÇó¹«Ê½Öаüº¬SUMº¯Êý£¬Æä¹«Ê½Îª______¡££¨Ìáʾ£º³É±¾=ÏúÊÛ½ð¶îºÏ¼Æ-ÏúÊÛÀûÈóºÏ¼Æ£©

£¨2£©µ±Ç°±íÖеÄÊý¾ÝÊǾ­¹ý2¸ö¹Ø¼ü×ÖÅÅÐòºóµÃµ½µÄ£¬ÔòÅÅÐòµÄÖ÷Òª¹Ø¼ü×ÖΪ_________¡£ £¨3£©¸ù¾ÝͼaÖÐÊý¾ÝÖÆ×÷µÄͼ±íÈçͼbËùʾ£¬´´½¨¸Ãͼ±íµÄÊý¾ÝÇøÓòÊÇ_____¡£

£¨4£©½«ÇøÓòA2£ºG14µÄÊý¾Ý¸´ÖƵ½Ð¹¤×÷±í£¬ÔÚй¤×÷±íÖжԲúÆ·Ãû³Æ½øÐÐɸѡ²Ù×÷£¬ÈôҪɸѡ½á¹û½öÏÔʾÉÌÆ·Ãû³ÆÎª£º¡°Ô²Öé±Ê¡±¡¢¡°²ÊǦ±Ê¡±¡¢¡°Ç¦±Ê¡±ºÍ¡°°×°å±Ê¡±ÐеÄÊý¾Ý¡£ÔòÈçͼͼcËùʾ£¬¢Ù´¦Ó¦ÌîÈëµÄÌõ¼þΪ____________¡£

14.¹ÅÏ£À°ÖøÃû¿ÆÑ§¼Ò±Ï´ï¸çÀ­Ë¹°Ñ1¡¢3¡¢6¡¢10¡¢15¡¢21¡¢28¡­¡­³ÆÎªÈý½ÇÐÎÊý¡£ÕâЩÈý½ÇÐÎÊýÐòÁÐÓÐÒ»¶¨µÄ¹æÂÉ£¬ºóÒ»¸öÊýÓëǰһ¸öÊýµÄ²î¸ÕºÃ¹¹³ÉÒ»¸öµÈ²îÊýÁÐ2¡¢3¡¢4¡¢5¡¢6¡¢7¡¢¡­¡­£¬ËùÒÔ£¬µÚ2λµÄ¡°3¡±µÈÓÚÐòÁеĵÚ1λÊý¡°1¡±¼ÓÉϵȲîÊý¡°2¡±£¬µÚ3λµÄ6µÈÓÚÐòÁеĵÚ2λÊý¡°3¡±¼ÓÉϵȲ3¡±¡­¡­£¬µÚnλÊýmµÈÓÚÐòÁеĵÚn-1λÊý¼ÓÉϵȲîÊýn¡£Ð¡½ðÀûÓÃÕâ¸ö¹æÂɱàдÁËÒ»¸öÅжÏÈý½ÇÐÎÊýµÄVB³ÌÐò£¬ÔÚÎı¾¿òTextlÖÐÊäÈëÒ»¸ö´óÓÚ1µÄÕýÕûÊý£¬µ¥»÷¡°Åжϡ±°´Å¥Commandl,ÔÚ±êÇ©LabellÖÐÏÔʾÅжϽá¹û¡£³Ì

6

ÐòÉè¼Æ½çÃæÈçͼËùʾ¡£

(1) ÔÚÉè¼Æ³ÌÐò½çÃæÊ±£¬ÒªÇå¿Õ±êÇ©ÖÐÏÔʾÄÚÈÝ¡°Labell¡±£¬Ó¦Ð޸ĸñêÇ©µÄ_________ÊôÐÔ¡£ (2) VB³ÌÐò´úÂëÈçÏ£¬ÇëÔÚ»®Ïß´¦ÌîÈëºÏÊÊ´úÂë¡£ Private Sub Command1 Click()

Dim n As Integer, s As Integer s = 0

n = Val(Textl. text) If n > 1 Then

For i = 1 To n

s =________________________ If n = s Then

Labell. Caption = Str(n) +¡¨ÊÇÒ»¸öÈý½ÇÐÎÊý¡£\Exit For

______________________________________

Labell. Caption = Str(n) +\²»ÊÇÒ»¸öÈý½ÇÐÎÊý¡£\Exit For End If Next i Else

Labell.Caption = ¡¨ÇëÊäÈëÒ»¸ö´óÓÚ1µÄÕýÕûÊý\End If End Sub

µÄ7

(3)ÈôÎı¾¿òText1ÖÐÊäÈëµÄÄÚÈÝΪ¡°27¡±£¬µ¥»÷°´Å¥Commandlºó£¬±êÇ©LabellÖÐÏÔʾµÄÄÚÈÝÊÇ_________________

15.С³ÂʹÓà Flash Èí¼þÖÆ×÷Ö÷ÌâΪ¡°ÎÚÒÂÏÁõÓíÎý¡±µÄ¶àýÌå×÷Æ·£¬Æä¡°Main¡±³¡¾°µÄÖÆ×÷½Å±¾ÈçÏ£º ³¡¾°£ºMain ³ÊÏÖ·½Ê½£º 1. ¡°Ê«ÈË¡±´ÓÎę̀×óÏòÓÒÔ˶¯£» ³ÊÏÖ˳Ðò£º ¡°ÔÆ1¡±£¬¡°ÔÆ 2¡±´ÓÓÒÏò×óÔ˶¯£»¡°Ñà×Ó¡±´ÓÓÒÉÏ·½·Éµ½Îę̀ÖÐÑ룬ÔÙ´Ó×óÉÏ·½·É³ö¡£ 2. ¡°Ê«¡±ÒÔµ­È뷽ʽ³ÊÏÖÔÚÎę̀×ó²à¡£ 3. ¡°´´×÷±³¾°¡±°´Å¥³öÏÖÔÚÎę̀ÓÒÏ·½£¬µ¥»÷¸Ã°´Å¥£¬ÔÚä¯ÀÀÆ÷ÖÐÏÔʾλÓÚ×÷ƷͬһĿ¼Ï¡°gsbj.txt¡±ÎļþµÄÄÚÈÝ¡£

£¨1£©ÏÂÁÐÑ¡ÏîÖÐÊôÓÚ×÷Æ·´´×÷ÐèÇó·ÖÎöµÄÊÇ_____£¨¶àÑ¡£¬Ìî×Öĸ£ºA.¸Ã×÷Æ·Ö÷ÒªÃæÏò¸ßÖн׶ÎѧÉú£¬ÓÃÓÚ¿ÎÌýÌѧʹÓà / B.¸Ã×÷Æ··¢²¼ÔÚУ԰¾ÖÓòÍøÆ½Ì¨ÉÏ£¬¿É¹©Ñ§Éú²éÔÄ / C.¸Ã×÷Æ·Ðè³ÊÏÖ¡°ÎÚÒÂÏÕâÊ×Ê«µÄÄÚÈݺʹ´×÷±³¾° / D.¸Ã×÷Æ·ÔÚÖÆ×÷µÄ¹ý³ÌÖÐÐèҪʹÓÃPhotoShop Èí¼þ´¦ÀíͼÏñËØ²Ä£¬GoldWaveÈí¼þ´¦ÀíÒôÆµËØ²Ä£©

1. Ò»¿ªÊ¼³öÏÖ±³¾°Í¼Æ¬ºÍ¡°Ê«ÈË¡±ºÍ¡°ÔÆ 1¡±£¬¡°ÔÆ2¡±¡£ 2. 1ÃëÖӺ󣬡°Ñà×Ó¡±·ÉÈëÎę̀¡£ 3. 3ÃëÖӺ󣬳öÏÖ¡°Ê«¡±¶¯»­£¬³ÖÐøµ½±¾³¡¾°½áÊø¡£ 4. ×îºó³öÏÖ¡°´´×÷±³¾°¡±°´Å¥£¬²¢Í£Ö¹²¥·Å¡£ Àà±ðÐòºÅ£º2 ½øÈ뷽ʽ£ºµã»÷¡°Load¡±³¡¾°µÄ¡°²¥·Å¡±°´Å¥½øÈë 8

£¨2£©ÈçͼËùʾ£¬²âÊÔӰƬʱ·¢ÏÖ£¬Ñà×Ó·ÉÈëµÄ¶¯»­ÓëÖÆ×÷½Å±¾µÄÒªÇó²»·û£¬Ó¦×öµÄµ÷ÕûÊÇ_____________________________________¡£

£¨3£©²âÊÔ³¡¾°Ê±£¬±³¾°»­Ãæ²¥·Åµ½µÚ30֡ʱ±ä³ÉÁíÒ»±³¾°»­Ã棬ΪÁËʹ±³¾°µÚ1Ö¡µ½µÚ50 Ö¡Ò»Ö±ÏÔʾ¡°±³¾°¡±Í¼²ãµÚ1Ö¡µÄÄÚÈÝ£¬ÕýÈ·µÄ²Ù×÷ÊÇ__________________________________________¡£

£¨4£©Í¼ÖС°Ñà×Ó¡±Í¼²ã´´½¨ÁËÑà×ӷɶ¯»­£¬¸÷¹Ø¼üÖ¡Öеġ°Ñà×Ó¡±Ó°Æ¬¼ô¼­ÊµÀý¾ùÓÉ¿âÖС°Ñà×Ó¡±Ôª¼þY£©(300,140)¡¢£¨½öº¬Õ¹³á¶¯×÷£©´´½¨¡£µÚ1Ö¡¡¢µÚ30Ö¡ºÍµÚ50Ö¡ÖС°Ñà×Ó¡±ÊµÀýµÄ×ø±ê£¨X£¬ÒÀ´ÎΪ(450,35)¡¢(-50,50)¡£Èô½ö¶ÔµÚ30Ö¡Ö´ÐÐÇå³ý¹Ø¼üÖ¡²Ù×÷£¬Ôò²âÊÔ³¡¾°Ê±,___________£¨¶àÑ¡£¬Ìî×Öĸ£ºA.Ñà×Ó·ÉÐз¾¶±äΪֱÏß / B. Ñà×ÓÔÚ×ø±ê(450,35)´¦Ô­µØÕ¹³á / C.Ñà×Ó·ÉÐÐʱ¼ä±ä¶Ì/ D. Ñà×ÓÕ¹³áƵÂʲ»±ä£©¡£ £¨5£©ÈçͼËùʾ£¬²âÊÔӰƬʱ£¬µ¥»÷¡°´´×÷±³¾°¡±°´Å¥£¬ÊµÏÖÖÆ×÷½Å±¾ÒªÇó£¬Ôò¡°´´×÷±³¾°¡±°´Å¥µÄ¶¯×÷½Å±¾Îª£º__________________¡£

16.СÃ÷»ùÓÚÑ¡ÔñÅÅÐòËã·¨±àдÁËÒ»¸öVB³ÌÐò,¹¦ÄÜÈçÏ£ºÄ³°àÓÐ50¸öѧÉú£¬´ÓÖÐÑ¡Ôñ10¸öÉí¸ß×î¸ßµÄͬѧ£¬ÒªÇó±»Ñ¡µÄÈκÎÁ½¸öÈ˲»ÄÜÉí¸ßÒ»Ñù£¨Ëù¸øµÄÊý¾Ý±£Ö¤ÄÜÑ¡10¸ö£©¡£ ʵÏÖÉÏÊö¹¦ÄܵÄVB³ÌÐòÈçÏ£¬µ«¼Ó¿ò´¦´úÂëÓÐ´í£¬Çë¸ÄÕý¡£ Const n = 50

µÄ9

Dim d(0 To n) As single , name(1 to n) as string

'¶ÁÈë50¸öѧÉúµÄÉí¸ß£¬ÒÀ´Î´æÈëd(1)¡­d(50), ×î¸ßÉí¸ßСÓÚ2£¬ÐÕÃû´æÈëname(1)¡­name(50) '´úÂëÂÔ

Private Sub Command1_Click()

Dim i As Integer, j As Integer, temp As single, k As Integer,r as string d(0) = 2 For i = 1 To 10

For j = i To n If d(j) < d(i - 1) Then If k = j End If End If Next j If k <> i Then

temp = d(k): d(k) = d(i): d(i) = temp r=name(k) : name(k)=name(i) : name(i)=r End If Next i

For i = 1 To 10 ¡®Êä³ö±»Ñ¡µÄ10¸öÈ˵ÄÃû×ÖºÍÉí¸ß¡£ List2£®AddItem name(i) & d(i) Next i End Sub

17.¾Æµê·¿¼ä¹ÜÀí£º¾Æµê·¿¼ä(·¿¼äÊýСÓÚ10000)±àºÅ°´1¡¢2¡¢3¡­Á¬Ðø±àºÅ£¬Àϰå¶ÔÓÚûÓгö×âµÄ·¿×ÓʹÓÃÈçÏµķ½·¨À´µÇ¼Ç¹ÜÀí¡£Á¬ÐøµÄ¿Õ·¿¼ä£¬µÇ¼ÇµÚÒ»¼äµÄ±àºÅºÍÁ¬ÐøµÄ¿Õ·¿¼äÊý£¬±ÈÈç¿Õ·¿¼ä1£¬2£¬ 6£¬7£¬8£¬10£¬ÔòµÇ¼Ç3Ìõ¼Ç¼£¬·Ö±ðΪ£¨1 2£©£¬£¨6 3£©£¬£¨10 1£©£¬Ä³ÂÿÍÍË·¿ÁË£¬ÐèÒª°ÑÕâ·¿×ÓÒ²µÇ¼ÇÉÏÈ¥£¬ÓÐËÄÖÖÇé¿öÐèÒª´¦Àí£º

1£©ÉÏ¿¿£¬ÀýÈçÍ˵ķ¿¼äºÅΪ3£¬ÔòÔ­À´µÇ¼ÇµÄ3Ìõ¼Ç¼±ä³É£¨1 3£©£¬ £¨6 3£©£¬£¨10 1£©£»

Then

10

¾«Æ·½âÎö£ºÕã½­Ê¡¶«ÑôÖÐѧ2018-2019ѧÄê¸ß¶þ3Ô½׶ÎÐÔ¼ì²âÐÅÏ¢¼¼ÊõÊÔÌ⣨ԭ¾í°æ£©.doc ½«±¾ÎĵÄWordÎĵµÏÂÔØµ½µçÄÔ£¬·½±ã¸´ÖÆ¡¢±à¼­¡¢ÊղغʹòÓ¡
±¾ÎÄÁ´½Ó£ºhttps://www.diyifanwen.net/c311kx9ob387zlrl1bkfq6d7jn4l91z0136j_2.html£¨×ªÔØÇë×¢Ã÷ÎÄÕÂÀ´Ô´£©
ÈÈÃÅÍÆ¼ö
Copyright © 2012-2023 µÚÒ»·¶ÎÄÍø °æÈ¨ËùÓÐ ÃâÔðÉùÃ÷ | ÁªÏµÎÒÃÇ
ÉùÃ÷ :±¾ÍøÕ¾×ðÖØ²¢±£»¤ÖªÊ¶²úȨ£¬¸ù¾Ý¡¶ÐÅÏ¢ÍøÂç´«²¥È¨±£»¤ÌõÀý¡·£¬Èç¹ûÎÒÃÇ×ªÔØµÄ×÷Æ·ÇÖ·¸ÁËÄúµÄȨÀû,ÇëÔÚÒ»¸öÔÂÄÚ֪ͨÎÒÃÇ£¬ÎÒÃǻἰʱɾ³ý¡£
¿Í·þQQ£ºxxxxxx ÓÊÏ䣺xxxxxx@qq.com
ÓåICP±¸2023013149ºÅ
Top