在字符串中使用Int？

Question

在這裏很新的用戶。 我正在玩基本4機器人和樂趣。

本來我想做到這一點 ImageView2.Bitmap = LoadBitmap（File.DirAssets，拇指+「JPG」） 不工作

下面的代碼工作，但有一個更優雅的方式 - 我確定必須有。 在此先感謝。 史蒂夫

子Timer1_Tick 「句柄蜱事件 如果拇指< 17然後 拇指=拇指+ 1 否則 拇指= 1 結束如果

Select thumb 
     Case 1 
      ImageView2.Bitmap = LoadBitmap(File.DirAssets,"1.jpg") 
     Case 2 
      ImageView2.Bitmap = LoadBitmap(File.DirAssets,"2.jpg") 
     Case 3 
      ImageView2.Bitmap = LoadBitmap(File.DirAssets,"3.jpg") 
     Case 4 
      ImageView2.Bitmap = LoadBitmap(File.DirAssets,"4.jpg") 
     Case 5 
      ImageView2.Bitmap = LoadBitmap(File.DirAssets,"5.jpg") 
     Case 6 
      ImageView2.Bitmap = LoadBitmap(File.DirAssets,"6.jpg") 
     Case 7 
      ImageView2.Bitmap = LoadBitmap(File.DirAssets,"7.jpg") 
     Case 8 
      ImageView2.Bitmap = LoadBitmap(File.DirAssets,"8.jpg") 
     Case 9 
      ImageView2.Bitmap = LoadBitmap(File.DirAssets,"9.jpg") 
     Case 10 
      ImageView2.Bitmap = LoadBitmap(File.DirAssets,"10.jpg") 
     Case 11 
      ImageView2.Bitmap = LoadBitmap(File.DirAssets,"11.jpg") 
     Case 12 
      ImageView2.Bitmap = LoadBitmap(File.DirAssets,"12.jpg") 
     Case 13 
      ImageView2.Bitmap = LoadBitmap(File.DirAssets,"13.jpg") 
     Case 14 
      ImageView2.Bitmap = LoadBitmap(File.DirAssets,"14.jpg") 
     Case 15 
      ImageView2.Bitmap = LoadBitmap(File.DirAssets,"15.jpg") 
     Case 16 
      ImageView2.Bitmap = LoadBitmap(File.DirAssets,"16.jpg") 
     Case 17 
      ImageView2.Bitmap = LoadBitmap(File.DirAssets,"17.jpg") 

    End Select 

結束子

Answer 1

ImageView2.Bitmap = LoadBitmap(File.DirAssets, thumb & ".jpg")