在字符串中使用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")